Space as spacer

src/modal.c

@@ -23,7 +23,7 @@ walk(char *s)
 {
 	char c;
 	while((c = *s++))
-		if(*s == ')') break;
+		if(*s == ')' || *s == ' ') break;
 	return s;
 }
 

test.modal

@@ -1,5 +1,4 @@
-<> (dup ?x) (?x ?x done)
-<> (hello ?x) (bye ?x)
-<> (a (b (c))) (end)
+<> (foo ?a) (fuu ?a)
+<> (?b bar) (?b baz)
 
-(hello world)
+(foo bar)