mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-18 17:50:29 +02:00
Code Activity

distcheck works now

Browse source 
* guilec.mk: New file, to be included when building .go files.

* module/language/scheme/Makefile.am:
* module/system/base/Makefile.am:
* module/system/il/Makefile.am:
* module/system/repl/Makefile.am:
* module/system/vm/Makefile.am: Use guilec.mk.

* module/system/base/compile.scm (compiled-file-name): Work on the
  basename of a file, so that we always create files in the directory
  where we run. Perhaps should add a -o option to guilec in the future.

* Makefile.am: Actually recurse into module/ in a normal build.
This commit is contained in:
Andy Wingo 2008-05-20 12:54:14 +02:00
parent 292bb8fc68
commit 51f6b8f377
8 changed files with 24 additions and 62 deletions
Download patch file Download diff file Expand all files Collapse all files

13
module/language/scheme/Makefile.am
View file

@ -1,12 +1,3 @@
SOURCES = translate.scm spec.scm
## FIXME: There's a bug showing up when compiling `translate.scm'.
GOBJECTS = $(SOURCES:%.scm=%.go)
vmdir = $(guiledir)/language/scheme
vm_DATA = $(SOURCES) $(GOBJECTS)
CLEANFILES = $(GOBJECTS)
SUFFIXES = .scm .go
%.go: %.scm
$(GUILEC) $<
moddir = $(guiledir)/language/scheme
include $(top_srcdir)/guilec.mk

12
module/system/base/Makefile.am
View file

@ -1,11 +1,3 @@
SOURCES = pmatch.scm syntax.scm compile.scm language.scm
GOBJECTS = $(SOURCES:%.scm=%.go)
vmdir = $(guiledir)/system/vm
vm_DATA = $(SOURCES) $(GOBJECTS)
CLEANFILES = $(GOBJECTS)
SUFFIXES = .scm .go
%.go: %.scm
$(GUILEC) $<
moddir = $(guiledir)/system/base
include $(top_srcdir)/guilec.mk

5
module/system/base/compile.scm
View file

@ -101,8 +101,9 @@
(apply load-source-file file opts))))
(define (compiled-file-name file)
(let ((m (string-match "\\.[^.]*$" file)))
(string-append (if m (match:prefix m) file) ".go")))
(let ((base (basename file)))
(let ((m (string-match "\\.scm$" base)))
(string-append (if m (match:prefix m) base) ".go"))))
(define (scheme-eval x e)
(vm-load (the-vm) (compile-in x e (scheme))))

14
module/system/il/Makefile.am
View file

@ -1,13 +1,3 @@
SOURCES = glil.scm macros.scm ghil.scm compile.scm
## FIXME: There's a bug showing up when compiling `ghil.scm' and
## `compile.scm'!
GOBJECTS = $(SOURCES:%.scm=%.go)
vmdir = $(guiledir)/system/il
vm_DATA = $(SOURCES) $(GOBJECTS)
CLEANFILES = $(GOBJECTS)
SUFFIXES = .scm .go
%.go: %.scm
$(GUILEC) $<
moddir = $(guiledir)/system/il
include $(top_srcdir)/guilec.mk

12
module/system/repl/Makefile.am
View file

@ -1,12 +1,4 @@
NOCOMP_SOURCES = describe.scm
SOURCES = repl.scm common.scm command.scm
GOBJECTS = $(SOURCES:%.scm=%.go)
vmdir = $(guiledir)/system/repl
vm_DATA = $(SOURCES) $(NOCOMP_SOURCES) $(GOBJECTS)
CLEANFILES = $(GOBJECTS)
SUFFIXES = .scm .go
%.go: %.scm
$(GUILEC) $<
moddir = $(guiledir)/system/repl
include $(top_srcdir)/guilec.mk

12
module/system/vm/Makefile.am
View file

@ -1,12 +1,4 @@
SOURCES = assemble.scm conv.scm core.scm debug.scm \
disasm.scm frame.scm profile.scm trace.scm
GOBJECTS = $(SOURCES:%.scm=%.go)
vmdir = $(guiledir)/system/vm
vm_DATA = $(SOURCES) $(GOBJECTS)
CLEANFILES = $(GOBJECTS)
SUFFIXES = .scm .go
%.go: %.scm
$(GUILEC) $<
moddir = $(guiledir)/system/vm
include $(top_srcdir)/guilec.mk