Original Parser

version 1 by Ron Newcomb

  • Home page
  • Beginning
  • Previous
  • Next



  • Chapter 9 - Other Loops

    To repeat forever begin -- end: (- while (true) -).
    To while this isn't done begin -- end: (- do -).
    To do this/that again unless/until (c - a condition): (- until ({c}); -).
    To do this/that again if/while (c - a condition): (- until (~~({c})); -).
    To that/this is done if/while/when (c - a condition): (- until (~~({c})); -).
    To that/this isn't done unless/until (c - a condition): (- until ({c}); -).
    To (ph - a phrase) until (c - a condition): (- do {ph} } until ({C}); !-).

    The chosen grammar is a 0-based index based rulebook producing grammar tokens that varies.
    The chosen grammar variable translates into I6 as "ct_0".

    To repeat through the understand-as lines for (verb - an understood word) begin -- end:
    (- ct_0 = VM_CommandTableAddress(DictionaryWordToVerbNum({verb}));
        cacheval6 = ct_0->0;
        ct_0++; ! + the size of the grammar line header???
        for (ct_1 = 0 : ct_1 < cacheval6 : ++ct_1) -).