guile: get multimap example to run
This commit is contained in:
parent
8767e4e29e
commit
fbb1978eb4
3 changed files with 10 additions and 3 deletions
|
|
@ -5,6 +5,7 @@ TARGET = example
|
|||
INTERFACE = example.i
|
||||
|
||||
check: build
|
||||
$(MAKE) -f ../Makefile RUNSCRIPT=runme.scm run_example
|
||||
|
||||
build:
|
||||
$(MAKE) -f $(TOP)/Makefile SRCS='$(SRCS)' SWIG='$(SWIG)' \
|
||||
|
|
|
|||
|
|
@ -1,6 +1,6 @@
|
|||
;;; Test out some multi-argument typemaps
|
||||
|
||||
(use-modules (example))
|
||||
(dynamic-call "scm_init_example_module" (dynamic-link "./libexample.so"))
|
||||
|
||||
; Call the GCD function
|
||||
|
||||
|
|
@ -27,4 +27,4 @@
|
|||
(display (capitalize "hello world"))
|
||||
(newline)
|
||||
|
||||
|
||||
(exit 0)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue