mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 21:27:52 -04:00
5 lines
274 B
Common Lisp
5 lines
274 B
Common Lisp
(format #t "#x~X ~f #x~X~%"
|
|
(the int 26843545000.0) ;; check that float -> int truncates (previously wrong)
|
|
(the float #x100000001) ;; check that int -> float truncates
|
|
(the-as int -1.0) ;; check that float reg -> int reg sign extends
|
|
) |