mirror of
https://github.com/open-goal/jak-project
synced 2026-07-04 13:30:41 -04:00
9 lines
211 B
Common Lisp
9 lines
211 B
Common Lisp
;-*-Scheme-*-
|
|
|
|
;; this math will be evaluted in goos
|
|
(test-setup (+ 1 (* 2 2) (* 3 3) (* 4 4)) #f)
|
|
|
|
;; this relies on the c kernel having this test-function defined.
|
|
|
|
(test-result (test-function 1 2 3 4))
|