CLJ-2529 Set exception phase for runtime exceptions caught in Compiler.load()

puredanger · puredanger · commit 4a9ce390519c · 2022-02-02T14:45:14.000-06:00
Signed-off-by: Alex Miller &lt;alex.miller@cognitect.com&gt;
diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java
@@ -7662,7 +7662,7 @@ public static Object load(Reader rdr, String sourcePath, String sourceName) {
 	catch(Throwable e)
 		{
 		if(!(e instanceof CompilerException))
-			throw new CompilerException(sourcePath, (Integer) LINE_BEFORE.deref(), (Integer) COLUMN_BEFORE.deref(), e);
+			throw new CompilerException(sourcePath, (Integer) LINE_BEFORE.deref(), (Integer) COLUMN_BEFORE.deref(), null, CompilerException.PHASE_EXECUTION, e);
 		else
 			throw (CompilerException) e;
 		}

Original file line number	Diff line number	Diff line change
`@@ -7662,7 +7662,7 @@ public static Object load(Reader rdr, String sourcePath, String sourceName) {`
`7662`	`7662`	`catch(Throwable e)`
`7663`	`7663`	`{`
`7664`	`7664`	`if(!(e instanceof CompilerException))`
`7665`		`- throw new CompilerException(sourcePath, (Integer) LINE_BEFORE.deref(), (Integer) COLUMN_BEFORE.deref(), e);`
	`7665`	`+ throw new CompilerException(sourcePath, (Integer) LINE_BEFORE.deref(), (Integer) COLUMN_BEFORE.deref(), null, CompilerException.PHASE_EXECUTION, e);`
`7666`	`7666`	`else`
`7667`	`7667`	`throw (CompilerException) e;`
`7668`	`7668`	`}`