anchor.diff:  function ObjectIsError(obj: TSuperObject): boolean;
   function ObjectIsType(const obj: ISuperObject; typ: TSuperType): boolean;
   function ObjectGetType(const obj: ISuperObject): TSuperType;
  +function ObjectIsNull(const obj: ISuperObject): Boolean;
   
   function ObjectFindFirst(const obj: ISuperObject; var F: TSuperObjectIter): boolean;
   function ObjectFindNext(var F: TSuperObjectIter): boolean;
  
positive.code: {$ENDIF}
      property A[const path: SOString]: TSuperArray read GetA;
  
  {$IFDEF SUPER_METHOD}
      function call(const path: SOString; const param: ISuperObject = nil): ISuperObject; overload; virtual;
      function call(const path, param: SOString): ISuperObject; overload; virtual;
  {$ENDIF}
  
negative.code:                     state := stMin;
                    end else
                      goto error;
               ',', '.':
                  begin
                    Inc(p);
                    state := stMs;
  