shithub: mc

Info  •  Files  •  Log  •  Branches

Syntax change.

    To make this match more with Myrddin, as well as to highlight
    the terminators, use a ';;'.

--- a/bldfile

+++ b/bldfile

@@ -11,7 +11,7 @@

 	subdir.myr

         types.myr

 	util.myr

-;

+;;

-man = mbld.1;

+man = mbld.1;;

--- a/parse.myr

+++ b/parse.myr

@@ -91,8 +91,8 @@

 	;;

 	skipspace(p)

-	if !matchc(p, ';')

-		failparse(p, "expected ';' terminating input list, got %c\n", peekc(p))

+	if !matchc(p, ';') || !matchc(p, ';')

+		failparse(p, "expected ';;' terminating input list, got %c\n", peekc(p))

 	;;

 	inst = true

@@ -132,8 +132,8 @@

 	| `std.Some wl:	inputs = wl

 	;;

 	skipspace(p)

-	if !matchc(p, ';')

-		failparse(p, "expected ';' terminating input list\n")

+	if !matchc(p, ';') || !matchc(p, ';')

+		failparse(p, "expected ';;' terminating input list\n")

 	;;

 	-> inputs

 }