143 |
y = SCM_CDR(y); |
y = SCM_CDR(y); |
144 |
goto tailrecurse; |
goto tailrecurse; |
145 |
} |
} |
146 |
if (SCM_TYP7S (x) == scm_tc7_string && SCM_TYP7S (y) == scm_tc7_string) |
if (SCM_TYP7 (x) == scm_tc7_string && SCM_TYP7 (y) == scm_tc7_string) |
147 |
return scm_string_equal_p (x, y); |
return scm_string_equal_p (x, y); |
148 |
/* This ensures that types and scm_length are the same. */ |
/* This ensures that types and scm_length are the same. */ |
149 |
if (SCM_CELL_TYPE (x) != SCM_CELL_TYPE (y)) |
if (SCM_CELL_TYPE (x) != SCM_CELL_TYPE (y)) |