Inform - Support - Source

Back to List

Inventory
Complete

Backward
Forward

Plain
Coloured
Gaudy

This code
in plain text

Browsing infix.h

InfixList (lines 929-949)

0929  [ InfixList from to tab filter i flag;
0930    print "^    ";
0931    for (i=from:i<=to:i++)
0932        if (tab-->(i-from))
0933        {   flag = true;
0934            if (tab == #array_names_array)
0935            {   Symb__Tab(INFIXTT_ARRAY, i);
0936                flag = ~~(temp__global3 & 16);
0937            }
0938            if (tab == #routine_names_array)
0939            {   Symb__Tab(INFIXTT_ROUTINE,i);
0940                flag = ~~(temp__global3 & 16);
0941            }
0942            if (tab == #constant_names_array)
0943            {   Symb__Tab(INFIXTT_CONSTANT,i);
0944                flag = (~~(temp__global3 & 16)) && (temp__global3 % 16 == filter);
0945            }
0946            if (flag) print (string) tab-->(i-from), " ";
0947        }
0948    new_line;
0949  ];


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.