PasteRack.org
Paste # 38782
2016-07-15 12:38:32

Fork as a new paste.

Paste viewed 321 times.


Embed:

  1. #lang racket
  2.  
  3. (define (generate)
  4.   (for/list ((i (in-range 3)))
  5.             (for/list ((i (in-range 6)))
  6.                       (random -5 8))))
  7.  
  8. (define r (generate))
  9.  
  10. (for-each displayln r)

=>

random: contract violation

  expected: (integer-in 1 4294967087)

  given: -5

r: undefined;

 cannot reference an identifier before its definition

  in module: 'm