TakeV/guile-prescheme
Archived
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Initial prescheme emulation support

Browse source
This commit is contained in:
Andrew Whatson 2022-07-19 20:20:21 +10:00
parent bfa2f0da4f
commit 6b2f813725
2 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
TODO.org
View file

@ -13,8 +13,7 @@ You can create a Pre-Scheme module and switch into it with some effort:
#+BEGIN_SRC scheme
(use-modules (system base language))
(set-module-name! (default-environment 'prescheme) '(prescheme-user))
,module prescheme-user
(set-current-module (default-environment 'prescheme))
,language prescheme
#+END_SRC

2
language/prescheme/spec.scm
View file

@ -10,7 +10,7 @@
(define (default-environment)
(let ((m (make-module)))
(module-use! m (resolve-module '(language prescheme core)))
(module-use! m (resolve-interface '(language prescheme core)))
m))
(define-language prescheme