Inform - Support - Source

Back to List

Inventory
Complete

Backward
Forward

Plain
Coloured
Gaudy

This code
in plain text

Browsing parserm.h

UnpackGrammarLine (lines 709-731)

0709  #Ifnot; ! TARGET_GLULX
0710   
0711  [ UnpackGrammarLine line_address i;
0712      for (i=0 : i<32 : i++) {
0713          line_token-->i = ENDIT_TOKEN;
0714          line_ttype-->i = ELEMENTARY_TT;
0715          line_tdata-->i = ENDIT_TOKEN;
0716      }
0717      @aloads line_address 0 action_to_be;
0718      action_reversed = (((line_address->2) & 1) ~= 0);
0719      line_address = line_address - 2;
0720      params_wanted = 0;
0721      for (i=0 : : i++) {
0722          line_address = line_address + 5;
0723          if (line_address->0 == ENDIT_TOKEN) break;
0724          line_token-->i = line_address;
0725          AnalyseToken(line_address);
0726          if (found_ttype ~= PREPOSITION_TT) params_wanted++;
0727          line_ttype-->i = found_ttype;
0728          line_tdata-->i = found_tdata;
0729      }
0730      return line_address + 1;
0731  ];


Last updated 27 February 2004. The librarian in charge of this page is Graham Nelson (graham@gnelson.demon.co.uk) assisted by C Knight. Please email any comments, suggestions or corrections to cedenqs@inform-fiction.org.