Control: found -1 1:3.22.4-3
Thanks

Hello,

still happens.
It looks like it's not necessary to complete the game.

I don't know why I didn't paste it the first time, but here's a Scheme backtrace.

    -- 8< --
    Variation: westhaven
    Scheme error:
(#f Wrong number of arguments to ~A (#<procedure find-card (card-suit card-rank slot)>) #f)
    Scheme tag:
        wrong-number-of-args
    Backtrace:
    In ice-9/boot-9.scm:
     160: 8 [catch #t #<catch-closure 555555a384a0> ...]
    In unknown file:
       ?: 7 [apply-smob/1 #<catch-closure 555555a384a0>]
    In ice-9/boot-9.scm:
     160: 6 [catch #t #<catch-closure 5555561c9200> ...]
    In unknown file:
       ?: 5 [apply-smob/1 #<catch-closure 5555561c9200>]
    In westhaven.scm:
     304: 4 [get-hint]
     271: 3 [tableau-to-tableau? 6 15]
    In diamond-mine.scm:
     278: 2 [find-card 6 (9 2 #t)]
    In ice-9/boot-9.scm:
105: 1 [#<procedure 5555565f31c0 at ice-9/boot-9.scm:100:6 (thrown-k . args)> wrong-number-of-args ...]
    In unknown file:
?: 0 [apply-smob/1 #<catch-closure 5555561cef40> wrong-number-of-args ...]
    Deck State:
        Slot 0
            (0 10 #f) ,(0 11 #f) ,(1 1 #f)
,(3 1 #f) ,(3 9 #f) ,(3 6 #f) ,(1 4 #f) ,(2 1 #f) ,(0 1 #f) ,(1 13 #f) ,(3 8 #f) ,(1 9 #f) ,(0 7 #f) ,(1 10 #f)
        Slot 1
            (Empty)
        Slot 2
            (Empty)
        Slot 3
            (Empty)
        Slot 4
            (Empty)
        Slot 5
            (Empty)
        Slot 6
            (0 2 #f) ,(2 9 #t)
        Slot 7
            (3 5 #f) ,(3 11 #t)
        Slot 8
            (0 13 #f) ,(1 12 #t)
        Slot 9
            (1 7 #f) ,(2 6 #t)
        Slot 10
            (2 3 #f) ,(3 7 #t)
        Slot 11
            (0 6 #f) ,(2 12 #t)
        Slot 12
            (1 11 #f) ,(2 4 #t)
        Slot 13
            (1 8 #f) ,(0 4 #t)
        Slot 14
            (0 9 #f) ,(2 7 #t)
        Slot 15
            (2 2 #f) ,(3 10 #t)
    -- >8 --

Cheers,
Ben

Reply via email to