source: project/chicken/branches/prerelease/tests/scrutiny.expected @ 14954

Last change on this file since 14954 was 14954, checked in by felix winkelmann, 10 years ago

merged trunk rev. 14940 into prerelease branch

File size: 1.9 KB
Line 
1
2Warning: at toplevel:
3  use of deprecated toplevel identifier `current-environment'
4
5Warning: in local procedure `c',
6  in local procedure `b',
7  in toplevel procedure `a':
8  expected value of type boolean in conditional but were given a value of type `number' which is always true:
9
10(if x10 '1 '2)
11
12Warning: in toplevel procedure `foo':
13  branches in conditional expression differ in the number of results:
14
15(if x14 (values '1 '2) (values '1 '2 (+ ...)))
16
17Warning: at toplevel:
18  expected argument #2 of type `number' in procedure call to `bar17' (line 18), but where given an argument of type `symbol'
19
20Warning: at toplevel:
21  expected in procedure call to `pp' (line 20) 1 argument, but where given 0 arguments
22
23Warning: at toplevel:
24  expected in argument #1 of procedure call `(print (cpu-time))' a single result, but were given 2 results
25
26Warning: at toplevel:
27  expected in argument #1 of procedure call `(print (values))' a single result, but were given zero results
28
29Warning: at toplevel:
30  expected in procedure call to `x23' (line 26) a value of type `(procedure () *)', but were given a value of type `fixnum'
31
32Warning: at toplevel:
33  expected argument #1 of type `number' in procedure call to `+' (line 28), but where given an argument of type `symbol'
34
35Warning: at toplevel:
36  expected argument #2 of type `number' in procedure call to `+' (line 28), but where given an argument of type `symbol'
37
38Warning: at toplevel:
39  assignment of value of type `fixnum' to toplevel variable `car' does not match declared type `(procedure car (pair) *)'
40
41Warning: at toplevel:
42  expected in operator position of procedure call `((values (quote 1) (quote 2)))' a single result, but were given 2 results
43
44Warning: at toplevel:
45  expected in procedure call to `(values (quote 1) (quote 2))' a value of type `(procedure () *)', but were given a value of type `fixnum'
46
47Warning: redefinition of standard binding `car'
Note: See TracBrowser for help on using the repository browser.