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

When there's no data, VV, compiler_data_text and compiler_data_text_size should not be used

Browse source
This commit is contained in:
jjgarcia 2004-08-09 08:18:41 +00:00
parent f97de40586
commit c910c2682e
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/cmp/cmptop.lsp
View file

@ -148,6 +148,9 @@
(let ((num-objects (data-size)))
(if (zerop num-objects)
(progn
(wt-h "#undef ECL_DYNAMIC_VV")
(wt-h "#define compiler_data_text \"\"")
(wt-h "#define compiler_data_text_size 0")
(wt-h "#define VM " num-objects 0)
(wt-h "#define VV NULL"))
(progn