Article View: comp.lang.lisp.mcl
Article #654Re: calling _Date2Secs
From: Jeffrey.J.Guertin
Date: Sun, 24 Jan 1993 21:44
Date: Sun, 24 Jan 1993 21:44
27 lines
1269 bytes
1269 bytes
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
Technical Details
Message-ID:
<01GTWHO1HT5U8WW5K8@kinni.acc.uwrf.edu>Path:
arc1-ca.pugleaf.net!sparky!uunet!europa.asd.contel.com!howland.reston.ans.net!spool.mu.edu!olivea!apple!cambridge.apple.com!Jeffrey.J.Guertin@uwrf.eduShow Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!sparky!uunet!europa.asd.contel.com!howland.reston.ans.net!spool.mu.edu!olivea!apple!cambridge.apple.com!Jeffrey.J.Guertin@uwrf.edu From: Jeffrey.J.Guertin@uwrf.edu Newsgroups: comp.lang.lisp.mcl Subject: Re: calling _Date2Secs Message-ID: <01GTWHO1HT5U8WW5K8@kinni.acc.uwrf.edu> Date: 24 Jan 93 21:44:10 GMT Sender: owner-info-mcl@cambridge.apple.com Lines: 27 Approved: comp.lang.lisp.mcl@Cambridge.Apple.C0M