mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 21:27:52 -04:00
c19bcd37aa
* decomp: `credits` but there are still issues * issues over creating a `new` `font-context` * decomp: finalized `credits`
15 lines
291 B
Common Lisp
15 lines
291 B
Common Lisp
;;-*-Lisp-*-
|
|
(in-package goal)
|
|
|
|
;; name: main.gc
|
|
;; name in dgo: main
|
|
;; dgos: GAME, ENGINE
|
|
|
|
(defun movie? ()
|
|
"Are we in a movie?"
|
|
(nonzero? (logand (-> *kernel-context* prevent-from-run) (process-mask movie)))
|
|
)
|
|
|
|
;; TODO - for credits
|
|
(define-extern scf-get-territory (function int))
|