Browse Source

* workaround rangecheck error, Mantis #22055. Possibly temporarily while
deciding what to do with that report.

git-svn-id: trunk@21625 -

marco 13 years ago
parent
commit
ac2de2c188
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/fcl-process/src/unix/process.inc

+ 1 - 1
packages/fcl-process/src/unix/process.inc

@@ -52,7 +52,7 @@ begin
       // else pass errorvalue unmodified like shell does, bug #22055
      end
    else
-    FexitCode:=-1; // was 0, better testable for abnormal exit.
+    FexitCode:=cardinal(-1); // was 0, better testable for abnormal exit.
 end;
 
 Type