Permalink
Browse files

Un-TODO op/exit.t

  • Loading branch information...
1 parent f965a97 commit 127bc952a6dd4e9c5d3900222718210ef4b2c9e3 @Util Util committed Mar 1, 2011
Showing with 3 additions and 7 deletions.
  1. +3 −7 t/op/exit.t
View
10 t/op/exit.t
@@ -52,15 +52,11 @@ pir_exit_code_is( <<'CODE', 0, 'pir exits with success by default' );
.end
CODE
-TODO: {
- local $TODO = 'pasm exits with 1 by default';
- pasm_exit_code_is( <<'CODE', 0, 'exit with success by default' );
- set I0, 0
- end
+pasm_exit_code_is( <<'CODE', 0, 'exit with success by default' );
+ set I0, 0
+ end
CODE
-}
-
pir_exit_code_is( <<'CODE', 2, "pir exit code isn't exception type" );
.sub main :main
$P0 = new ['ExceptionHandler']

0 comments on commit 127bc95

Please sign in to comment.