Browse Source

* test exitcode 217

peter 22 years ago
parent
commit
f51646dfd5
1 changed files with 6 additions and 6 deletions
  1. 6 6
      tests/tbs/tb0449.pp

+ 6 - 6
tests/tbs/tb0449.pp

@@ -1,23 +1,23 @@
-{ %NORUN }
-
+{ %RESULT=217 }
 
 {$ifdef fpc}
 {$mode objfpc}
 {$endif}
-uses sysutils;
+uses SysUtils;
 
 type
-
   EWbcError = class of Exception;
   
-  
 Begin
   raise EwbcError.create('Hello');
 end.
 
 {
   $Log$
-  Revision 1.1  2003-02-02 13:46:06  carl
+  Revision 1.2  2003-10-31 16:15:26  peter
+    * test exitcode 217
+
+  Revision 1.1  2003/02/02 13:46:06  carl
    + exception testing
 
 }