diff --git a/examples/hello-library/hello.scm b/examples/hello-library/hello.scm index 72b23610..1491abe8 100644 --- a/examples/hello-library/hello.scm +++ b/examples/hello-library/hello.scm @@ -5,5 +5,7 @@ ;(rename (prefix (libs lib1) test-)) ) +(write "hello") ;(test-lib1-hello) (write lib1-hello) +(write "world") diff --git a/examples/hello-library/libs/lib1.sld b/examples/hello-library/libs/lib1.sld index e8d3d0e9..0dfa1709 100644 --- a/examples/hello-library/libs/lib1.sld +++ b/examples/hello-library/libs/lib1.sld @@ -14,4 +14,5 @@ (define (internal-func) (write lib2-hello)) (define (lib1-hello) - (internal-func)))) + (internal-func) + 1)))