Files from TOPS-20 <mdl.comp>.

[pdp10-muddle.git] / <mdl.comp> / syntax.macro.1

diff --git a/<mdl.comp>/syntax.macro.1 b/<mdl.comp>/syntax.macro.1
new file mode 100644 (file)
index 0000000..8e85e79
--- /dev/null
+++ b/<mdl.comp>/syntax.macro.1
@@ -0,0 +1,54 @@
+1<[..D:^I..D? A    A    A    A    A    A    A    A    A              A              A    A    A    A    A    A    A    A    A    A    A    A    A    A    A    A    A    A              |    A   AA   A     A         (    )    A    A    A    A   AA    A   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA    A         (    A    )    A    A   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA    (    /    )    A    A    A   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA    (    A    )    A    A   ?
+FVYACC ===> SYNTAX CONVERTER RUNNING.
+\e[0[1J:K
+:Sint (*act[])() {
+       \e"EFVLOSSAGE act\e0;'\ 6   [\7f \e
+:S-1};
+\e"EFVLOSSAGE act END\e0;'\ 6]\e
+:Sint r1[] {
+       \e"EFVLOSSAGE r1\e0;'\ 6    ![\e
+:S-1};\e"EFVLOSSAGE r1 END\e0;'\ 6]\e
+:Sint r2[] {
+       \e"EFVLOSSAGE r2\e0;'\ 6    ![\e
+:S-1};\e"EFVLOSSAGE r2 END\e0;'\ 6]\e
+:Schar *sterm[] {
+       \e"EFVLOSSAGE sterm\e0;'\ 6 [\e
+:S0};\e"EFVLOSSAGE sterm END\e0;'\ 6]\e
+:Schar *snterm[] {
+       \e"EFVLOSSAGE snterm\e0;'\ 6        [\e
+:S0};\e"EFVLOSSAGE snterm END\e0;'\ 6]\e
+:Sint g[] {
+       \e"EFVLOSSAGE g\e0;'\ 6     ![\e
+:S-1};\e"EFVLOSSAGE g END\e0;'\ 6]\e
+:Sint pg[] {
+       \e"EFVLOSSAGE pg\e0;'\ 6    ![\e
+:S-1};\e"EFVLOSSAGE pg END\e0;'\ 6]\e
+:Sint sq[] {
+       \e"EFVLOSSAGE sq\e0;'\ 6    ![\e
+:S-1};\e"EFVLOSSAGE sq END\e0;'\ 6]\e
+:Sint nbpw {\e"EFVLOSSAGE npbw\e0;'\ 6     \e
+:S};\e"EFVLOSSAGE npbw END\e0;'\ 6\e
+:Sint nwpbt {\e"EFVLOSSAGE nwpbt\e0;'\ 6   \e
+:S};\e"EFVLOSSAGE nwpbt END\e0;'\ 6\e
+:Sint a[] {
+       \e"EFVLOSSAGE a\e0;'\ 6     ![\e
+:S-1};\e"EFVLOSSAGE a END\e0;'\ 6]\e
+:Sint pa[] {
+       \e"EFVLOSSAGE pa\e0;'\ 6    ![\e
+:S-1};\e"EFVLOSSAGE pa END\e0;'\ 6]]>
+\e.,ZK
+J<:S,\ f"\ f{\eU0 !'! Q0; R
+Q0+1"ED'
+Q0+2"EC.U0 :S",\ 2\e"EFVLOSSAGE string\e0;'3R !'!
+   Q0,.FSBOUND\e-Z+(BJ<:S"\ f\\e; !'! RI\\eC>WZJZ)FSBOUND\eWCD'
+Q0+3"EFLR'>
+JS\7f\e<:S]\ f\ 20\ 2\e+1;2RDI<>\e>
+<J:S
+ar\e;:S{\e"EFVLOSSAGE ar start\e0;'.U0RFLRQ0,.-1X1 0,.K
+:S\7f\e"EFVLOSSAGE act AGAIN\e0;':Sar\e"EFVLOSSAGE ar END\e0;'
+-2DFWK FQ1+(FSHPOS\e)-(FSWIDTH\e)"GI
+       \e' G1>
+JI<SETG TABLES!-SYNTAX!-PACKAGE!-
+     #TABLES!-SYNTAX!-PACKAGE!- [\e
+S\7f\e-DDJ]1]0]..D FVDONE
+\e>\ 3\ 3
\ No newline at end of file