+
+;; @@: This could be kind of a messy way of doing gameobj-init
+;; stuff. If only we had generic methods :(
+(define-mhandler (gameobj-init actor message)
+ "Your most basic game object init procedure. Does nothing."
+ #f)
+
+(define (val-or-run val-or-proc)
+ "Evaluate if a procedure, or just return otherwise"
+ (if (procedure? val-or-proc)
+ (val-or-proc)
+ val-or-proc))
+