mirror of
https://github.com/ProgramSnail/Lama.git
synced 2025-12-24 07:38:46 +00:00
Imports (no infixes yet; does not work because of the GC duplicate symbols)
This commit is contained in:
parent
5f673e766c
commit
cf5d0f1bc7
15 changed files with 161 additions and 62 deletions
|
|
@ -7,7 +7,7 @@ RC=../../src/rc.opt
|
|||
check: $(TESTS)
|
||||
|
||||
$(TESTS): %: %.expr
|
||||
@RC_RUNTIME=../../runtime $(RC) $< && cat $@.input | ./$@ > $@.log && diff -u $@.log orig/$@.log
|
||||
@RC_RUNTIME=../../runtime $(RC) -I . $< && cat $@.input | ./$@ > $@.log && diff -u $@.log orig/$@.log
|
||||
|
||||
clean:
|
||||
rm -f test*.log *.s *~ $(TESTS)
|
||||
|
|
|
|||
1
regression/x86only/orig/test005.log
Normal file
1
regression/x86only/orig/test005.log
Normal file
|
|
@ -0,0 +1 @@
|
|||
called with this one
|
||||
|
|
@ -1,5 +1,3 @@
|
|||
external fun printf ();
|
||||
|
||||
fun insert (tree, value) {
|
||||
case tree of
|
||||
Empty -> return Node (value, Empty, Empty)
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
external fun printf ();
|
||||
|
||||
fun collect_ints_acc (v, tail) {
|
||||
local i;
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
external fun printf ();
|
||||
|
||||
local lists = [
|
||||
{},
|
||||
{1, 2, 3, 4},
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
external fun printf ();
|
||||
|
||||
fun hd (l) {
|
||||
case l of
|
||||
h : _ -> return h
|
||||
|
|
|
|||
5
regression/x86only/test005.expr
Normal file
5
regression/x86only/test005.expr
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
public fun from_test005 (s) {
|
||||
printf ("called with %s\n", s)
|
||||
}
|
||||
|
||||
from_test005 ("this one")
|
||||
1
regression/x86only/test005.input
Normal file
1
regression/x86only/test005.input
Normal file
|
|
@ -0,0 +1 @@
|
|||
0
|
||||
3
regression/x86only/test006.expr
Normal file
3
regression/x86only/test006.expr
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
import test005;
|
||||
|
||||
from_test005 ("that one")
|
||||
1
regression/x86only/test006.input
Normal file
1
regression/x86only/test006.input
Normal file
|
|
@ -0,0 +1 @@
|
|||
0
|
||||
Loading…
Add table
Add a link
Reference in a new issue