mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 10:31:37 -08:00
Code Issues Projects Releases Wiki Activity

Oops, forgot to remove mps-specific comment.

Browse source 
Copied from Perforce
 Change: 180376
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Gareth Rees 2012-11-06 19:43:21 +00:00
parent e8ad32e097
commit d32dc9d43f
1 changed files with 2 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

8
mps/example/scheme/scheme-boehm.c
View file

@ -3202,13 +3202,9 @@ static obj_t entry_hashtable_keys(obj_t env, obj_t op_env, obj_t operator, obj_t
}
/* entry_gc -- full garbage collection now %%MPS
*
* This is an example of a direct interface from the language to the MPS.
* The `gc` function in Scheme will cause the MPS to perform a complete
* garbage collection of the entire arena right away. See topic/arena.
/* (gc)
* Run a full garbage collection now.
*/
static obj_t entry_gc(obj_t env, obj_t op_env, obj_t operator, obj_t operands)
{
eval_args(operator->operator.name, env, op_env, operands, 0);