PasteRack.org
Paste # 19900
2024-04-26 04:12:03

Fork as a new paste.

Paste viewed 217 times.


Embed:

  1. #lang racket/base
  2. (require racket/extflonum)
  3. (define foo (extflvector 1.0t0 2.0t0 3.0t0))
  4. (define bar (extflvector 1.0t0 2.0t0 3.0t0))
  5. (equal-always? foo bar)
  6. (extflvector-set! foo 1 20.0t0)
  7. (equal-always? foo bar)

=>

extflvector: unsupported

extflvector: unsupported

foo: undefined;

 cannot reference an identifier before its definition

  in module: 'm

foo: undefined;

 cannot reference an identifier before its definition

  in module: 'm

foo: undefined;

 cannot reference an identifier before its definition

  in module: 'm