From ae68898f20bce4790e6b0625c0bd2fb0afe17ef0 Mon Sep 17 00:00:00 2001
From: dimitr <dimitr@users.sourceforge.net>
Date: Sat, 15 Jun 2013 05:57:48 +0000
Subject: [PATCH] Fixed CORE-4117: Ignoring computed by field as Exception
 parameter.

---
 src/jrd/cmp.cpp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/jrd/cmp.cpp b/src/jrd/cmp.cpp
index b5f3d1deb9..555f1154a9 100644
--- a/src/jrd/cmp.cpp
+++ b/src/jrd/cmp.cpp
@@ -4213,8 +4213,8 @@ jrd_nod* CMP_pass1(thread_db* tdbb, CompilerScratch* csb, jrd_nod* node)
 		}
 
 	case nod_abort:
-		CMP_pass1(tdbb, csb, node->nod_arg[e_xcp_msg]);
-		break;
+		node->nod_arg[e_xcp_msg] = CMP_pass1(tdbb, csb, node->nod_arg[e_xcp_msg]);
+		return node;
 
 	case nod_not:
 		sub = node->nod_arg[0];