core: Remove gc_show.
* mes.c (gc_show): Remove.
This commit is contained in:
parent
97dfc3c981
commit
13dd5a1013
18
mes.c
18
mes.c
|
@ -989,24 +989,6 @@ gc_flip ()
|
||||||
return stack;
|
return stack;
|
||||||
}
|
}
|
||||||
|
|
||||||
SCM
|
|
||||||
gc_show ()
|
|
||||||
{
|
|
||||||
fprintf (stderr, "cells: ");
|
|
||||||
scm *t = g_cells;
|
|
||||||
display_ (stderr, -1);
|
|
||||||
fprintf (stderr, "\n");
|
|
||||||
if (g_news)
|
|
||||||
{
|
|
||||||
fprintf (stderr, "news: ");
|
|
||||||
g_cells = g_news;
|
|
||||||
display_ (stderr, -1);
|
|
||||||
fprintf (stderr, "\n");
|
|
||||||
}
|
|
||||||
g_cells = t;
|
|
||||||
return cell_unspecified;
|
|
||||||
}
|
|
||||||
|
|
||||||
// Environment setup
|
// Environment setup
|
||||||
SCM
|
SCM
|
||||||
acons (SCM key, SCM value, SCM alist)
|
acons (SCM key, SCM value, SCM alist)
|
||||||
|
|
Loading…
Reference in a new issue