Commit b4033d32 authored by dcw's avatar dcw

*** empty log message ***

parent 759989fe
......@@ -19,7 +19,8 @@ extern int length();
GLOBAL {
/* not a lot to say here... */
intlist var1, var2;
@@
int length( l ) intlist l;
......@@ -40,6 +41,12 @@ int length( l ) intlist l;
}
BEGIN {
var1 = intlist_nil();
var2 = intlist_cons( 1, intlist_cons( 2, var1 ) );
}
TYPE {
first = a | b | c | d | e;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment