Ignore:
Timestamp:
Nov 10, 2005, 9:41:13 PM (17 years ago)
Author:
Sam Hocevar
Message:
  • absolute shitloads of 64 bit fixes.
File:
1 edited

Legend:

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

    r16 r17  
    508508      return (((lisp_fixed_point *)lnumber)->x)>>16;
    509509    case L_STRING :
    510       return (uchar)*lstring_value(lnumber);
     510      return (uint8_t)*lstring_value(lnumber);
    511511    case L_CHARACTER :
    512512      return lcharacter_value(lnumber);
     
    13071307        s++;
    13081308        if (*s=='n')
    1309           current_print_file->write_byte('\n');
     1309          current_print_file->write_uint8('\n');
    13101310        else if (*s=='r')
    1311           current_print_file->write_byte('\r');
     1311          current_print_file->write_uint8('\r');
    13121312        else if (*s=='t')
    1313           current_print_file->write_byte('\t');
     1313          current_print_file->write_uint8('\t');
    13141314        else if (*s=='\\')
    1315           current_print_file->write_byte('\\');
     1315          current_print_file->write_uint8('\\');
    13161316      }
    13171317      else*/
    1318         current_print_file->write_byte(*s);
     1318        current_print_file->write_uint8(*s);
    13191319    }
    13201320  }
     
    14041404                                if (current_print_file)
    14051405                                {
    1406                                   uchar ch=((lisp_character *)i)->ch;
     1406                                  uint8_t ch=((lisp_character *)i)->ch;
    14071407                                  current_print_file->write(&ch,1);
    14081408                                } else
Note: See TracChangeset for help on using the changeset viewer.