mirror of
https://github.com/open-goal/jak-project
synced 2026-07-27 23:00:42 -04:00
0a6602e320
* decompile stuff * temp * temp2 * fix * temp * preparing for merge * working * fix stupid format * fix codacy
12 lines
219 B
Common Lisp
12 lines
219 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)))
|
|
)
|