Fix a compile warning

slava 2006-12-04 05:06:45 +00:00
parent fac30d92c9
commit bdf2cc8abe
1 changed files with 1 additions and 1 deletions

View File

@ -137,7 +137,7 @@ void finalize_code_block(F_COMPILED *relocating, CELL code_start,
CELL scan;
if(relocating->finalized != false)
critical_error("Finalizing a finalized block",relocating);
critical_error("Finalizing a finalized block",(CELL)relocating);
for(scan = words_start; scan < words_end; scan += CELLS)
put(scan,untag_word(get(scan))->xt);