1*** errors-compile-0-f-f-f 2021-02-23 12:07:37.000000000 -0700 2--- errors-compile-0-f-t-f 2021-02-23 11:37:54.000000000 -0700 3*************** 4*** 200,206 **** 5 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". 6 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable c". 7 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable m". 8! 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". 9 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable y". 10 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". 11 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". 12--- 200,206 ---- 13 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". 14 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable c". 15 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable m". 16! 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable b". 17 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable y". 18 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". 19 3.mo:Expected error in mat dipa-letrec: "attempt to reference undefined variable a". 20*************** 21*** 219,225 **** 22 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable b". 23 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable a". 24 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable g". 25! 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable f". 26 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable f". 27 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable c". 28 3.mo:Expected warning in mat cpvalid: "possible attempt to reference undefined variable x". 29--- 219,225 ---- 30 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable b". 31 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable a". 32 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable g". 33! 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable g". 34 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable f". 35 3.mo:Expected error in mat cpvalid: "attempt to reference undefined variable c". 36 3.mo:Expected warning in mat cpvalid: "possible attempt to reference undefined variable x". 37*************** 38*** 266,275 **** 39 3.mo:Expected error in mat mrvs: "returned 3 values to single value return context". 40 3.mo:Expected error in mat mrvs: "returned 3 values to single value return context". 41 3.mo:Expected error in mat mrvs: "returned 0 values to single value return context". 42! 3.mo:Expected error in mat mrvs: "incorrect number of values received in multiple value context". 43! 3.mo:Expected error in mat mrvs: "returned 0 values to single value return context". 44! 3.mo:Expected error in mat mrvs: "incorrect number of values received in multiple value context". 45! 3.mo:Expected error in mat mrvs: "incorrect number of values received in multiple value context". 46 3.mo:Expected error in mat mrvs: "variable $mrvs-foo is not bound". 47 3.mo:Expected error in mat mrvs: "attempt to apply non-procedure 17". 48 3.mo:Expected error in mat mrvs: "returned 2 values to single value return context". 49--- 266,275 ---- 50 3.mo:Expected error in mat mrvs: "returned 3 values to single value return context". 51 3.mo:Expected error in mat mrvs: "returned 3 values to single value return context". 52 3.mo:Expected error in mat mrvs: "returned 0 values to single value return context". 53! 3.mo:Expected error in mat mrvs: "incorrect argument count in call (call-with-values (lambda () 5 (values 2)) (lambda (x y) (+ x y)))". 54! 3.mo:Expected error in mat mrvs: "incorrect argument count in call (call-with-values values (lambda (x) x))". 55! 3.mo:Expected error in mat mrvs: "incorrect argument count in call (call-with-values values (lambda (x y) x))". 56! 3.mo:Expected error in mat mrvs: "incorrect argument count in call (call-with-values f (lambda (x y) x))". 57 3.mo:Expected error in mat mrvs: "variable $mrvs-foo is not bound". 58 3.mo:Expected error in mat mrvs: "attempt to apply non-procedure 17". 59 3.mo:Expected error in mat mrvs: "returned 2 values to single value return context". 60*************** 61*** 4037,4043 **** 62 misc.mo:Expected error in mat cpletrec: "foreign-procedure: no entry for "foo"". 63 misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable q". 64 misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable bar". 65! misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable foo at line 1, char 108 of testfile.ss". 66 misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable b". 67 misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable b". 68 misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable a". 69--- 4037,4043 ---- 70 misc.mo:Expected error in mat cpletrec: "foreign-procedure: no entry for "foo"". 71 misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable q". 72 misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable bar". 73! misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable bar at line 1, char 76 of testfile.ss". 74 misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable b". 75 misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable b". 76 misc.mo:Expected error in mat cpletrec: "attempt to reference undefined variable a". 77*************** 78*** 7666,7673 **** 79 7.mo:Expected error in mat bytes-allocated: "bytes-allocated: invalid space gnu". 80 7.mo:Expected error in mat error: "a: hit me!". 81 7.mo:Expected error in mat error: "f: n is 0". 82! record.mo:Expected error in mat record1: "invalid value 3 for foreign type double-float". 83! record.mo:Expected error in mat record1: "3 is not of type #<record type fudge>". 84 record.mo:Expected error in mat record2: "invalid value 3 for foreign type double-float". 85 record.mo:Expected error in mat record2: "3 is not of type #<record type fudge>". 86 record.mo:Expected error in mat record2: "make-record-type: invalid field list ((immutable double-float a) . b)". 87--- 7666,7673 ---- 88 7.mo:Expected error in mat bytes-allocated: "bytes-allocated: invalid space gnu". 89 7.mo:Expected error in mat error: "a: hit me!". 90 7.mo:Expected error in mat error: "f: n is 0". 91! record.mo:Expected error in mat record1: "make-fudge: invalid value 3 for foreign type double-float". 92! record.mo:Expected error in mat record1: "fudge-a: 3 is not of type #<record type fudge>". 93 record.mo:Expected error in mat record2: "invalid value 3 for foreign type double-float". 94 record.mo:Expected error in mat record2: "3 is not of type #<record type fudge>". 95 record.mo:Expected error in mat record2: "make-record-type: invalid field list ((immutable double-float a) . b)". 96*************** 97*** 7675,7689 **** 98 record.mo:Expected error in mat type-descriptor: "invalid syntax (type-descriptor 3)". 99 record.mo:Expected error in mat type-descriptor: "type-descriptor: unrecognized record car". 100 record.mo:Expected error in mat record3: "variable set-fudge-a! is not bound". 101! record.mo:Expected error in mat record4: "3 is not of type #<record type fudge>". 102! record.mo:Expected error in mat record5: "invalid value 4 for foreign type double-float". 103! record.mo:Expected error in mat record5: "invalid value 4 for foreign type double-float". 104! record.mo:Expected error in mat record6: "invalid value <int> for foreign type integer-32". 105! record.mo:Expected error in mat record6: "invalid value <-int> for foreign type integer-32". 106! record.mo:Expected error in mat record6: "invalid value 23.0 for foreign type integer-32". 107! record.mo:Expected error in mat record7: "invalid value <int> for foreign type unsigned-32". 108! record.mo:Expected error in mat record7: "invalid value <-int> for foreign type unsigned-32". 109! record.mo:Expected error in mat record7: "invalid value 23.0 for foreign type unsigned-32". 110 record.mo:Expected error in mat record9: "record-reader: invalid input #f". 111 record.mo:Expected error in mat record9: "record-reader: invalid second argument fudge". 112 record.mo:Expected error in mat record9: "record-reader: invalid second argument fudge". 113--- 7675,7689 ---- 114 record.mo:Expected error in mat type-descriptor: "invalid syntax (type-descriptor 3)". 115 record.mo:Expected error in mat type-descriptor: "type-descriptor: unrecognized record car". 116 record.mo:Expected error in mat record3: "variable set-fudge-a! is not bound". 117! record.mo:Expected error in mat record4: "set-fudge-a!: 3 is not of type #<record type fudge>". 118! record.mo:Expected error in mat record5: "set-fudge-b!: invalid value 4 for foreign type double-float". 119! record.mo:Expected error in mat record5: "set-fudge-b!: invalid value 4 for foreign type double-float". 120! record.mo:Expected error in mat record6: "make-bar: invalid value <int> for foreign type integer-32". 121! record.mo:Expected error in mat record6: "make-bar: invalid value <-int> for foreign type integer-32". 122! record.mo:Expected error in mat record6: "make-bar: invalid value 23.0 for foreign type integer-32". 123! record.mo:Expected error in mat record7: "make-bar: invalid value <int> for foreign type unsigned-32". 124! record.mo:Expected error in mat record7: "make-bar: invalid value <-int> for foreign type unsigned-32". 125! record.mo:Expected error in mat record7: "make-bar: invalid value 23.0 for foreign type unsigned-32". 126 record.mo:Expected error in mat record9: "record-reader: invalid input #f". 127 record.mo:Expected error in mat record9: "record-reader: invalid second argument fudge". 128 record.mo:Expected error in mat record9: "record-reader: invalid second argument fudge". 129*************** 130*** 7696,7721 **** 131 record.mo:Expected error in mat record10: "read: unresolvable cycle constructing record of type #<record type bar> at char 3 of #<input port string>". 132 record.mo:Expected error in mat record16: "read: unresolvable cycle constructing record of type #<record type bazar> at char 3 of #<input port string>". 133 record.mo:Expected error in mat record16: "read: unresolvable cycle constructing record of type #<record type bazar> at char 3 of #<input port string>". 134! record.mo:Expected error in mat record17: "invalid value 256 for foreign type unsigned-8". 135! record.mo:Expected error in mat record17: "invalid value -129 for foreign type unsigned-8". 136! record.mo:Expected error in mat record17: "invalid value 65536 for foreign type unsigned-16". 137! record.mo:Expected error in mat record17: "invalid value -32769 for foreign type unsigned-16". 138! record.mo:Expected error in mat record17: "invalid value 2 for foreign type double-float". 139! record.mo:Expected error in mat record17: "invalid value 3 for foreign type single-float". 140! record.mo:Expected error in mat record17: "invalid value 256 for foreign type unsigned-8". 141! record.mo:Expected error in mat record17: "invalid value -129 for foreign type unsigned-8". 142! record.mo:Expected error in mat record17: "invalid value 2 for foreign type double-float". 143! record.mo:Expected error in mat record17: "invalid value 2 for foreign type single-float". 144! record.mo:Expected error in mat record17: "invalid value -32769 for foreign type unsigned-16". 145! record.mo:Expected error in mat record17: "invalid value 65536 for foreign type unsigned-16". 146! record.mo:Expected error in mat record17: "invalid value 256 for foreign type integer-8". 147! record.mo:Expected error in mat record17: "invalid value -129 for foreign type integer-8". 148! record.mo:Expected error in mat record17: "invalid value 65536 for foreign type integer-16". 149! record.mo:Expected error in mat record17: "invalid value -32769 for foreign type integer-16". 150! record.mo:Expected error in mat record17: "invalid value 256 for foreign type integer-8". 151! record.mo:Expected error in mat record17: "invalid value -129 for foreign type integer-8". 152! record.mo:Expected error in mat record17: "invalid value 65536 for foreign type integer-16". 153! record.mo:Expected error in mat record17: "invalid value -32769 for foreign type integer-16". 154 record.mo:Expected error in mat foreign-data: "foreign-alloc: 0 is not a positive fixnum". 155 record.mo:Expected error in mat foreign-data: "foreign-alloc: <int> is not a positive fixnum". 156 record.mo:Expected error in mat foreign-data: "foreign-alloc: -5 is not a positive fixnum". 157--- 7696,7721 ---- 158 record.mo:Expected error in mat record10: "read: unresolvable cycle constructing record of type #<record type bar> at char 3 of #<input port string>". 159 record.mo:Expected error in mat record16: "read: unresolvable cycle constructing record of type #<record type bazar> at char 3 of #<input port string>". 160 record.mo:Expected error in mat record16: "read: unresolvable cycle constructing record of type #<record type bazar> at char 3 of #<input port string>". 161! record.mo:Expected error in mat record17: "make-$froz: invalid value 256 for foreign type unsigned-8". 162! record.mo:Expected error in mat record17: "make-$froz: invalid value -129 for foreign type unsigned-8". 163! record.mo:Expected error in mat record17: "make-$froz: invalid value 65536 for foreign type unsigned-16". 164! record.mo:Expected error in mat record17: "make-$froz: invalid value -32769 for foreign type unsigned-16". 165! record.mo:Expected error in mat record17: "make-$froz: invalid value 2 for foreign type double-float". 166! record.mo:Expected error in mat record17: "make-$froz: invalid value 3 for foreign type single-float". 167! record.mo:Expected error in mat record17: "set-$froz-x!: invalid value 256 for foreign type unsigned-8". 168! record.mo:Expected error in mat record17: "set-$froz-x!: invalid value -129 for foreign type unsigned-8". 169! record.mo:Expected error in mat record17: "set-$froz-y!: invalid value 2 for foreign type double-float". 170! record.mo:Expected error in mat record17: "set-$froz-z!: invalid value 2 for foreign type single-float". 171! record.mo:Expected error in mat record17: "set-$froz-w!: invalid value -32769 for foreign type unsigned-16". 172! record.mo:Expected error in mat record17: "set-$froz-w!: invalid value 65536 for foreign type unsigned-16". 173! record.mo:Expected error in mat record17: "make-$froz: invalid value 256 for foreign type integer-8". 174! record.mo:Expected error in mat record17: "make-$froz: invalid value -129 for foreign type integer-8". 175! record.mo:Expected error in mat record17: "make-$froz: invalid value 65536 for foreign type integer-16". 176! record.mo:Expected error in mat record17: "make-$froz: invalid value -32769 for foreign type integer-16". 177! record.mo:Expected error in mat record17: "set-$froz-x!: invalid value 256 for foreign type integer-8". 178! record.mo:Expected error in mat record17: "set-$froz-x!: invalid value -129 for foreign type integer-8". 179! record.mo:Expected error in mat record17: "set-$froz-w!: invalid value 65536 for foreign type integer-16". 180! record.mo:Expected error in mat record17: "set-$froz-w!: invalid value -32769 for foreign type integer-16". 181 record.mo:Expected error in mat foreign-data: "foreign-alloc: 0 is not a positive fixnum". 182 record.mo:Expected error in mat foreign-data: "foreign-alloc: <int> is not a positive fixnum". 183 record.mo:Expected error in mat foreign-data: "foreign-alloc: -5 is not a positive fixnum". 184*************** 185*** 7850,7888 **** 186 record.mo:Expected error in mat record22: "invalid field specifier (immutable creepy q)". 187 record.mo:Expected error in mat record22: "invalid field specifier (immutable creepy q)". 188 record.mo:Expected error in mat record23: "make-record-type: cannot extend sealed record type #<record type foo> as bar". 189! record.mo:Expected error in mat record25: "invalid value 1.0 for foreign type int". 190! record.mo:Expected error in mat record25: "invalid value 2.0 for foreign type unsigned". 191! record.mo:Expected error in mat record25: "invalid value three for foreign type unsigned-int". 192! record.mo:Expected error in mat record25: "invalid value 1/4 for foreign type short". 193! record.mo:Expected error in mat record25: "invalid value "five" for foreign type unsigned-short". 194! record.mo:Expected error in mat record25: "invalid value (6) for foreign type long". 195! record.mo:Expected error in mat record25: "invalid value #(a b c d e f ...) for foreign type unsigned-long". 196! record.mo:Expected error in mat record25: "invalid value ate for foreign type iptr". 197! record.mo:Expected error in mat record25: "invalid value #\9 for foreign type uptr". 198! record.mo:Expected error in mat record25: "invalid value 10 for foreign type float". 199! record.mo:Expected error in mat record25: "invalid value 11.0+0.0i for foreign type double". 200 record.mo:Expected error in mat record25: "incorrect number of arguments 18 to #<procedure make-r25-bar>". 201! record.mo:Expected error in mat record25: "invalid value 12.0 for foreign type long-long". 202! record.mo:Expected error in mat record25: "invalid value 13.0 for foreign type unsigned-long-long". 203! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type int". 204! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type unsigned". 205! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type unsigned-int". 206! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type short". 207! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type unsigned-short". 208! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type long". 209! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type unsigned-long". 210! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type iptr". 211! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type uptr". 212! record.mo:Expected error in mat record25: "invalid value 3 for foreign type float". 213! record.mo:Expected error in mat record25: "invalid value 3 for foreign type double". 214! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type char". 215! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type wchar". 216! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type fixnum". 217! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type void*". 218! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type long-long". 219! record.mo:Expected error in mat record25: "invalid value 3.0 for foreign type unsigned-long-long". 220! record.mo:Expected error in mat record25: "invalid value <int> for foreign type int". 221! record.mo:Expected error in mat record25: "invalid value <-int> for foreign type int". 222 record.mo:Expected error in mat record?: "record?: 4 is not a record type descriptor". 223 record.mo:Expected error in mat record?: "record?: a is not a record type descriptor". 224 record.mo:Expected error in mat record?: "record?: #(1) is not a record type descriptor". 225--- 7850,7888 ---- 226 record.mo:Expected error in mat record22: "invalid field specifier (immutable creepy q)". 227 record.mo:Expected error in mat record22: "invalid field specifier (immutable creepy q)". 228 record.mo:Expected error in mat record23: "make-record-type: cannot extend sealed record type #<record type foo> as bar". 229! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 1.0 for foreign type int". 230! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 2.0 for foreign type unsigned". 231! record.mo:Expected error in mat record25: "make-r25-bar: invalid value three for foreign type unsigned-int". 232! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 1/4 for foreign type short". 233! record.mo:Expected error in mat record25: "make-r25-bar: invalid value "five" for foreign type unsigned-short". 234! record.mo:Expected error in mat record25: "make-r25-bar: invalid value (6) for foreign type long". 235! record.mo:Expected error in mat record25: "make-r25-bar: invalid value #(a b c d e f ...) for foreign type unsigned-long". 236! record.mo:Expected error in mat record25: "make-r25-bar: invalid value ate for foreign type iptr". 237! record.mo:Expected error in mat record25: "make-r25-bar: invalid value #\9 for foreign type uptr". 238! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 10 for foreign type float". 239! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 11.0+0.0i for foreign type double". 240 record.mo:Expected error in mat record25: "incorrect number of arguments 18 to #<procedure make-r25-bar>". 241! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 12.0 for foreign type long-long". 242! record.mo:Expected error in mat record25: "make-r25-bar: invalid value 13.0 for foreign type unsigned-long-long". 243! record.mo:Expected error in mat record25: "set-r25-bar-a!: invalid value 3.0 for foreign type int". 244! record.mo:Expected error in mat record25: "set-r25-bar-b!: invalid value 3.0 for foreign type unsigned". 245! record.mo:Expected error in mat record25: "set-r25-bar-c!: invalid value 3.0 for foreign type unsigned-int". 246! record.mo:Expected error in mat record25: "set-r25-bar-d!: invalid value 3.0 for foreign type short". 247! record.mo:Expected error in mat record25: "set-r25-bar-e!: invalid value 3.0 for foreign type unsigned-short". 248! record.mo:Expected error in mat record25: "set-r25-bar-f!: invalid value 3.0 for foreign type long". 249! record.mo:Expected error in mat record25: "set-r25-bar-g!: invalid value 3.0 for foreign type unsigned-long". 250! record.mo:Expected error in mat record25: "set-r25-bar-h!: invalid value 3.0 for foreign type iptr". 251! record.mo:Expected error in mat record25: "set-r25-bar-i!: invalid value 3.0 for foreign type uptr". 252! record.mo:Expected error in mat record25: "set-r25-bar-j!: invalid value 3 for foreign type float". 253! record.mo:Expected error in mat record25: "set-r25-bar-k!: invalid value 3 for foreign type double". 254! record.mo:Expected error in mat record25: "set-r25-bar-m!: invalid value 3.0 for foreign type char". 255! record.mo:Expected error in mat record25: "set-r25-bar-n!: invalid value 3.0 for foreign type wchar". 256! record.mo:Expected error in mat record25: "set-r25-bar-o!: invalid value 3.0 for foreign type fixnum". 257! record.mo:Expected error in mat record25: "set-r25-bar-p!: invalid value 3.0 for foreign type void*". 258! record.mo:Expected error in mat record25: "set-r25-bar-r!: invalid value 3.0 for foreign type long-long". 259! record.mo:Expected error in mat record25: "set-r25-bar-s!: invalid value 3.0 for foreign type unsigned-long-long". 260! record.mo:Expected error in mat record25: "set-r25-bar-a!: invalid value <int> for foreign type int". 261! record.mo:Expected error in mat record25: "set-r25-bar-a!: invalid value <-int> for foreign type int". 262 record.mo:Expected error in mat record?: "record?: 4 is not a record type descriptor". 263 record.mo:Expected error in mat record?: "record?: a is not a record type descriptor". 264 record.mo:Expected error in mat record?: "record?: #(1) is not a record type descriptor". 265*************** 266*** 7897,7953 **** 267 record.mo:Expected error in mat r6rs-records-procedural: "make-record-constructor-descriptor: invalid protocol flimflam". 268 record.mo:Expected error in mat r6rs-records-procedural: "attempt to apply non-procedure not-a-procedure". 269 record.mo:Expected error in mat r6rs-records-procedural: "attempt to apply non-procedure spam". 270! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments 4 to #<procedure constructor>". 271! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments 2 to #<procedure constructor>". 272 record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments 3 to #<procedure>". 273 record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments 1 to #<procedure>". 274! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments 1 to #<procedure>". 275! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments 3 to #<procedure>". 276! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments 3 to #<procedure constructor>". 277! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments 4 to #<procedure constructor>". 278 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>". 279 record.mo:Expected error in mat r6rs-records-procedural: "make-record-type-descriptor: cannot extend sealed record type #<record type bar> as foo". 280 record.mo:Expected error in mat r6rs-records-syntactic: "invalid syntax point". 281! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure constructor>". 282! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 1 to #<procedure constructor>". 283! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 3 to #<procedure constructor>". 284! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure predicate>". 285! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 2 to #<procedure predicate>". 286 record.mo:Expected error in mat r6rs-records-syntactic: "variable point-x-set! is not bound". 287 record.mo:Expected error in mat r6rs-records-syntactic: "variable point-y-set! is not bound". 288! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure accessor>". 289! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 2 to #<procedure accessor>". 290 record.mo:Expected error in mat r6rs-records-syntactic: "record-mutator: field 0 of #<record type point> is immutable". 291 record.mo:Expected error in mat r6rs-records-syntactic: "record-mutator: field 1 of #<record type point> is immutable". 292 record.mo:Expected error in mat r6rs-records-syntactic: "invalid syntax point". 293! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure constructor>". 294! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 1 to #<procedure constructor>". 295! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 3 to #<procedure constructor>". 296! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure predicate>". 297! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 2 to #<procedure predicate>". 298 record.mo:Expected error in mat r6rs-records-syntactic: "variable point-x-set! is not bound". 299 record.mo:Expected error in mat r6rs-records-syntactic: "variable point-y-set! is not bound". 300! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure accessor>". 301! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 2 to #<procedure accessor>". 302! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure mutator>". 303! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 1 to #<procedure mutator>". 304! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 3 to #<procedure mutator>". 305! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure mutator>". 306! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 1 to #<procedure mutator>". 307! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 3 to #<procedure mutator>". 308! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure mutator>". 309! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 1 to #<procedure mutator>". 310! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 3 to #<procedure mutator>". 311 record.mo:Expected error in mat r6rs-records-syntactic: "record-rtd: #<ex3> is not a record". 312 record.mo:Expected error in mat r6rs-records-syntactic: "record-rtd: #<ex3> is not a record". 313 record.mo:Expected error in mat r6rs-records-syntactic: "parent record type is sealed ex3". 314! record.mo:Expected error in mat r6rs-records-syntactic: "#<record of type point> is not of type #<record type point>". 315! record.mo:Expected error in mat r6rs-records-syntactic: "#<record of type cpoint> is not of type #<record type point>". 316! record.mo:Expected error in mat r6rs-records-syntactic: "#<record of type cpoint> is not of type #<record type cpoint>". 317! record.mo:Expected error in mat r6rs-records-syntactic: "#<record of type cpoint> is not of type #<record type cpoint>". 318 record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". 319 record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". 320! record.mo:Expected error in mat r6rs-records-syntactic: "#<record of type cpoint> is not of type #<record type cpoint>". 321 record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". 322 record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". 323 record.mo:Expected error in mat r6rs-records-syntactic: "cannot extend define-record-type parent fratrat". 324--- 7897,7953 ---- 325 record.mo:Expected error in mat r6rs-records-procedural: "make-record-constructor-descriptor: invalid protocol flimflam". 326 record.mo:Expected error in mat r6rs-records-procedural: "attempt to apply non-procedure not-a-procedure". 327 record.mo:Expected error in mat r6rs-records-procedural: "attempt to apply non-procedure spam". 328! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments 3 to #<procedure n>". 329! record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments 1 to #<procedure n>". 330 record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments 3 to #<procedure>". 331 record.mo:Expected error in mat r6rs-records-procedural: "incorrect number of arguments 1 to #<procedure>". 332! record.mo:Expected error in mat r6rs-records-procedural: "incorrect argument count in call (ccons 1)". 333! record.mo:Expected error in mat r6rs-records-procedural: "incorrect argument count in call (ccons 1 2 3)". 334! record.mo:Expected error in mat r6rs-records-procedural: "incorrect argument count in call (n (+ z 7) w "what?")". 335! record.mo:Expected error in mat r6rs-records-procedural: "incorrect argument count in call ((p x 17) y (quote #(oops)))". 336 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>". 337 record.mo:Expected error in mat r6rs-records-procedural: "make-record-type-descriptor: cannot extend sealed record type #<record type bar> as foo". 338 record.mo:Expected error in mat r6rs-records-syntactic: "invalid syntax point". 339! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure make-point>". 340! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 1 to #<procedure make-point>". 341! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 3 to #<procedure make-point>". 342! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure point?>". 343! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 2 to #<procedure point?>". 344 record.mo:Expected error in mat r6rs-records-syntactic: "variable point-x-set! is not bound". 345 record.mo:Expected error in mat r6rs-records-syntactic: "variable point-y-set! is not bound". 346! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure point-x>". 347! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 2 to #<procedure point-y>". 348 record.mo:Expected error in mat r6rs-records-syntactic: "record-mutator: field 0 of #<record type point> is immutable". 349 record.mo:Expected error in mat r6rs-records-syntactic: "record-mutator: field 1 of #<record type point> is immutable". 350 record.mo:Expected error in mat r6rs-records-syntactic: "invalid syntax point". 351! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure make-point>". 352! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 1 to #<procedure make-point>". 353! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 3 to #<procedure make-point>". 354! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure point?>". 355! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 2 to #<procedure point?>". 356 record.mo:Expected error in mat r6rs-records-syntactic: "variable point-x-set! is not bound". 357 record.mo:Expected error in mat r6rs-records-syntactic: "variable point-y-set! is not bound". 358! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure point-x>". 359! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 2 to #<procedure point-y>". 360! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure frob-widget-set!>". 361! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 1 to #<procedure frob-widget-set!>". 362! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 3 to #<procedure frob-widget-set!>". 363! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure frob-widget-set!>". 364! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 1 to #<procedure frob-widget-set!>". 365! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 3 to #<procedure frob-widget-set!>". 366! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 0 to #<procedure setwid!>". 367! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 1 to #<procedure setwid!>". 368! record.mo:Expected error in mat r6rs-records-syntactic: "incorrect number of arguments 3 to #<procedure setwid!>". 369 record.mo:Expected error in mat r6rs-records-syntactic: "record-rtd: #<ex3> is not a record". 370 record.mo:Expected error in mat r6rs-records-syntactic: "record-rtd: #<ex3> is not a record". 371 record.mo:Expected error in mat r6rs-records-syntactic: "parent record type is sealed ex3". 372! record.mo:Expected error in mat r6rs-records-syntactic: "point-x: #<record of type point> is not of type #<record type point>". 373! record.mo:Expected error in mat r6rs-records-syntactic: "point-x: #<record of type cpoint> is not of type #<record type point>". 374! record.mo:Expected error in mat r6rs-records-syntactic: "cpoint-rgb: #<record of type cpoint> is not of type #<record type cpoint>". 375! record.mo:Expected error in mat r6rs-records-syntactic: "cpoint-rgb: #<record of type cpoint> is not of type #<record type cpoint>". 376 record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". 377 record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". 378! record.mo:Expected error in mat r6rs-records-syntactic: "cpoint-rgb: #<record of type cpoint> is not of type #<record type cpoint>". 379 record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". 380 record.mo:Expected error in mat r6rs-records-syntactic: "define-record-type: incompatible record type cpoint - different parent". 381 record.mo:Expected error in mat r6rs-records-syntactic: "cannot extend define-record-type parent fratrat". 382