🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: mod.computers.68k
Article #61

RE: CP/M-68K v1.2 math library...

#61
From: HELLER%cs.umass.edu
Date: Mon, 16 Jun 1986 19:54
35 lines
1564 bytes
The tan() function is actually in the libf.a and libe.a files.  It is
"bundled" with sin() and cos().  There is for sin() and cos() a small module
(like the one below) which then calls the appropriate entry point in the
real code.  After disassembling sin() and cos(), and then the low level
composite function, I put together the following assembly code hook for
tan().

*-------------------cut here-------------------------
* -*-save-*-
*
* fptan.s - missing tan hook
* Robert Heller. Created: Sun Nov 3, 1985 13:21:02.13
* Last Mod: 
* 
*
	.text
	.globl	_tan
_tan:
	link	A6,#-4
	movem.l	D3-D7,-(A7)
	move.l	8(A6),D7
	jsr	ffptan
	move.l	D7,D0
	movem.l	(A7)+,D3-D7
	unlk	A6
	rts
	.end
*-------------------cut here-----------------------

There is no sign of atan() and there is no math.h.  I got my version of 1.2
with my machine (a Stride), so the lack of math.h isn't particular to
TriSoft (nor is the lack of tan() and atan()).

				Robert Heller
Technical Details
Message-ID: <8606181128.AA11722@ucbvax.Berkeley.EDU>
Path: arc1-ca.pugleaf.net!utzoo!decvax!decwrl!ucbvax!CSNET-RELAY.ARPA!HELLER%cs.umass.edu

Show Full Headers
Complete Article Headers
Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: arc1-ca.pugleaf.net!utzoo!decvax!decwrl!ucbvax!CSNET-RELAY.ARPA!HELLER%cs.umass.edu
From: HELLER%cs.umass.edu@CSNET-RELAY.ARPA.UUCP
Newsgroups: mod.computers.68k
Subject: RE: CP/M-68K v1.2 math library...
Message-ID: <8606181128.AA11722@ucbvax.Berkeley.EDU>
Date: Mon, 16-Jun-86 15:54:00 EDT
Article-I.D.: ucbvax.8606181128.AA11722
Posted: Mon Jun 16 15:54:00 1986
Date-Received: Fri, 20-Jun-86 00:16:21 EDT
Sender: mwm@ucbvax.BERKELEY.EDU
Organization: The ARPA Internet
Lines: 35
Approved: info-68k@ucbvax.berkeley.edu