mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 21:27:52 -04:00
9 lines
239 B
Common Lisp
9 lines
239 B
Common Lisp
(define format _format)
|
|
|
|
(define hack-bfloat (new 'global 'bfloat))
|
|
|
|
(set! (-> hack-bfloat type) bfloat)
|
|
(set! (-> hack-bfloat data) 1.233)
|
|
|
|
(format #t "data ~f print ~A type ~A~%" (-> hack-bfloat data) hack-bfloat (-> hack-bfloat type))
|
|
0 |