[Larceny-users] No binding available for rtd-accessor in library (rnrs conditions)

[Martin Rodgers]

I successfully tested the following code with 3 other R6RS implementations,
so I'm unhappy to report that Larceny complains about a missing binding.

$ cat larceny.bug.scm
#!r6rs
(import (rnrs))

(define-condition-type &wibble &condition
    make-wibble
    wibble?
    (wobble wibble-wobble))

$ larceny -r6rs -program larceny.bug.scm
Autoloading (rnrs)
Autoloading (rnrs enums)
Autoloading (rnrs lists)
Autoloading (rnrs syntax-case)
Autoloading (rnrs hashtables)
Autoloading (rnrs arithmetic bitwise)
Autoloading (rnrs programs)
Autoloading (rnrs files)
Autoloading (rnrs io ports)
Autoloading (larceny deprecated)
Autoloading (rnrs conditions)
Autoloading (rnrs exceptions)
Autoloading (rnrs records syntactic)
Autoloading (err5rs records procedural)
Autoloading (rnrs records procedural)
Autoloading (rnrs control)
Autoloading (rnrs sorting)
Autoloading (rnrs bytevectors)
Autoloading (rnrs unicode)

Syntax violation: invalid reference

No binding available for rtd-accessor in library (rnrs conditions)

Form: rtd-accessor

Trace:

  (rtd-accessor &wibble 'wobble)

  (condition-accessor
  &wibble
  (rtd-accessor &wibble 'wobble))


Error: no handler for exception #<record &compound-condition>
Compound condition has these components:
#<record &error>
#<record &who>
    who : syntax-violation
#<record &message>
    message : "invalid reference: No binding available for rtd-accessor in 
library (rnrs conditions)"
#<record &irritants>
    irritants : (rtd-accessor)

Terminating program execution.

I love the diagnostic detail, however. ;)
-- 
Martin Rodgers http://www.wildcard.demon.co.uk