Re: calling _Date2Secs

[Jeffrey.J.Guertin@uwrf.edu]

To:info-mcl@cambridge.apple.com
cc:info-mcl@cambridge.apple.com
Subject:RE: calling #_date2secs
--------

jeffrey,
	i'm very new to this game so i don't know protocal. i've been playing
with your code and calling date2secs since i saw it. your hint was correct;
as written deftrap _date2secs was attempting to put a datetimerec into an
address register and a macptr into the longword set up for seconds.
	
	the following deftrap seems to work. however i'm still getting funny
results with your rlet ie. a return date in 1904. i get correct results when
i step through the same code.

(deftrap _date2secs ((d (:pointer :datetimerec)) (secs (:pointer 
:signed-long)))
   nil
  (:no-trap
   (%put-long secs (ccl:register-trap #xa9C7 :a0 d :d0))))

	have learned much in the proccess.
				
					thanx
					
					igore