* 64bit fixes

ide/fpviews.pas

@@ -881,6 +881,7 @@ end;
 function GetAsmReservedWordCount: integer;
 begin
   GetAsmReservedWordCount:=ord(lastop) - ord(firstop)
+{$ifndef x86_64}
 {$ifndef powerpc}
 {$ifndef arm}
     + CondAsmOps*(ord(high(TasmCond))-ord(low(TasmCond)));
@@ -892,6 +893,7 @@ begin
 {$else powerpc}
    + CondAsmOps*(ord(high(TAsmCondFlag))-ord(low(TAsmCondFlag)));
 {$endif powerpc}
+{$endif x86_64}
 end;
 
 
@@ -2066,7 +2068,7 @@ begin
       else if Editor^.GetModified and (Editor^.Core^.GetBindingCount=1) then
         begin
           PA[1]:=@AFileName;
-          longint(PA[2]):={Editor^.ChangedLine}-1;
+          Ptrint(PA[2]):={Editor^.ChangedLine}-1;
           EditorDialog(edChangedOnloading,@PA);
         end;
    end;
@@ -4580,7 +4582,10 @@ end;
 END.
 {
   $Log$
-  Revision 1.43  2004-03-20 22:02:41  florian
+  Revision 1.44  2004-05-03 21:12:54  peter
+    * 64bit fixes
+
+  Revision 1.43  2004/03/20 22:02:41  florian
     * compilation on arm fixed
 
   Revision 1.42  2003/05/07 21:33:22  peter

ide/wcedit.pas

@@ -1778,7 +1778,7 @@ begin
   if GetModified and (Core^.GetBindingCount=1) then
     begin
       PA[1]:=@FileName;
-      longint(PA[2]):=Core^.GetChangedLine;
+      Ptrint(PA[2]):=Core^.GetChangedLine;
       EditorDialog(edChangedOnloading,@PA);
     end;
   Core^.OnDiskLoadTime:=Cardinal(GetFileTime(FileName));
@@ -2071,7 +2071,10 @@ end;
 END.
 {
  $Log$
- Revision 1.18  2003-06-19 15:20:29  pierre
+ Revision 1.19  2004-05-03 21:12:54  peter
+   * 64bit fixes
+
+ Revision 1.18  2003/06/19 15:20:29  pierre
   * add explicit typecast to OnDiskLoadTime assignments
 
  Revision 1.17  2002/12/18 16:10:01  pierre

ide/wnghelp.pas

@@ -283,7 +283,7 @@ begin
       S:=StrPas(LineP);
       ParamS:=NGDecompressStr(S);
       CallPointerLocal(LineEnumProc,PreviousFramePointer,@ParamS);
-      Inc(longint(LineP),length(S)+1);
+      Inc(Ptrint(LineP),length(S)+1);
     end;
     if Assigned(LinkEnumProc) and (SeeAlsoOfs>0) then
     begin
@@ -297,8 +297,8 @@ begin
         LR.Name:=S;
         Move(NextLinkOfsPtr^,LR.FilePos,4);
         CallPointerLocal(LinkEnumProc,PreviousFramePointer,@LR);
-        Inc(longint(NextLinkNamePtr),length(S)+1);
-        Inc(longint(NextLinkOfsPtr),4);
+        Inc(Ptrint(NextLinkNamePtr),length(S)+1);
+        Inc(Ptrint(NextLinkOfsPtr),4);
       end;
     end;
   end;
@@ -520,7 +520,10 @@ end;
 END.
 {
   $Log$
-  Revision 1.3  2002-09-07 15:40:50  peter
+  Revision 1.4  2004-05-03 21:12:54  peter
+    * 64bit fixes
+
+  Revision 1.3  2002/09/07 15:40:50  peter
     * old logs removed and tabs fixed
 
 }