Browse Source

* simplify Get/PutPtrUInt

git-svn-id: branches/avr@17049 -
florian 14 years ago
parent
commit
c0b6f9b0b0
1 changed files with 1 additions and 4 deletions
  1. 1 4
      compiler/symtype.pas

+ 1 - 4
compiler/symtype.pas

@@ -951,11 +951,8 @@ implementation
         {$if sizeof(TConstPtrUInt)=8}
         {$if sizeof(TConstPtrUInt)=8}
           putint64(int64(v));
           putint64(int64(v));
         {$else}
         {$else}
-        {$if sizeof(TConstPtrUInt)=4}
           putlongint(longint(v));
           putlongint(longint(v));
-        {$else}
-          internalerror(2002082601);
-        {$endif} {$endif}
+        {$endif}
       end;
       end;