Play spider until you have a finished stack (king down to ace of one suit) on the tableau, then double click it. That should send the stack up to the foundation, but instead you get a scheme exception:

Variation: spider
Scheme error:
	(#f Wrong type (expecting ~A): ~S (exact integer ((1 3 #t) (2 3 #t) (3 3 #t) (4 3 #t) (5 3 #t) (6 3 #t) (7 3 #t) (8 3 #t) (9 3 #t) (10 3 #t) (11 3 #t) (12 3 #t) (13 3 #t) (3 1 #f) (13 0 #f))) (((1 3 #t) (2 3 #t) (3 3 #t) (4 3 #t) (5 3 #t) (6 3 #t) (7 3 #t) (8 3 #t) (9 3 #t) (10 3 #t) (11 3 #t) (12 3 #t) (13 3 #t) (3 1 #f) (13 0 #f))))
Scheme tag:
	wrong-type-arg

Backtrace:
In ice-9/boot-9.scm:
 157: 8 [catch #t #<catch-closure 8d78f40> ...]
In unknown file:
   ?: 7 [apply-smob/1 #<catch-closure 8d78f40>]
In ice-9/boot-9.scm:
 157: 6 [catch #t #<catch-closure 8d69e20> ...]
In unknown file:
   ?: 5 [apply-smob/1 #<catch-closure 8d69e20>]
In ../../../games/spider.scm:
 206: 4 [button-double-clicked 12]
In ../../../games/api.scm:
 548: 3 [remove-n-cards 12 13]
In unknown file:
   ?: 2 [list-tail 13 ((1 3 #t) (2 3 #t) (3 3 #t) ...)]
In ice-9/boot-9.scm:
 102: 1 [#<procedure 94401c0 at ice-9/boot-9.scm:97:6 (thrown-k . args)> wrong-type-arg ...]
In unknown file:
   ?: 0 [apply-smob/1 #<catch-closure 8d69da0> wrong-type-arg ...]


Deck State:
	Slot 0
		(0 8 #f) ,(3 2 #f) ,(3 11 #f)
 ,(2 8 #f) ,(2 11 #f) ,(0 13 #f) ,(0 1 #f) ,(1 12 #f) ,(2 6 #f) ,(2 10 #f) ,(2 12 #f) ,(1 5 #f) ,(2 2 #f) ,(3 5 #f) ,(2 8 #f) ,(0 3 #f) ,(2 9 #f) ,(2 11 #f) ,(2 12 #f) ,(1 2 #f) ,(2 4 #f) ,(1 10 #f) ,(0 5 #f)
	Slot 1
		(Empty)
	Slot 2
		(Empty)
	Slot 3
		(Empty)
	Slot 4
		(Empty)
	Slot 5
		(Empty)
	Slot 6
		(Empty)
	Slot 7
		(Empty)
	Slot 8
		(Empty)
	Slot 9
		(Empty)
	Slot 10
		(3 10 #t) ,(3 8 #t) ,(2 6 #t)
 ,(3 9 #t) ,(2 7 #t) ,(2 5 #t) ,(2 9 #t)
	Slot 11
		(0 9 #f) ,(0 6 #f) ,(2 13 #t)
 ,(2 3 #f) ,(2 3 #f) ,(0 12 #t) ,(0 10 #t) ,(0 8 #t) ,(0 6 #t)
	Slot 12
		(0 13 #f) ,(3 13 #t) ,(3 11 #t)
 ,(1 3 #f) ,(3 12 #t) ,(3 10 #t) ,(3 8 #t) ,(3 6 #t) ,(3 4 #t) ,(3 2 #t)
	Slot 13
		(0 10 #t) ,(3 3 #t) ,(1 1 #t)
 ,(3 4 #t) ,(1 2 #t)
	Slot 14
		(1 1 #f) ,(0 4 #t)
	Slot 15
		(0 1 #f) ,(3 13 #f) ,(1 6 #t)
 ,(1 3 #f) ,(0 2 #f) ,(1 5 #t) ,(0 3 #t)
	Slot 16
		(0 12 #t)
	Slot 17
		(1 7 #t) ,(1 12 #t)
	Slot 18
		(1 4 #f) ,(1 11 #f) ,(2 2 #t)
 ,(1 13 #f) ,(2 4 #f) ,(2 7 #t)


Using aisleriot git master, with guile 2.0.x from git.