Re-enable some tests.
Chris Pressey
4 years ago
29 | 29 |
| (delete (literal q) 55)
|
30 | 30 |
? abort (expected-list 55)
|
31 | 31 |
|
32 | |
/| (delete (literal q) (literal ((a 7) 99 (q 4))))
|
33 | |
/? abort (expected-list 99)
|
|
32 |
| (delete (literal q) (literal ((a 7) 99 (q 4))))
|
|
33 |
? abort (expected-list 99)
|
34 | 34 |
|
35 | 35 |
'<<SPEC'
|
36 | 36 |
|
40 | 40 |
| (divide 14 #t)
|
41 | 41 |
? abort (expected-number #t)
|
42 | 42 |
|
43 | |
/| (divide #t 51)
|
44 | |
/? abort (expected-number #t)
|
|
43 |
| (divide #t 51)
|
|
44 |
? abort (expected-number #t)
|
45 | 45 |
|
46 | 46 |
'<<SPEC'
|
47 | 47 |
|
23 | 23 |
| (lookup (literal q) 55)
|
24 | 24 |
? abort (expected-list 55)
|
25 | 25 |
|
26 | |
/| (lookup (literal q) (literal ((a 7) 99 (q 4))))
|
27 | |
/? abort (expected-list 99)
|
|
26 |
| (lookup (literal q) (literal ((a 7) 99 (q 4))))
|
|
27 |
? abort (expected-list 99)
|
28 | 28 |
|
29 | 29 |
'<<SPEC'
|
30 | 30 |
|
41 | 41 |
| (remainder 14 #t)
|
42 | 42 |
? abort (expected-number #t)
|
43 | 43 |
|
44 | |
/| (remainder #t 51)
|
45 | |
/? abort (expected-number #t)
|
|
44 |
| (remainder #t 51)
|
|
45 |
? abort (expected-number #t)
|
46 | 46 |
|
47 | 47 |
'<<SPEC'
|
48 | 48 |
|