[racket] gauge% set-range

Hello friends,

the maximum number for the range is internally not accepted. When I enter 100000 in my loops textfield(see attached gui app) I get an

set-value in gauge%: contract violation
  expected: (integer-in 0 10000)
  given: 10001


Yours,
-------------- next part --------------
A non-text attachment was scrubbed...
Name: guithread.rkt
Type: application/octet-stream
Size: 6206 bytes
Desc: not available
URL: <http://lists.racket-lang.org/users/archive/attachments/20130215/9285308e/attachment.obj>