Inform - Support - Source

Back to List

Inventory
Complete

Backward
Forward

Plain
Coloured
Gaudy

This code
in plain text

Browsing parserm.h

UnpackGrammarLine (lines 511-533)

0511  [ UnpackGrammarLine line_address i m;
0512    for (i = 0 : i < 32 : i++)
0513    {   line_token-->i = ENDIT_TOKEN;
0514        line_ttype-->i = ELEMENTARY_TT;
0515        line_tdata-->i = ENDIT_TOKEN;
0516    }
0517    for (i = 0: i <= 5 :i++)
0518    {   line_token-->i = line_address->(i+1);
0519        AnalyseToken(line_token-->i);
0520        if ((found_ttype == ELEMENTARY_TT) && (found_tdata == NOUN_TOKEN)
0521            && (m == line_address->0))
0522        {   line_token-->i = ENDIT_TOKEN;
0523            break;
0524        }
0525        line_ttype-->i = found_ttype;
0526        line_tdata-->i = found_tdata;
0527        if (found_ttype ~= PREPOSITION_TT) m++;
0528    }
0529    action_to_be = line_address->7;
0530    action_reversed = false;
0531    params_wanted = line_address->0;
0532    return line_address + 8;
0533  ];


Last updated 27 February 2004. This site is no longer supported; information may be out of date.
Maintained as a historical archive by the Interactive Fiction Technology Foundation. Copyright 1993-2018 IFTF, CC-BY-SA unless otherwise noted.
This page was originally managed by Graham Nelson (graham@gnelson.demon.co.uk) assisted by C Knight.