mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 21:27:52 -04:00
ddffda1e8c
* fix shift naming issue * fix bad argument variable names * fix missing variable issue * small missing things * wip * cleanup * wip * fix conditions * small bug fix in rewriter * fix incredibly stupid printing bug
7 lines
194 B
Common Lisp
7 lines
194 B
Common Lisp
|
|
(let ((one 1)
|
|
(two 2))
|
|
(+ (shl 2 3) (shl 1 0) (shl 0 4) (shr 2 3) (shr 10 two) (shl -2 one) (sar -16 two))
|
|
)
|
|
|
|
;; 16 1 0 0 2 -4 -4 |