382 lines
		
	
	
	
		
			36 KiB
		
	
	
	
		
			Text
		
	
	
	
	
	
		
		
			
		
	
	
			382 lines
		
	
	
	
		
			36 KiB
		
	
	
	
		
			Text
		
	
	
	
	
	
|   | *** patches-work-dir/errors-compile-0-f-f-f	2022-05-08 20:43:10.000000000 -0700 | ||
|  | --- patches-work-dir/errors-compile-0-f-t-f	2022-05-08 20:43:10.000000000 -0700 | ||
|  | *************** | ||
|  | *** 178,184 **** | ||
|  |   3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". | ||
|  |   3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable c". | ||
|  |   3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable m". | ||
|  | ! 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". | ||
|  |   3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable y". | ||
|  |   3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". | ||
|  |   3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". | ||
|  | --- 178,184 ---- | ||
|  |   3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". | ||
|  |   3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable c". | ||
|  |   3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable m". | ||
|  | ! 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable b". | ||
|  |   3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable y". | ||
|  |   3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". | ||
|  |   3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". | ||
|  | *************** | ||
|  | *** 197,203 **** | ||
|  |   3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable b". | ||
|  |   3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable a". | ||
|  |   3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable g". | ||
|  | ! 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable f". | ||
|  |   3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable f". | ||
|  |   3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable c". | ||
|  |   3.mo:Expected warning in mat cpvalid: "possible attempt to reference undefined variable x". | ||
|  | --- 197,203 ---- | ||
|  |   3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable b". | ||
|  |   3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable a". | ||
|  |   3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable g". | ||
|  | ! 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable g". | ||
|  |   3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable f". | ||
|  |   3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable c". | ||
|  |   3.mo:Expected warning in mat cpvalid: "possible attempt to reference undefined variable x". | ||
|  | *************** | ||
|  | *** 244,253 **** | ||
|  |   3.mo:Expected error in mat mrvs: "returned three values to single value return context". | ||
|  |   3.mo:Expected error in mat mrvs: "returned three values to single value return context". | ||
|  |   3.mo:Expected error in mat mrvs: "returned zero values to single value return context". | ||
|  | ! 3.mo:Expected error in mat mrvs: "incorrect number of values received in multiple value context". | ||
|  | ! 3.mo:Expected error in mat mrvs: "returned zero values to single value return context". | ||
|  | ! 3.mo:Expected error in mat mrvs: "incorrect number of values received in multiple value context". | ||
|  | ! 3.mo:Expected error in mat mrvs: "incorrect number of values received in multiple value context". | ||
|  |   3.mo:Expected error in mat mrvs: "variable $mrvs-foo is not bound". | ||
|  |   3.mo:Expected error in mat mrvs: "attempt to apply non-procedure 17". | ||
|  |   3.mo:Expected error in mat mrvs: "returned two values to single value return context". | ||
|  | --- 244,253 ---- | ||
|  |   3.mo:Expected error in mat mrvs: "returned three values to single value return context". | ||
|  |   3.mo:Expected error in mat mrvs: "returned three values to single value return context". | ||
|  |   3.mo:Expected error in mat mrvs: "returned zero values to single value return context". | ||
|  | ! 3.mo:Expected error in mat mrvs: "incorrect argument count in call (call-with-values (lambda () 5 (values 2)) (lambda (x y) (+ x y)))". | ||
|  | ! 3.mo:Expected error in mat mrvs: "incorrect argument count in call (call-with-values values (lambda (x) x))". | ||
|  | ! 3.mo:Expected error in mat mrvs: "incorrect argument count in call (call-with-values values (lambda (x y) x))". | ||
|  | ! 3.mo:Expected error in mat mrvs: "incorrect argument count in call (call-with-values f (lambda (x y) x))". | ||
|  |   3.mo:Expected error in mat mrvs: "variable $mrvs-foo is not bound". | ||
|  |   3.mo:Expected error in mat mrvs: "attempt to apply non-procedure 17". | ||
|  |   3.mo:Expected error in mat mrvs: "returned two values to single value return context". | ||
|  | *************** | ||
|  | *** 3932,3938 **** | ||
|  |   misc.mo:Expected error in mat cpletrec: "foreign-procedure: no entry for "foo"". | ||
|  |   misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable q". | ||
|  |   misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable bar". | ||
|  | ! misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable foo at line 1, char 108 of testfile.ss". | ||
|  |   misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable b". | ||
|  |   misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable b". | ||
|  |   misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable a". | ||
|  | --- 3932,3938 ---- | ||
|  |   misc.mo:Expected error in mat cpletrec: "foreign-procedure: no entry for "foo"". | ||
|  |   misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable q". | ||
|  |   misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable bar". | ||
|  | ! misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable bar at line 1, char 76 of testfile.ss". | ||
|  |   misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable b". | ||
|  |   misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable b". | ||
|  |   misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable a". | ||
|  | *************** | ||
|  | *** 7579,7586 **** | ||
|  |   7.mo:Expected error in mat bytes-allocated: "bytes-allocated: invalid space gnu". | ||
|  |   7.mo:Expected error in mat error: "a: hit me!". | ||
|  |   7.mo:Expected error in mat error: "f: n is 0". | ||
|  | ! record.mo:Expected error in mat record1: "invalid value 3 for foreign type double-float". | ||
|  | ! record.mo:Expected error in mat record1: "3 is not of type #<record type fudge>". | ||
|  |   record.mo:Expected error in mat record2: "invalid value 3 for foreign type double-float". | ||
|  |   record.mo:Expected error in mat record2: "3 is not of type #<record type fudge>". | ||
|  |   record.mo:Expected error in mat record2: "make-record-type: invalid field list ((immutable double-float a) . b)". | ||
|  | --- 7579,7586 ---- | ||
|  |   7.mo:Expected error in mat bytes-allocated: "bytes-allocated: invalid space gnu". | ||
|  |   7.mo:Expected error in mat error: "a: hit me!". | ||
|  |   7.mo:Expected error in mat error: "f: n is 0". | ||
|  | ! record.mo:Expected error in mat record1: "make-fudge: invalid value 3 for foreign type double-float". | ||
|  | ! record.mo:Expected error in mat record1: "fudge-a: 3 is not of type #<record type fudge>". | ||
|  |   record.mo:Expected error in mat record2: "invalid value 3 for foreign type double-float". | ||
|  |   record.mo:Expected error in mat record2: "3 is not of type #<record type fudge>". | ||
|  |   record.mo:Expected error in mat record2: "make-record-type: invalid field list ((immutable double-float a) . b)". | ||
|  | *************** | ||
|  | *** 7588,7602 **** | ||
|  |   record.mo:Expected error in mat type-descriptor: "invalid syntax (type-descriptor 3)". | ||
|  |   record.mo:Expected error in mat type-descriptor: "type-descriptor: unrecognized record car". | ||
|  |   record.mo:Expected error in mat record3: "variable set-fudge-a! is not bound". | ||
|  | ! record.mo:Expected error in mat record4: "3 is not of type #<record type fudge>". | ||
|  | ! record.mo:Expected error in mat record5: "invalid value 4 for foreign type double-float". | ||
|  | ! record.mo:Expected error in mat record5: "invalid value 4 for foreign type double-float". | ||
|  | ! record.mo:Expected error in mat record6: "invalid value <int> for foreign type integer-32". | ||
|  | ! record.mo:Expected error in mat record6: "invalid value <-int> for foreign type integer-32". | ||
|  | ! record.mo:Expected error in mat record6: "invalid value 23.0 for foreign type integer-32". | ||
|  | ! record.mo:Expected error in mat record7: "invalid value <int> for foreign type unsigned-32". | ||
|  | ! record.mo:Expected error in mat record7: "invalid value <-int> for foreign type unsigned-32". | ||
|  | ! record.mo:Expected error in mat record7: "invalid value 23.0 for foreign type unsigned-32". | ||
|  |   record.mo:Expected error in mat record9: "record-reader: invalid input #f". | ||
|  |   record.mo:Expected error in mat record9: "record-reader: invalid second argument fudge". | ||
|  |   record.mo:Expected error in mat record9: "record-reader: invalid second argument fudge". | ||
|  | --- 7588,7602 ---- | ||
|  |   record.mo:Expected error in mat type-descriptor: "invalid syntax (type-descriptor 3)". | ||
|  |   record.mo:Expected error in mat type-descriptor: "type-descriptor: unrecognized record car". | ||
|  |   record.mo:Expected error in mat record3: "variable set-fudge-a! is not bound". | ||
|  | ! record.mo:Expected error in mat record4: "set-fudge-a!: 3 is not of type #<record type fudge>". | ||
|  | ! record.mo:Expected error in mat record5: "set-fudge-b!: invalid value 4 for foreign type double-float". | ||
|  | ! record.mo:Expected error in mat record5: "set-fudge-b!: invalid value 4 for foreign type double-float". | ||
|  | ! record.mo:Expected error in mat record6: "make-bar: invalid value <int> for foreign type integer-32". | ||
|  | ! record.mo:Expected error in mat record6: "make-bar: invalid value <-int> for foreign type integer-32". | ||
|  | ! record.mo:Expected error in mat record6: "make-bar: invalid value 23.0 for foreign type integer-32". | ||
|  | ! record.mo:Expected error in mat record7: "make-bar: invalid value <int> for foreign type unsigned-32". | ||
|  | ! record.mo:Expected error in mat record7: "make-bar: invalid value <-int> for foreign type unsigned-32". | ||
|  | ! record.mo:Expected error in mat record7: "make-bar: invalid value 23.0 for foreign type unsigned-32". | ||
|  |   record.mo:Expected error in mat record9: "record-reader: invalid input #f". | ||
|  |   record.mo:Expected error in mat record9: "record-reader: invalid second argument fudge". | ||
|  |   record.mo:Expected error in mat record9: "record-reader: invalid second argument fudge". | ||
|  | *************** | ||
|  | *** 7609,7634 **** | ||
|  |   record.mo:Expected error in mat record10: "read: unresolvable cycle constructing record of type #<record type bar> at char 3 of #<input port string>". | ||
|  |   record.mo:Expected error in mat record16: "read: unresolvable cycle constructing record of type #<record type bazar> at char 3 of #<input port string>". | ||
|  |   record.mo:Expected error in mat record16: "read: unresolvable cycle constructing record of type #<record type bazar> at char 3 of #<input port string>". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value 256 for foreign type unsigned-8". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value -129 for foreign type unsigned-8". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value 65536 for foreign type unsigned-16". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value -32769 for foreign type unsigned-16". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value 2 for foreign type double-float". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value 3 for foreign type single-float". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value 256 for foreign type unsigned-8". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value -129 for foreign type unsigned-8". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value 2 for foreign type double-float". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value 2 for foreign type single-float". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value -32769 for foreign type unsigned-16". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value 65536 for foreign type unsigned-16". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value 256 for foreign type integer-8". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value -129 for foreign type integer-8". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value 65536 for foreign type integer-16". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value -32769 for foreign type integer-16". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value 256 for foreign type integer-8". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value -129 for foreign type integer-8". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value 65536 for foreign type integer-16". | ||
|  | ! record.mo:Expected error in mat record17: "invalid value -32769 for foreign type integer-16". | ||
|  |   record.mo:Expected error in mat foreign-data: "foreign-alloc: 0 is not a positive fixnum". | ||
|  |   record.mo:Expected error in mat foreign-data: "foreign-alloc: <int> is not a positive fixnum". | ||
|  |   record.mo:Expected error in mat foreign-data: "foreign-alloc: -5 is not a positive fixnum". | ||
|  | --- 7609,7634 ---- | ||
|  |   record.mo:Expected error in mat record10: "read: unresolvable cycle constructing record of type #<record type bar> at char 3 of #<input port string>". | ||
|  |   record.mo:Expected error in mat record16: "read: unresolvable cycle constructing record of type #<record type bazar> at char 3 of #<input port string>". | ||
|  |   record.mo:Expected error in mat record16: "read: unresolvable cycle constructing record of type #<record type bazar> at char 3 of #<input port string>". | ||
|  | ! record.mo:Expected error in mat record17: "make-$froz: invalid value 256 for foreign type unsigned-8". | ||
|  | ! record.mo:Expected error in mat record17: "make-$froz: invalid value -129 for foreign type unsigned-8". | ||
|  | ! record.mo:Expected error in mat record17: "make-$froz: invalid value 65536 for foreign type unsigned-16". | ||
|  | ! record.mo:Expected error in mat record17: "make-$froz: invalid value -32769 for foreign type unsigned-16". | ||
|  | ! record.mo:Expected error in mat record17: "make-$froz: invalid value 2 for foreign type double-float". | ||
|  | ! record.mo:Expected error in mat record17: "make-$froz: invalid value 3 for foreign type single-float". | ||
|  | ! record.mo:Expected error in mat record17: "set-$froz-x!: invalid value 256 for foreign type unsigned-8". | ||
|  | ! record.mo:Expected error in mat record17: "set-$froz-x!: invalid value -129 for foreign type unsigned-8". | ||
|  | ! record.mo:Expected error in mat record17: "set-$froz-y!: invalid value 2 for foreign type double-float". | ||
|  | ! record.mo:Expected error in mat record17: "set-$froz-z!: invalid value 2 for foreign type single-float". | ||
|  | ! record.mo:Expected error in mat record17: "set-$froz-w!: invalid value -32769 for foreign type unsigned-16". | ||
|  | ! record.mo:Expected error in mat record17: "set-$froz-w!: invalid value 65536 for foreign type unsigned-16". | ||
|  | ! record.mo:Expected error in mat record17: "make-$froz: invalid value 256 for foreign type integer-8". | ||
|  | ! record.mo:Expected error in mat record17: "make-$froz: invalid value -129 for foreign type integer-8". | ||
|  | ! record.mo:Expected error in mat record17: "make-$froz: invalid value 65536 for foreign type integer-16". | ||
|  | ! record.mo:Expected error in mat record17: "make-$froz: invalid value -32769 for foreign type integer-16". | ||
|  | ! record.mo:Expected error in mat record17: "set-$froz-x!: invalid value 256 for foreign type integer-8". | ||
|  | ! record.mo:Expected error in mat record17: "set-$froz-x!: invalid value -129 for foreign type integer-8". | ||
|  | ! record.mo:Expected error in mat record17: "set-$froz-w!: invalid value 65536 for foreign type integer-16". | ||
|  | ! record.mo:Expected error in mat record17: "set-$froz-w!: invalid value -32769 for foreign type integer-16". | ||
|  |   record.mo:Expected error in mat foreign-data: "foreign-alloc: 0 is not a positive fixnum". | ||
|  |   record.mo:Expected error in mat foreign-data: "foreign-alloc: <int> is not a positive fixnum". | ||
|  |   record.mo:Expected error in mat foreign-data: "foreign-alloc: -5 is not a positive fixnum". | ||
|  | *************** | ||
|  | *** 7763,7801 **** | ||
|  |   record.mo:Expected error in mat record22: "invalid field specifier (immutable creepy q)". | ||
|  |   record.mo:Expected error in mat record22: "invalid field specifier (immutable creepy q)". | ||
|  |   record.mo:Expected error in mat record23: "make-record-type: cannot extend sealed record type #<record type foo>". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 1.0 for foreign type int". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 2.0 for foreign type unsigned". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value three for foreign type unsigned-int". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 1/4 for foreign type short". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value "five" for foreign type unsigned-short". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value (6) for foreign type long". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value #(a b c d e f ...) for foreign type unsigned-long". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value ate for foreign type iptr". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value #\9 for foreign type uptr". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 10 for foreign type float". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 11.0+0.0i for foreign type double". | ||
|  |   record.mo:Expected error in mat record25: "incorrect number of arguments to #<procedure make-r25-bar>". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 12.0 for foreign type long-long". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 13.0 for foreign type unsigned-long-long". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type int". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type unsigned". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type unsigned-int". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type short". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type unsigned-short". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type long". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type unsigned-long". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type iptr". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type uptr". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3 for foreign type float". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3 for foreign type double". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type char". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type wchar". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type fixnum". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type void*". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type long-long". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type unsigned-long-long". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value <int> for foreign type int". | ||
|  | ! record.mo:Expected error in mat record25: "invalid value <-int> for foreign type int". | ||
|  |   record.mo:Expected error in mat record?: "record?: 4 is not a record type descriptor". | ||
|  |   record.mo:Expected error in mat record?: "record?: a is not a record type descriptor". | ||
|  |   record.mo:Expected error in mat record?: "record?: #(1) is not a record type descriptor". | ||
|  | --- 7763,7801 ---- | ||
|  |   record.mo:Expected error in mat record22: "invalid field specifier (immutable creepy q)". | ||
|  |   record.mo:Expected error in mat record22: "invalid field specifier (immutable creepy q)". | ||
|  |   record.mo:Expected error in mat record23: "make-record-type: cannot extend sealed record type #<record type foo>". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 1.0 for foreign type int". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 2.0 for foreign type unsigned". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value three for foreign type unsigned-int". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 1/4 for foreign type short". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value "five" for foreign type unsigned-short". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value (6) for foreign type long". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value #(a b c d e f ...) for foreign type unsigned-long". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value ate for foreign type iptr". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value #\9 for foreign type uptr". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 10 for foreign type float". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 11.0+0.0i for foreign type double". | ||
|  |   record.mo:Expected error in mat record25: "incorrect number of arguments to #<procedure make-r25-bar>". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 12.0 for foreign type long-long". | ||
|  | ! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 13.0 for foreign type unsigned-long-long". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-a!: invalid value 3.0 for foreign type int". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-b!: invalid value 3.0 for foreign type unsigned". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-c!: invalid value 3.0 for foreign type unsigned-int". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-d!: invalid value 3.0 for foreign type short". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-e!: invalid value 3.0 for foreign type unsigned-short". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-f!: invalid value 3.0 for foreign type long". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-g!: invalid value 3.0 for foreign type unsigned-long". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-h!: invalid value 3.0 for foreign type iptr". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-i!: invalid value 3.0 for foreign type uptr". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-j!: invalid value 3 for foreign type float". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-k!: invalid value 3 for foreign type double". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-m!: invalid value 3.0 for foreign type char". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-n!: invalid value 3.0 for foreign type wchar". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-o!: invalid value 3.0 for foreign type fixnum". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-p!: invalid value 3.0 for foreign type void*". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-r!: invalid value 3.0 for foreign type long-long". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-s!: invalid value 3.0 for foreign type unsigned-long-long". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-a!: invalid value <int> for foreign type int". | ||
|  | ! record.mo:Expected error in mat record25: "set-r25-bar-a!: invalid value <-int> for foreign type int". | ||
|  |   record.mo:Expected error in mat record?: "record?: 4 is not a record type descriptor". | ||
|  |   record.mo:Expected error in mat record?: "record?: a is not a record type descriptor". | ||
|  |   record.mo:Expected error in mat record?: "record?: #(1) is not a record type descriptor". | ||
|  | *************** | ||
|  | *** 7810,7866 **** | ||
|  |   record.mo:Expected error in mat r6rs-records-procedural: "make-record-constructor-descriptor: invalid protocol flimflam". | ||
|  |   record.mo:Expected error in mat r6rs-records-procedural: "attempt to apply non-procedure not-a-procedure". | ||
|  |   record.mo:Expected error in mat r6rs-records-procedural: "attempt to apply non-procedure spam". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments to #<procedure constructor>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments to #<procedure constructor>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments to #<procedure>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments to #<procedure>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments to #<procedure>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments to #<procedure>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments to #<procedure constructor>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments to #<procedure constructor>". | ||
|  |   record.mo:Expected error in mat r6rs-records-procedural: "make-record-constructor-descriptor: record constructor descriptor #<record constructor descriptor> is not for parent of record type #<record type grand-child>". | ||
|  |   record.mo:Expected error in mat r6rs-records-procedural: "make-record-type-descriptor: cannot extend sealed record type #<record type bar>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "invalid syntax point". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure constructor>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure constructor>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure constructor>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure predicate>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure predicate>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "variable point-x-set! is not bound". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "variable point-y-set! is not bound". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure accessor>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure accessor>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "record-mutator: field 0 of #<record type point> is immutable". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "record-mutator: field 1 of #<record type point> is immutable". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "invalid syntax point". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure constructor>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure constructor>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure constructor>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure predicate>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure predicate>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "variable point-x-set! is not bound". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "variable point-y-set! is not bound". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure accessor>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure accessor>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure mutator>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure mutator>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure mutator>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure mutator>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure mutator>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure mutator>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure mutator>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure mutator>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure mutator>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "record-rtd: #<ex3> is not a record". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "record-rtd: #<ex3> is not a record". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "parent record type is sealed ex3". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "#<record of type point> is not of type #<record type point>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "#<record of type cpoint> is not of type #<record type point>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "#<record of type cpoint> is not of type #<record type cpoint>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "#<record of type cpoint> is not of type #<record type cpoint>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "#<record of type cpoint> is not of type #<record type cpoint>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "cannot extend define-record-type parent fratrat". | ||
|  | --- 7810,7866 ---- | ||
|  |   record.mo:Expected error in mat r6rs-records-procedural: "make-record-constructor-descriptor: invalid protocol flimflam". | ||
|  |   record.mo:Expected error in mat r6rs-records-procedural: "attempt to apply non-procedure not-a-procedure". | ||
|  |   record.mo:Expected error in mat r6rs-records-procedural: "attempt to apply non-procedure spam". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments to #<procedure n>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments to #<procedure n>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments to #<procedure pcons>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments to #<procedure pcons>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect argument count in call (ccons 1)". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect argument count in call (ccons 1 2 3)". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect argument count in call (n (+ z 7) w "what?")". | ||
|  | ! record.mo:Expected error in mat r6rs-records-procedural: "incorrect argument count in call ((p x 17) y (quote #(oops)))". | ||
|  |   record.mo:Expected error in mat r6rs-records-procedural: "make-record-constructor-descriptor: record constructor descriptor #<record constructor descriptor> is not for parent of record type #<record type grand-child>". | ||
|  |   record.mo:Expected error in mat r6rs-records-procedural: "make-record-type-descriptor: cannot extend sealed record type #<record type bar>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "invalid syntax point". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure make-point>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure make-point>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure make-point>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure point?>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure point?>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "variable point-x-set! is not bound". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "variable point-y-set! is not bound". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure point-x>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure point-y>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "record-mutator: field 0 of #<record type point> is immutable". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "record-mutator: field 1 of #<record type point> is immutable". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "invalid syntax point". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure make-point>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure make-point>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure make-point>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure point?>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure point?>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "variable point-x-set! is not bound". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "variable point-y-set! is not bound". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure point-x>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure point-y>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure frob-widget-set!>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure frob-widget-set!>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure frob-widget-set!>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure frob-widget-set!>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure frob-widget-set!>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure frob-widget-set!>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure setwid!>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure setwid!>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments to #<procedure setwid!>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "record-rtd: #<ex3> is not a record". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "record-rtd: #<ex3> is not a record". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "parent record type is sealed ex3". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "point-x: #<record of type point> is not of type #<record type point>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "point-x: #<record of type cpoint> is not of type #<record type point>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "cpoint-rgb: #<record of type cpoint> is not of type #<record type cpoint>". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "cpoint-rgb: #<record of type cpoint> is not of type #<record type cpoint>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". | ||
|  | ! record.mo:Expected error in mat r6rs-records-syntactic: "cpoint-rgb: #<record of type cpoint> is not of type #<record type cpoint>". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". | ||
|  |   record.mo:Expected error in mat r6rs-records-syntactic: "cannot extend define-record-type parent fratrat". |