diff options
Diffstat (limited to 'net/ricketyspace/ror/eleven/lazy.rkt')
| -rw-r--r-- | net/ricketyspace/ror/eleven/lazy.rkt | 23 | 
1 files changed, 0 insertions, 23 deletions
diff --git a/net/ricketyspace/ror/eleven/lazy.rkt b/net/ricketyspace/ror/eleven/lazy.rkt deleted file mode 100644 index 6f54719..0000000 --- a/net/ricketyspace/ror/eleven/lazy.rkt +++ /dev/null @@ -1,23 +0,0 @@ -#lang racket - -(define (make-lazy+ i) -  (lambda () -    (apply + (build-list (* 500 i) values)))) - - -(define long-big-list (build-list 5000 make-lazy+)) - - -(define (compute-every-1000th l) -  (for/list ([thunk l] -             [i (in-naturals)] -             #:when (zero? (remainder i 1000))) -    (thunk))) - - -(define (memoize.v2 suspended-c) -  (define (hidden) -    (define the-value (suspended-c)) -    (set! hidden (lambda () the-value)) -    the-value) -  (lambda () (hidden)))  | 
