Make it compile.

This commit is contained in:
Dominik Pantůček 2025-03-31 19:54:16 +02:00
parent a61fa0dc31
commit 4fb44325de
4 changed files with 25 additions and 2 deletions

View file

@ -77,6 +77,8 @@
(define (compile-tree-module dir name getter)
(with-output-to-file (format "~a.scm" name)
(lambda ()
(display `(declare (unit ,name)))
(newline)
(write (make-tree-module dir name getter))
(newline))))