InfixWatchOffSub (lines 966-981)
Back to List
Browsing infix.h
0966 [ InfixWatchOffSub i j k l;
0967 if (noun == 0) return InfixDescribeWatchSub();
0968 if (infix_term_type == INFIXTT_ROUTINE) {
0969 i = infix_parsed_lvalue/8;
0970 for (j=0,k=1 : j<infix_parsed_lvalue%8 : j++) k=k*2;
0971 l = #routine_flags_array->i;
0972 l = l & (~k);
0973 @storeb #routine_flags_array i l;
0974 "; Not watching ", (InfixPrintRoutine) infix_parsed_lvalue, ".";
0975 }
0976 if (metaclass(noun) == Object) {
0977 @clear_attr noun infix__watching;
0978 "; Not watching object ~", (name) noun, "~ (", noun, ").";
0979 }
0980 InfixDescribeWatchSub();
0981 ];
Last updated 27 February 2004. The librarian in charge of this page is Graham Nelson (graham@gnelson.demon.co.uk) assisted by C Knight. Please email any comments, suggestions or corrections to cedenqs@inform-fiction.org.