Remove unused variable.
This commit is contained in:
parent
b9b71b20cc
commit
b1ba506b52
|
@ -4547,7 +4547,6 @@ static void add_type(Optimize_Info *info, Scheme_Object *var, Scheme_Object *pre
|
||||||
static void add_type_no(Optimize_Info *info, Scheme_Object *var, Scheme_Object *pred)
|
static void add_type_no(Optimize_Info *info, Scheme_Object *var, Scheme_Object *pred)
|
||||||
/* Currently only check a few special cases for lists. */
|
/* Currently only check a few special cases for lists. */
|
||||||
{
|
{
|
||||||
Scheme_Hash_Tree *new_types = info->types;
|
|
||||||
Scheme_Object *old_pred;
|
Scheme_Object *old_pred;
|
||||||
|
|
||||||
if (SCHEME_VAR(var)->mutated)
|
if (SCHEME_VAR(var)->mutated)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user