You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
This repo is archived. You can view files and clone it, but cannot push or open issues/pull-requests.
chez-openbsd/mats/patch-interpret-0-t-t-f

518 lines
48 KiB
Plaintext

*** errors-compile-0-t-t-f 2020-02-29 01:54:02.453556198 -0500
--- errors-interpret-0-t-t-f 2020-02-29 02:29:36.435853386 -0500
***************
*** 1,3 ****
--- 1,9 ----
+ 6.mo:Bug in mat cp1in-verify-format-warnings clause 1 at line 1032, char 4 of ../6.ms
+ 6.mo:Bug in mat cp1in-verify-format-warnings clause 2 at line 1034, char 4 of ../6.ms
+ 6.mo:Bug in mat cp1in-verify-format-warnings clause 5 at line 1041, char 4 of ../6.ms
+ 6.mo:Bug in mat cp1in-verify-format-warnings clause 6 at line 1043, char 4 of ../6.ms
+ 6.mo:Bug in mat cp1in-verify-format-warnings clause 9 at line 1050, char 4 of ../6.ms
+ 6.mo:Bug in mat cp1in-verify-format-warnings clause 10 at line 1052, char 4 of ../6.ms
primvars.mo:Expected error testing (environment (quote 0)): Exception in environment: invalid library reference 0
primvars.mo:Expected error testing (environment (quote (a . b))): Exception in environment: invalid library reference (a . b)
primvars.mo:Expected error testing (environment (quote #f)): Exception in environment: invalid library reference #f
***************
*** 18,25 ****
primvars.mo:Expected error testing (environment (quote (chezscheme)) (quote (chezscheme)) (quote #f)): Exception in environment: invalid library reference #f
primvars.mo:Expected error testing (base-exception-handler (quote 0)): Exception in default-exception-handler: 0 is not a procedure
primvars.mo:Expected error testing (base-exception-handler (quote #f)): Exception in default-exception-handler: #f is not a procedure
! primvars.mo:Expected error testing (eval 1.0+2.0i (quote ((a . b)))): Exception in compile: ((a . b)) is not an environment
! primvars.mo:Expected error testing (eval 1.0+2.0i (quote #f)): Exception in compile: #f is not an environment
primvars.mo:Expected error testing (expand 1.0+2.0i (quote ((a . b)))): Exception in sc-expand: ((a . b)) is not an environment
primvars.mo:Expected error testing (expand 1.0+2.0i (quote #f)): Exception in sc-expand: #f is not an environment
primvars.mo:Expected error testing (expand 1.0+2.0i (quote ((a . b))) 1.0+2.0i): Exception in sc-expand: ((a . b)) is not an environment
--- 24,31 ----
primvars.mo:Expected error testing (environment (quote (chezscheme)) (quote (chezscheme)) (quote #f)): Exception in environment: invalid library reference #f
primvars.mo:Expected error testing (base-exception-handler (quote 0)): Exception in default-exception-handler: 0 is not a procedure
primvars.mo:Expected error testing (base-exception-handler (quote #f)): Exception in default-exception-handler: #f is not a procedure
! primvars.mo:Expected error testing (eval 1.0+2.0i (quote ((a . b)))): Exception in interpret: ((a . b)) is not an environment
! primvars.mo:Expected error testing (eval 1.0+2.0i (quote #f)): Exception in interpret: #f is not an environment
primvars.mo:Expected error testing (expand 1.0+2.0i (quote ((a . b)))): Exception in sc-expand: ((a . b)) is not an environment
primvars.mo:Expected error testing (expand 1.0+2.0i (quote #f)): Exception in sc-expand: #f is not an environment
primvars.mo:Expected error testing (expand 1.0+2.0i (quote ((a . b))) 1.0+2.0i): Exception in sc-expand: ((a . b)) is not an environment
***************
*** 54,60 ****
primvars.mo:Expected error in mat make-parameter: "make-parameter: 2 is not a procedure".
primvars.mo:Expected error in mat make-parameter: "+: a is not a number".
primvars.mo:Expected error in mat make-parameter: "incorrect number of arguments to #<procedure>".
! primvars.mo:Expected error in mat parameterize: "incorrect number of arguments to #<procedure x>".
primvars.mo:Expected error in mat collect-generation-radix: "collect-generation-radix: a is not a positive fixnum".
primvars.mo:Expected error in mat collect-generation-radix: "collect-generation-radix: -1 is not a positive fixnum".
primvars.mo:Expected error in mat collect-generation-radix: "collect-generation-radix: 0 is not a positive fixnum".
--- 60,66 ----
primvars.mo:Expected error in mat make-parameter: "make-parameter: 2 is not a procedure".
primvars.mo:Expected error in mat make-parameter: "+: a is not a number".
primvars.mo:Expected error in mat make-parameter: "incorrect number of arguments to #<procedure>".
! primvars.mo:Expected error in mat parameterize: "incorrect number of arguments to #<procedure>".
primvars.mo:Expected error in mat collect-generation-radix: "collect-generation-radix: a is not a positive fixnum".
primvars.mo:Expected error in mat collect-generation-radix: "collect-generation-radix: -1 is not a positive fixnum".
primvars.mo:Expected error in mat collect-generation-radix: "collect-generation-radix: 0 is not a positive fixnum".
***************
*** 81,151 ****
primvars.mo:Expected error in mat print-radix: "print-radix: 1 is not between 2 and 36".
primvars.mo:Expected error in mat timer-interrupt-handler: "timer-interrupt-handler: midnight is not a procedure".
primvars.mo:Expected error in mat trace-output-port: "trace-output-port: #<input port string> is not a textual output port".
! 3.mo:Expected error in mat matrest1: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest2: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest2: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest3: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest3: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest3: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest4: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest4: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest4: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest4: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest5: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest5: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest5: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest5: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest5: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest6: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest6: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest6: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest6: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest6: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest6: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure matrestf>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure matrestf>".
3.mo:Expected error in mat application: "attempt to apply non-procedure ((a b c))".
3.mo:Expected error in mat case-lambda: "incorrect argument count in call ((case-lambda))".
3.mo:Expected error in mat case-lambda: "incorrect argument count in call (f 3 4 5)".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure foo>".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure foo>".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure foo>".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure foo>".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure foo>".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure foo>".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure foo>".
3.mo:Expected error in mat let: "incorrect argument count in call ((lambda (x . r) ((...) x (...))))".
3.mo:Expected error in mat letrec: "variable f is not bound".
3.mo:Expected error in mat letrec: "attempt to reference undefined variable a".
--- 87,157 ----
primvars.mo:Expected error in mat print-radix: "print-radix: 1 is not between 2 and 36".
primvars.mo:Expected error in mat timer-interrupt-handler: "timer-interrupt-handler: midnight is not a procedure".
primvars.mo:Expected error in mat trace-output-port: "trace-output-port: #<input port string> is not a textual output port".
! 3.mo:Expected error in mat matrest1: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest2: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest2: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest3: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest3: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest3: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest4: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest4: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest4: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest4: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest5: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest5: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest5: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest5: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest5: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest6: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest6: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest6: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest6: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest6: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest6: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest7: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest8: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest9: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat matrest10: "incorrect number of arguments to #<procedure>".
3.mo:Expected error in mat application: "attempt to apply non-procedure ((a b c))".
3.mo:Expected error in mat case-lambda: "incorrect argument count in call ((case-lambda))".
3.mo:Expected error in mat case-lambda: "incorrect argument count in call (f 3 4 5)".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure>".
! 3.mo:Expected error in mat case-lambda: "incorrect number of arguments to #<procedure>".
3.mo:Expected error in mat let: "incorrect argument count in call ((lambda (x . r) ((...) x (...))))".
3.mo:Expected error in mat letrec: "variable f is not bound".
3.mo:Expected error in mat letrec: "attempt to reference undefined variable a".
***************
*** 4274,4289 ****
6.mo:Expected error in mat pretty-print: "pretty-format: invalid format (bad 0 ... ... 0 format)".
6.mo:Expected error in mat fasl: "separate-eval: Warning in fasl-write: fasl file content is compressed internally; compressing the file (#<binary output port testfile.ss>) is redundant and can slow fasl writing and reading significantly
6.mo:Expected error in mat fasl: "separate-eval: Warning in fasl-read: fasl file content is compressed internally; compressing the file (#<binary input port testfile.ss>) is redundant and can slow fasl writing and reading significantly
- 6.mo:Expected warning in mat cp1in-verify-format-warnings: "compile: too few arguments for control string "~a~~~s" in call to format".
- 6.mo:Expected warning in mat cp1in-verify-format-warnings: "compile: too many arguments for control string "~a~a~a~s" in call to format".
6.mo:Expected warning in mat cp1in-verify-format-warnings: "compile: too few arguments for control string "~a~~~s" in call to format at line 1, char 28 of testfile.ss".
6.mo:Expected warning in mat cp1in-verify-format-warnings: "compile: too many arguments for control string "~a~a~a~s" in call to format at line 1, char 28 of testfile.ss".
- 6.mo:Expected warning in mat cp1in-verify-format-warnings: "compile: too few arguments for control string "abc~s" in call to printf".
- 6.mo:Expected warning in mat cp1in-verify-format-warnings: "compile: too many arguments for control string "~%~abc~adef~ag~s~~~%" in call to printf".
6.mo:Expected warning in mat cp1in-verify-format-warnings: "compile: too few arguments for control string "abc~s" in call to printf at line 1, char 28 of testfile.ss".
6.mo:Expected warning in mat cp1in-verify-format-warnings: "compile: too many arguments for control string "~%~abc~adef~ag~s~~~%" in call to printf at line 1, char 28 of testfile.ss".
- 6.mo:Expected warning in mat cp1in-verify-format-warnings: "compile: too few arguments for control string "abc~s" in call to fprintf".
- 6.mo:Expected warning in mat cp1in-verify-format-warnings: "compile: too many arguments for control string "~%~abc~adef~ag~s~~~%" in call to fprintf".
6.mo:Expected warning in mat cp1in-verify-format-warnings: "compile: too few arguments for control string "abc~s" in call to fprintf at line 1, char 29 of testfile.ss".
6.mo:Expected warning in mat cp1in-verify-format-warnings: "compile: too many arguments for control string "~%~abc~adef~ag~s~~~%" in call to fprintf at line 1, char 29 of testfile.ss".
6.mo:Expected error in mat print-parameters: "write: cycle detected; proceeding with (print-graph #t)".
--- 4280,4289 ----
***************
*** 7248,7254 ****
7.mo:Expected error in mat maybe-compile: "separate-compile: Exception in include: failed for testfile-mc-1a.ss: no such file or directory
7.mo:Expected error in mat maybe-compile: "separate-compile: Exception in include: file "testfile-mc-1a.ss" not found in source directories
7.mo:Expected error in mat maybe-compile: "separate-compile: Exception in include: failed for ./testfile-mc-3a.ss: no such file or directory
! 7.mo:Expected error in mat eval: "compile: 7 is not an environment".
7.mo:Expected error in mat eval: "interpret: 7 is not an environment".
7.mo:Expected error in mat eval: "compile: 7 is not an environment".
7.mo:Expected error in mat expand: "sc-expand: 7 is not an environment".
--- 7248,7254 ----
7.mo:Expected error in mat maybe-compile: "separate-compile: Exception in include: failed for testfile-mc-1a.ss: no such file or directory
7.mo:Expected error in mat maybe-compile: "separate-compile: Exception in include: file "testfile-mc-1a.ss" not found in source directories
7.mo:Expected error in mat maybe-compile: "separate-compile: Exception in include: failed for ./testfile-mc-3a.ss: no such file or directory
! 7.mo:Expected error in mat eval: "interpret: 7 is not an environment".
7.mo:Expected error in mat eval: "interpret: 7 is not an environment".
7.mo:Expected error in mat eval: "compile: 7 is not an environment".
7.mo:Expected error in mat expand: "sc-expand: 7 is not an environment".
***************
*** 7436,7443 ****
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)".
--- 7436,7443 ----
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)".
***************
*** 7445,7459 ****
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".
--- 7445,7459 ----
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".
***************
*** 7466,7491 ****
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".
--- 7466,7491 ----
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".
***************
*** 7616,7654 ****
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".
--- 7616,7654 ----
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>".
! 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".
***************
*** 7674,7709 ****
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".
--- 7674,7709 ----
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".
***************
*** 10386,10395 ****
exceptions.mo:Expected error in mat assert: "failed assertion (memq (quote b) (quote (1 2 a 3 4)))".
exceptions.mo:Expected error in mat assert: "failed assertion (q ...)".
exceptions.mo:Expected error in mat assert: "failed assertion (andmap symbol? (syntax (x ...)))".
! oop.mo:Expected error in mat oop: "incorrect number of arguments to #<procedure make-<a>>".
! oop.mo:Expected error in mat oop: "incorrect number of arguments to #<procedure make-<a>>".
! oop.mo:Expected error in mat oop: "incorrect number of arguments to #<procedure m1>".
! oop.mo:Expected error in mat oop: "incorrect number of arguments to #<procedure m1>".
oop.mo:Expected error in mat oop: "m1: not applicable to 17".
oop.mo:Expected error in mat oop: "variable <a>-x1 is not bound".
oop.mo:Expected error in mat oop: "variable <a>-x1-set! is not bound".
--- 10386,10395 ----
exceptions.mo:Expected error in mat assert: "failed assertion (memq (quote b) (quote (1 2 a 3 4)))".
exceptions.mo:Expected error in mat assert: "failed assertion (q ...)".
exceptions.mo:Expected error in mat assert: "failed assertion (andmap symbol? (syntax (x ...)))".
! oop.mo:Expected error in mat oop: "incorrect number of arguments to #<procedure>".
! oop.mo:Expected error in mat oop: "incorrect number of arguments to #<procedure>".
! oop.mo:Expected error in mat oop: "incorrect number of arguments to #<procedure>".
! oop.mo:Expected error in mat oop: "incorrect number of arguments to #<procedure>".
oop.mo:Expected error in mat oop: "m1: not applicable to 17".
oop.mo:Expected error in mat oop: "variable <a>-x1 is not bound".
oop.mo:Expected error in mat oop: "variable <a>-x1-set! is not bound".