summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sly/utils.scm4
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)))