Inform - Support - Source

Back to List

Inventory
Complete

Backward
Forward

Plain
Coloured
Gaudy

This code
in plain text

Browsing verblibm.h

IndirectlyContains (lines 938-947)

0938  [ IndirectlyContains o1 o2;
0939    !  Does o1 indirectly contain o2?  (Same as testing if their common
0940    !  ancestor is o1.)
0941   
0942    while (o2~=0)
0943    {   if (o1==o2) rtrue;
0944        o2=parent(o2);
0945    }
0946    rfalse;
0947  ];


Last updated 27 February 2004. This web site has not been fully supported since April 2008. Information may be out of date. This page was originally managed by Graham Nelson (graham@gnelson.demon.co.uk) assisted by C Knight.