Ignore:
Timestamp:
Apr 17, 2011, 10:28:12 AM (7 years ago)
Author:
Sam Hocevar
Message:

lisp: make all lisp object inherit a common type.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • abuse/trunk/src/compiled.cpp

    r481 r482  
    4545  if (sym)
    4646  {
    47     if (item_type(((lisp_symbol *)sym)->value)!=L_NUMBER)
     47    if (item_type(((LispSymbol *)sym)->value)!=L_NUMBER)
    4848      compile_error=1;
    4949    else
    50       return lnumber_value(((lisp_symbol *)sym)->value);
     50      return lnumber_value(((LispSymbol *)sym)->value);
    5151  } else compile_error=1;
    5252  return 0;
Note: See TracChangeset for help on using the changeset viewer.