mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2025-12-06 02:40:26 -08:00
Code Issues Projects Releases Packages Wiki Activity

In the bytecodes compiler, export some symbols which are used in the ANSI test suite

Browse source
This commit is contained in:
Juanjo Garcia-Ripoll 2012-04-18 22:35:42 +02:00 • committed by Juan Jose Garcia Ripoll
parent c0b462b4a6
commit 92983005ed
1 changed files with 6 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

6
contrib/bytecmp/bytecmp.lsp Normal file → Executable file
View file

@ -16,6 +16,12 @@
(in-package "EXT")
(defpackage "C"
(:use "CL")
(:export
"*SUPPRESS-COMPILER-WARNINGS*"
"*SUPPRESS-COMPILER-NOTES*"))
(defun bc-disassemble (thing)
(when (si::valid-function-name-p thing)
(setq thing (fdefinition thing)))