Inheritance: ExecutableCommand
Example #1
0
 void write_command()
 {
     Expect(23);
     Write cmd = new Write(t);
     if (la.kind == 32) {
     Get();
     write_parameter(cmd);
     while (la.kind == 33) {
         Get();
         cmd = new Write(t);
         write_parameter(cmd);
     }
     } else if (StartOf(4)) {
     write_parameter(cmd);
     } else SynErr(53);
     Expect(5);
 }
Example #2
0
 void write_parameter(Write cmd)
 {
     if (la.kind == 9) {
     format(cmd);
     }
     value(out cmd.Value);
     cmd.End(t); Context.EmitCommand( cmd );
 }
Example #3
0
 void format(Write cmd)
 {
     Expect(9);
     cmd.Format = t.val;
 }