From 43bc67fd375e6a67f9a6ff711e711b326590756f Mon Sep 17 00:00:00 2001
From: Juan Jose Garcia Ripoll <jjgarcia@users.sourceforge.net>
Date: Tue, 2 Aug 2011 22:06:38 +0200
Subject: [PATCH] Export the signal constants from the EXT package.

---
 src/c/unixint.d | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/c/unixint.d b/src/c/unixint.d
index 7ba054b58..a8dcb1911 100644
--- a/src/c/unixint.d
+++ b/src/c/unixint.d
@@ -1194,7 +1194,8 @@ create_signal_code_constants()
 	for (i = 0; known_signals[i].code >= 0; i++) {
 		cl_object name =
 			_ecl_intern(known_signals[i].text,
-				    cl_core.system_package);
+				    cl_core.ext_package);
+                cl_export2(name, cl_core.ext_package);
 		si_Xmake_constant(name, MAKE_FIXNUM(known_signals[i].code));
 	}
 }