Blob
1 # test for parser3 a4 a b5 a|b6 a | b7 {a; b; c}8 x=y a && b || c9 x=y a | b | c10 x=y for(i) a | b11 >x for(i) a | b12 >x a || b && c13 a >x || b && c14 a | for(i) b | c15 fn x {y; z} | b && c16 if (x) y17 if not z18 `{} >x >[1=2]y >[3=] z <w19 ~ x y && z20 x | y && z21 x | y || z22 ! x | y | z23 @ x | y | z24 x | ! y | z25 x | @y | z26 ! x | if(y) z27 @ x | if(y) z28 x=1 y | if(z) w29 a'b' c30 a^'b'^ c31 a^'b' c32 $$x33 $x($y)34 $"x35 $#x36 $#$x37 -$x-38 `{a;b;c}39 <{a;b}40 x for in while if not ~ ! @ switch fn41 x not$y42 a;b;c43 if(x)44 y45 if(x)46 {47 y48 }49 if not50 z51 for(x)52 y53 for(x in y)54 z55 while(x)56 y57 # yacc doesn't accept a newline before the brace58 # even though the rule is written as if it would59 switch x {60 }61 switch (x) {62 }63 z64 x &&65 y66 x ||67 y68 x |69 y70 switch x {y} && z71 switch x {} | y73 OPTIONS=$OPTIONS' /axescount '^`{echo $1 | sed s/-a//}^' def'75 # bug in old printfont script - expected more free carats76 # OPTIONS=$OPTIONS' /axescount '`{echo $1 | sed s/-a//}' def'78 (x) = y79 x=y80 x = y82 # works now!83 # x y=z84 # x =y85 # x -flag=y87 >z x | y89 # rejected now, was like parens were spaces before.90 # echo Formatting Venti arenas and indices (this takes a while).93 # echo $STATLINE(1)^$STATLINE(3)' '$STATLINE(2)' '$STATLINE(4)' '$LSLINE(6)