PasteRack.org
Paste # 56768
2020-06-02 16:21:55

Fork as a new paste.

Paste viewed 423 times.


Embed:

struct-provide-rename-01

  1. #lang racket/base
  2.  
  3. (module test-struct racket/base
  4.         (provide (rename-out [egg shell])
  5.                  (except-out (struct-out egg) egg))
  6.         (struct egg (size color)))
  7.  
  8. (require 'test-struct)
  9.  
  10. (procedure? egg)

=>

egg: undefined;

 cannot reference an identifier before its definition

  in module: 'm