mirror of
https://github.com/open-goal/jak-project
synced 2026-08-07 02:06:59 -04:00
7 lines
209 B
Common Lisp
7 lines
209 B
Common Lisp
(test-setup "alligator" #f)
|
|
|
|
(let ((new-string (new 'global 'string 17 "alligator")))
|
|
(expect-true (= 17 (-> new-string allocated-length)))
|
|
(expect-true (= 9 (length new-string)))
|
|
(printl new-string)
|
|
) |