removed unnecessary logging
svn: r16845
This commit is contained in:
parent
72f4eec8c8
commit
4920613774
|
@ -73,7 +73,6 @@ Scheme_Object *PRIM_APPLY_NAME(Scheme_Object *rator,
|
|||
GC_CAN_IGNORE Scheme_Object *v;
|
||||
MZ_CONT_MARK_POS -= 2;
|
||||
|
||||
LOG_PRIM_W_NAME("_scheme_apply");
|
||||
|
||||
v = _scheme_apply(rator, argc, argv);
|
||||
MZ_CONT_MARK_POS += 2;
|
||||
|
@ -82,7 +81,6 @@ Scheme_Object *PRIM_APPLY_NAME(Scheme_Object *rator,
|
|||
#else
|
||||
# if PRIM_CHECK_VALUE
|
||||
{
|
||||
LOG_PRIM_W_NAME("_scheme_apply_multi");
|
||||
|
||||
GC_CAN_IGNORE Scheme_Object *v;
|
||||
MZ_CONT_MARK_POS -= 2;
|
||||
|
@ -91,7 +89,6 @@ Scheme_Object *PRIM_APPLY_NAME(Scheme_Object *rator,
|
|||
return v;
|
||||
}
|
||||
# else
|
||||
LOG_PRIM_W_NAME("_scheme_tail_apply");
|
||||
|
||||
return _scheme_tail_apply(rator, argc, argv);
|
||||
# endif
|
||||
|
|
Loading…
Reference in New Issue
Block a user