;;-*-Lisp-*- (in-package goal) ;; name: generic-obs.gc ;; name in dgo: generic-obs ;; dgos: GAME, ENGINE (deftype camera-start (process-hidden) () :method-count-assert 15 :size-assert #x70 :flag-assert #xf00000070 ) ;; TODO - for misty-warehouse (define-extern camera-tracker-init (function function none)) ;; TODO - not confirmed, see misty-warehouse::camera-view (define-extern process-grab? (function process symbol)) (define-extern camera-change-to (function string int symbol none)) ;; TODO - not confirmed yet (define-extern process-release? (function process symbol))