소스 검색

- removed "INT64FUNCRESOK" define (no longer defined and already fixed,
fixes tests/cg/tcase)

git-svn-id: trunk@909 -

Jonas Maebe 20 년 전
부모
커밋
abeeb43ae7
1개의 변경된 파일0개의 추가작업 그리고 8개의 파일을 삭제
  1. 0 8
      compiler/ncon.pas

+ 0 - 8
compiler/ncon.pas

@@ -155,11 +155,7 @@ interface
     function genenumnode(v : tenumsym) : tordconstnode;
 
     { some helper routines }
-{$ifdef INT64FUNCRESOK}
     function get_ordinal_value(p : tnode) : TConstExprInt;
-{$else INT64FUNCRESOK}
-    function get_ordinal_value(p : tnode) : longint;
-{$endif INT64FUNCRESOK}
     function is_constresourcestringnode(p : tnode) : boolean;
     function str_length(p : tnode) : longint;
     function is_emptyset(p : tnode):boolean;
@@ -192,11 +188,7 @@ implementation
       end;
 
 
-{$ifdef INT64FUNCRESOK}
     function get_ordinal_value(p : tnode) : TConstExprInt;
-{$else INT64FUNCRESOK}
-    function get_ordinal_value(p : tnode) : longint;
-{$endif INT64FUNCRESOK}
       begin
         get_ordinal_value:=0;
         if is_constnode(p) then