jak-project/goal_src/engine/game/main.gc

;;-*-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))
Update all lisp headers to reduce size of formatting PR 2020-10-26 21:08:24 -04:00			`;;--Lisp--`
add empty files for all obj files 2020-09-04 14:44:23 -04:00			`(in-package goal)`

			`;; name: main.gc`
			`;; name in dgo: main`
			`;; dgos: GAME, ENGINE`

[Decompile] connect, text-h, settings-h, capture, memory-usage-h (#410) * decompile stuff * temp * temp2 * fix * temp * preparing for merge * working * fix stupid format * fix codacy 2021-05-05 17:38:16 -04:00			`(defun movie? ()`
			`"Are we in a movie?"`
			`(nonzero? (logand (-> kernel-context prevent-from-run) (process-mask movie)))`
			`)`
decomp: `credits` (#533) * decomp: `credits` but there are still issues * issues over creating a `new` `font-context` * decomp: finalized `credits` 2021-06-06 19:57:40 -04:00
			`;; TODO - for credits`
			`(define-extern scf-get-territory (function int))`