aboutsummaryrefslogtreecommitdiff
path: root/scripts/static-util.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2022-09-23 21:01:17 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2022-09-23 22:23:47 +0200
commit0c0142881f769b6c42a8a69bec490ba9e98ccf48 (patch)
tree515f790266a701a590f04ea589436c54ed3c44b7 /scripts/static-util.scm
parentMove graphviz to main tree. (diff)
downloadcalp-0c0142881f769b6c42a8a69bec490ba9e98ccf48.tar.gz
calp-0c0142881f769b6c42a8a69bec490ba9e98ccf48.tar.xz
Move all generally usable scripts to module dir.
Diffstat (limited to 'scripts/static-util.scm')
-rw-r--r--scripts/static-util.scm9
1 files changed, 0 insertions, 9 deletions
diff --git a/scripts/static-util.scm b/scripts/static-util.scm
deleted file mode 100644
index 7aa3626e..00000000
--- a/scripts/static-util.scm
+++ /dev/null
@@ -1,9 +0,0 @@
-(define-module (static-util)
- :export (get-forms))
-
-(define (get-forms port)
- (let loop ((done '()))
- (let ((form (read port)))
- (if (eof-object? form)
- done
- (loop (cons form done))))))