* handle type changed to thandle in do_isdevice

rtl/emx/system.pas

@@ -705,7 +705,7 @@ begin
 end;
 
 {$ASMMODE INTEL}
-function do_isdevice (Handle: longint): boolean; assembler;
+function do_isdevice (Handle: THandle): boolean; assembler;
 (*
 var HT, Attr: longint;
 begin
@@ -1333,7 +1333,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.27  2004-09-03 19:25:41  olle
+  Revision 1.28  2004-09-18 11:12:49  hajny
+    * handle type changed to thandle in do_isdevice
+
+  Revision 1.27  2004/09/03 19:25:41  olle
     + added maxExitCode to all System.pp
     * constrained error code to be below maxExitCode in RunError et. al.
 

rtl/go32v2/system.pp

@@ -1370,7 +1370,7 @@ begin
 end;
 
 
-function do_isdevice(handle:longint):boolean;
+function do_isdevice(handle:THandle):boolean;
 var
   regs : trealregs;
 begin
@@ -1623,7 +1623,10 @@ Begin
 End.
 {
   $Log$
-  Revision 1.38  2004-09-03 19:25:49  olle
+  Revision 1.39  2004-09-18 11:17:17  hajny
+    * handle type changed to thandle in do_isdevice
+
+  Revision 1.38  2004/09/03 19:25:49  olle
     + added maxExitCode to all System.pp
     * constrained error code to be below maxExitCode in RunError et. al.
 

rtl/os2/system.pas

@@ -906,7 +906,7 @@ begin
 {$endif}
 end;
 
-function do_isdevice (Handle: longint): boolean;
+function do_isdevice (Handle: THandle): boolean;
 var
   HT, Attr: cardinal;
 begin
@@ -1621,7 +1621,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.73  2004-09-11 19:43:11  hajny
+  Revision 1.74  2004-09-18 11:12:09  hajny
+    * handle type changed to thandle in do_isdevice
+
+  Revision 1.73  2004/09/11 19:43:11  hajny
     * missing MaxExitCode added
 
   Revision 1.72  2004/07/18 15:20:38  hajny