mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 21:27:52 -04:00
20 lines
445 B
Common Lisp
20 lines
445 B
Common Lisp
;; type system setup
|
|
(define-extern object type)
|
|
(define-extern type type)
|
|
(define-extern structure type)
|
|
(define-extern uint128 type)
|
|
(define-extern basic type)
|
|
(define-extern pair type)
|
|
(define-extern array type)
|
|
|
|
|
|
|
|
;; some types we need.
|
|
(declare-type sparticle-launch-group basic)
|
|
(declare-type lightning-spec basic)
|
|
(declare-type sparticle-launcher basic)
|
|
(declare-type state basic)
|
|
|
|
;; debug
|
|
(define-extern looping-code (function symbol))
|