Skip to content

Commit f16d02d

Browse files
committed
Default new exceptions to EX_CAT_CATCH
I don't know if this is right, but it's less wrong than defaulting them to an invalid (0) category that is impossible to catch.
1 parent 05231f5 commit f16d02d

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

src/vm/jvm/runtime/org/perl6/nqp/sixmodel/reprs/VMExceptionInstance.java

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,13 @@
11
package org.perl6.nqp.sixmodel.reprs;
22

33
import org.perl6.nqp.runtime.CallFrame;
4+
import org.perl6.nqp.runtime.ExceptionHandling;
45
import org.perl6.nqp.sixmodel.SixModelObject;
56

67
public class VMExceptionInstance extends SixModelObject {
78
public String message;
89
public SixModelObject payload;
9-
public long category;
10+
public long category = ExceptionHandling.EX_CAT_CATCH;
1011
public boolean resumable;
1112
public CallFrame origin;
1213
public StackTraceElement[] nativeTrace;

0 commit comments

Comments
 (0)