diff options
| author | David Thompson <dthompson2@worcester.edu> | 2016-02-27 13:11:19 -0500 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2016-02-27 13:11:19 -0500 |
| commit | 80de608c724a1eebdb0605e4a26251553ec64142 (patch) | |
| tree | 68da5af5ba8951ae1f6d165048d14afc796dd230 | |
| parent | f35283b436132c1f7153ff938b490f621c7022d9 (diff) | |
utils: Remove unused 'forever' procedure.
* sly/utils.scm (forever): Delete.
| -rw-r--r-- | sly/utils.scm | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/sly/utils.scm b/sly/utils.scm index 0e38fe4..09d7cd3 100644 --- a/sly/utils.scm +++ b/sly/utils.scm @@ -30,7 +30,6 @@ #:use-module (sly agenda) #:export (define-guardian memoize - forever trampoline chain* chain list->vlist* vlist-ref*)) @@ -61,9 +60,6 @@ same thread that is running the game loop." (hash-set! cache args results) (apply values results))))))) -(define-syntax-rule (forever body ...) - (while #t body ...)) - (define-syntax-rule (trampoline proc) (lambda args (apply proc args))) |