suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
1dba8c4624
racket/mats/patch-compile-0-t-t-f
dyb 983e8b6c00 Numerous changes to improve register/frame allocation speed for 
procedures with large numbers of variables:
- added pass-time tracking for pre-cpnanopass passes to compile.
    compile.ss
- added inline handler for fxdiv-and-mod
    cp0.ss, primdata.ss
- changed order in which return-point operations are done (adjust
  sfp first, then store return values, then restore local saves) to
  avoid storing return values to homes beyond the end of the stack
  in cases where adjusting sfp might result in a call to dooverflood.
    cpnanopass.ss, np-languages.ss
- removed unused {make-,}asm-return-registers bindings
    cpnanopass.ss
- corrected the max-fv value field of the lambda produced by the
  hand-coded bytevector=? handler.
    cpnanopass.ss
- reduced live-pointer and inspector free-variable mask computation
  overhead
    cpnanopass.ss
- moved regvec cset copies to driver so they aren't copied each
  time a uvar is assigned to a register.  removed checks for
  missing register csets, since registers always have csets.
    cpnanopass.ss
- added closure-rep else clause in record-inspector-information!.
    cpnanopass.ss
- augmented tree representation with a constant representation
  for full trees to reduce the overhead of manipulating trees or
  subtress with all bits set.
    cpnanopass.ss
- tree-for-each now takes start and end offsets; this cuts the
  cost of traversing and applying the action when the range of
  applicable offsets is other than 0..tree-size.
    cpnanopass.ss
- introduced the notion of poison variables to reduce the cost of
  register/frame allocation for procedures with large sets of local
  variables.  When the number of local variables exceeds a given
  limit (currently hardwired to 1000), each variable with a large
  live range is considered poison.  A reasonable set of variables
  with large live ranges (the set of poison variables) is computed
  by successive approximation to avoid excessive overhead.  Poison
  variables directly conflict with all spillables, and all non-poison
  spillables indirectly conflict with all poison spillables through
  a shared poison-cset.  Thus poison variables cannot live in the
  same location as any other variable, i.e., they poison the location.
  Conflicts between frame locations and poison variables are handled
  normally, which allows poison variables to be assigned to
  move-related frame homes.  Poison variables are spilled prior to
  register allocation, so conflicts between registers and poison
  variables are not represented.  move relations between poison
  variables and frame variables are recorded as usual, but other
  move relations involving poison variables are not recorded.
    cpnanopass.ss, np-languages.ss
- changed the way a uvar's degree is decremented by remove-victim!.
  instead of checking for a conflict between each pair of victim
  and keeper and decrementing when the conflict is found, remove-victim!
  now decrements the degree of each var in each victim's conflict
  set.  while this might decrement other victims' degrees unnecessarily,
  it can be much less expensive when large numbers of variables are
  involved, since the number of conflicts between two non-poison
  variables should be small due to the selection process for
  (non-)poison variables and the fact that the unspillables introduced
  by instruction selection should also have few conflicts.  That
  is, it reduces the worst-case complexity of decrementing degrees
  from O(n^2) to O(n).
    cpnanopass.ss
- took advice in compute-degree! comment to increment the uvars in
  each registers csets rather than looping over the registers for
  each uvar asking whether the register conflicts with the uvar.
    cpnanopass.ss
- assign-new-frame! now zeros out save-weight for local saves, since
  once they are explicitly saved and restored, they are no longer
  call-live and thus have no save cost.
    cpnanopass.ss
- desensitized the let-values source-caching timing test slightly
    8.ms
- updated allx, bullyx patches
    patch*

original commit: 3a49d0193ae57b8e31ec6a00b5b49db31a52373f
2017-10-27 23:16:47 -04:00

300 lines
28 KiB
Plaintext
Raw Blame History

*** errors-compile-0-t-f-f 2017-10-27 00:19:35.000000000 -0400
--- errors-compile-0-t-t-f 2017-10-27 00:13:23.000000000 -0400
***************
*** 144,150 ****
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".
--- 144,150 ----
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".
***************
*** 3673,3679 ****
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".
--- 3673,3679 ----
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".
***************
*** 7123,7130 ****
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)".
--- 7123,7130 ----
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)".
***************
*** 7132,7146 ****
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".
--- 7132,7146 ----
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".
***************
*** 7153,7178 ****
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".
--- 7153,7178 ----
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".
***************
*** 7303,7341 ****
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".
--- 7303,7341 ----
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".
***************
*** 7361,7396 ****
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".
--- 7361,7396 ----
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".
Reference in New Issue View Git Blame Copy Permalink