[racket] Lazy take is the identity?

I would expect this program to signal an error:

#lang lazy

(define zeros (cons 0 zeros))

(define should-be-error (list-ref (take 15 zeros) 1324))


... but instead should-be-error is bound to zero.  How can I take the 1000th element of a list with only 15 elements?  I'm tempted to make snide comments about laziness, but I'm sure it'll backfire when it turns out that somehow that's the right answer after all. 

Bug report?

John

-------------- next part --------------
A non-text attachment was scrubbed...
Name: smime.p7s
Type: application/pkcs7-signature
Size: 4669 bytes
Desc: not available
URL: <http://lists.racket-lang.org/users/archive/attachments/20110125/90036d58/attachment.p7s>