Inform - Support - Source

Back to List

Inventory
Complete

Backward
Forward

Plain
Coloured
Gaudy

This code
in plain text

Browsing verblibm.h

ListEqual (lines 139-151)

0139  [ ListEqual o1 o2;
0140    if (child(o1)~=0 && WillRecurs(o1)~=0) rfalse;
0141    if (child(o2)~=0 && WillRecurs(o2)~=0) rfalse;
0142   
0143    if (c_style & (FULLINV_BIT + PARTINV_BIT) ~= 0)
0144    {   if ((o1 hasnt worn && o2 has worn)
0145            || (o2 hasnt worn && o1 has worn)) rfalse;
0146        if ((o1 hasnt light && o2 has light)
0147            || (o2 hasnt light && o1 has light)) rfalse;
0148    }
0149   
0150    return Identical(o1,o2);
0151  ];


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.