mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-21 12:03:40 -08:00
Code Issues Projects Releases Packages Wiki Activity

Export the signal constants from the EXT package.

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2011-08-02 22:06:38 +02:00
parent 7278358db3
commit 43bc67fd37
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/c/unixint.d
View file

@ -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));
}
}