PasteRack.org
Paste # 59680
2019-03-14 18:21:05

Fork as a new paste.

Paste viewed 472 times.


Embed:

syntax-binding-set

  1. #lang racket
  2. (define s1 (syntax-binding-set))
  3. (define s2 (syntax-binding-set-extend s1 'x 0 #f))
  4. (syntax-binding-set->syntax s2 'x)
  5. (syntax? (syntax-binding-set->syntax s2 'x))
  6. (syntax-binding-set? (syntax-binding-set->syntax s2 'x))

=>

syntax-binding-set: undefined;

 cannot reference an identifier before its definition

  in module: 'm

syntax-binding-set-extend: undefined;

 cannot reference an identifier before its definition

  in module: 'm

syntax-binding-set->syntax: undefined;

 cannot reference an identifier before its definition

  in module: 'm

syntax-binding-set->syntax: undefined;

 cannot reference an identifier before its definition

  in module: 'm

syntax-binding-set?: undefined;

 cannot reference an identifier before its definition

  in module: 'm