Writing registers

src/modal.c

@@ -37,6 +37,21 @@ match(char *p, Rule *r)
 	return b;
 }
 
+static int
+writereg(char r)
+{
+	int depth = 0;
+	char c, *s = regs[(int)r];
+	while((c = *s++)) {
+		if(c == '(') depth++;
+		if(c == ')') --depth;
+		if(c == ' ' && !depth)
+			break;
+		*outp_++ = c;
+	}
+	return 1;
+}
+
 static int
 rewrite(void)
 {
@@ -49,7 +64,10 @@ rewrite(void)
 			if(res != NULL) {
 				char cc, *b = r->b;
 				while((cc = *b++)) {
-					*outp_++ = cc;
+					if(cc == '?')
+						writereg(*b++);
+					else
+						*outp_++ = cc;
 				}
 				found = 1;
 				p = res;

test.modal

@@ -1,3 +1,3 @@
-<> bar baz
+<> (?x dup) (?x ?x)
 
-foo bar
+foo (hey dup)