462 |
return make_fixnum((enum aelttype) i); |
return make_fixnum((enum aelttype) i); |
463 |
if (x == sLlong_float || x == sLsingle_float || x == sLdouble_float) |
if (x == sLlong_float || x == sLsingle_float || x == sLdouble_float) |
464 |
return make_fixnum(aet_lf); |
return make_fixnum(aet_lf); |
465 |
|
if (x==sLpositive_char) |
466 |
|
return make_fixnum(aet_char); |
467 |
|
if (x==sLpositive_short) |
468 |
|
return make_fixnum(aet_short); |
469 |
|
if (x==sLpositive_fixnum) |
470 |
|
return make_fixnum(aet_fix); |
471 |
return make_fixnum(aet_object); |
return make_fixnum(aet_object); |
472 |
} |
} |
473 |
#ifdef STATIC_FUNCTION_POINTERS |
#ifdef STATIC_FUNCTION_POINTERS |