anchor.diff:    end;
   
   implementation
  +
  +type
  +  TmwPasLexExpressionEvaluation = (leeNone, leeAnd, leeOr);
   
   procedure MakeIdentTable;
   var
  
positive.code:           FOnUnDefDirect(Self);
        end;
    end;
  end;
  
  procedure TmwBasePasLex.ColonProc;
  
negative.code:           FOnIfOptDirect(Self);
        end;
      PtIfDirect:
  
        begin
          if FUseDefines then
            EnterDefineBlock(EvaluateConditionalExpression(DirectiveParam));
          if Assigned(FOnIfDirect) then
            FOnIfDirect(Self);
        end;
  