Wrong type argument in position 1: #f In /home/sam/src/test/share/liquidwar6-0.0.11beta/script/liquidwar6.scm: 63: 4* (begin (c-lw6sys-log 3 #) (load "main.scm") (lw6-main) ...) 66: 5* [lw6-main] In /home/sam/src/test/share/liquidwar6-0.0.11beta/script/main.scm: 23: 6 (begin (load "def.scm") (load "backend.scm") ...) 112: 7* (if (not #) (let # #) (begin # #)) 113: 8 (let ((gfx-backend #) (snd-backend #)) (if gfx-backend (let* # #))) 117: 9 (if gfx-backend (let* ((dsp #)) (if dsp (begin # # ...) ...))) 118: 10 (let* ((dsp #)) (if dsp (begin # # # ...) (begin # #))) 123: 11 (if dsp (begin # # # ...) (begin # #)) 124: 12 (begin # # # ...) 150: 13* [lw6-game-loop] In /home/sam/src/test/share/liquidwar6-0.0.11beta/script/loop.scm: 25: 14 (begin (lw6-log-info #) (let* # #)) 27: 15 (let* (# # # #) (# #)) 33: 16 (while (not (c-lw6sys-signal-poll-quit)) (let* (# # #) (begin # # #))) 33: 17 [while-helper #] In unknown file: ?: 18 (do ((key (make-symbol "while-key"))) ((catch key (lambda () #) ...))) ?: 19* [catch # # ...] ?: 20* [#] ?: 21* [# # #] ?: 22* (do () ((# (not #))) ...) In /home/sam/src/test/share/liquidwar6-0.0.11beta/script/loop.scm: 34: 23* (let* (# # #) (begin # # #)) 39: 24 (begin (if # #) (if # # #) (lw6-display-update)) 46: 25* (if (< io-count ticks) (begin (lw6-io) (set! io-count (max # #)))) 47: 26 (begin (lw6-io) (set! io-count (max # #))) 48: 27* [lw6-io] In /home/sam/src/test/share/liquidwar6-0.0.11beta/script/io.scm: 23: 28 (begin (lw6-menu) (lw6-loader) ...) 24: 29* [lw6-menu] In /home/sam/src/test/share/liquidwar6-0.0.11beta/script/menu-engine.scm: 577: 30 (begin (if # #) (lw6-menu-pump-buttons) (lw6-menu-pump-mouse) ...) 581: 31* [lw6-menu-pump-buttons] 394: 32 (let ((dsp #) (menu #) (menuitem #)) (if menu (let* # #))) 400: 33 (if menu (let* (# # # #) (begin # #))) 402: 34 (let* (# # # #) (begin # #)) 409: 35 (begin (if (lw6-menu-pump-all?) (begin # # ...)) (cond (# #) (# #) ...)) 478: 36 (cond (# #) (# #) (# #) ...) 492: 37 (begin # # # ...) 496: 38 (if (c-lw6gui-mouse-pop-button-left dsp) (begin # # #)) 497: 39 (begin (lw6-set-menuitem! menu-position #f) (set! menuitem #) (if # #)) 500: 40 (if (lw6-menuitem-action menuitem "on-valid") (lw6-play-fx-beep-valid)) 501: 41* [lw6-menuitem-action (# # # # ...) "on-valid"] 185: 42 (if (and menuitem action) ((assoc-ref menuitem action) menuitem) #f) 186: 43 [# (# # # # ...)] In /home/sam/src/test/share/liquidwar6-0.0.11beta/script/menu-players.scm: 39: 44 [lw6-push-menu ... 39: 45* [lw6-player-detail-menu "player1"] In /home/sam/src/test/share/liquidwar6-0.0.11beta/script/menu-player-detail.scm: 114: 46 (let* (# # #) (begin # # # ...)) 119: 47 (begin (lw6-append-menuitem! menu #) (lw6-append-menuitem! menu #) ...) 121: 48* [lw6-append-menuitem! (# # # # ...) ... 121: 49* [lw6-player-detail-menu-color-item "player1"] 57: 50 (let* (# # #) (begin # # # ...)) 62: 51 (begin (set! item #) (set! item #) (set! item #) ...) 63: 52* (set! item #) 63: 53* [lw6-menu-item-list-template-update # ...] In /home/sam/src/test/share/liquidwar6-0.0.11beta/script/menu-engine.scm: 290: 54 (begin (set! item #) (set! item #) (set! item #) ...) 294: 55* (set! item (assoc-set! item "label" (label-func item))) 294: 56* [assoc-set! (# # # # ...) "label" ... 294: 57* [lw6-menu-item-list-label-func (# # # # ...)] 235: 58 (let* ((values-list #) (value #)) (list-ref values-list value)) 239: 59 [list-ref #f 0]