Ignore:
Timestamp:
Mar 2, 2008, 12:29:06 AM (14 years ago)
Author:
Sam Hocevar
Message:
  • Fix almost 2,000 warnings by using proper "const" keywords where needed.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • abuse/trunk/src/include/lisp.hpp

    r19 r39  
    139139void *lisp_eq(void *n1, void *n2);
    140140void *lisp_equal(void *n1, void *n2);
    141 lisp_symbol *find_symbol(char *name);
     141lisp_symbol *find_symbol(char const *name);
    142142long list_length(void *i);
    143143void lprint(void *i);
     
    146146void *eval_function(lisp_symbol *sym, void *arg_list);
    147147void *eval_user_fun(lisp_symbol *sym, void *arg_list);
    148 void *compile(char *&s);
     148void *compile(char const *&s);
    149149void *symbol_value(void *symbol);
    150150void *symbol_function(void *symbol);
     
    155155void resize_tmp(int new_size);
    156156void resize_perm(int new_size);
    157 lisp_symbol *make_find_symbol(char *name);
     157lisp_symbol *make_find_symbol(char const *name);
    158158
    159159void push_onto_list(void *object, void *&list);
    160160lisp_symbol *add_c_object(void *symbol, int16_t number);
    161 lisp_symbol *add_c_function(char *name, short min_args, short max_args, short number);
    162 lisp_symbol *add_c_bool_fun(char *name, short min_args, short max_args, short number);
    163 lisp_symbol *add_lisp_function(char *name, short min_args, short max_args, short number);
     161lisp_symbol *add_c_function(char const *name, short min_args, short max_args, short number);
     162lisp_symbol *add_c_bool_fun(char const *name, short min_args, short max_args, short number);
     163lisp_symbol *add_lisp_function(char const *name, short min_args, short max_args, short number);
    164164int read_ltoken(char *&s, char *buffer);
    165165cons_cell *new_cons_cell();
     
    170170lisp_pointer *new_lisp_pointer(void *addr);
    171171lisp_character *new_lisp_character(uint16_t ch);
    172 lisp_string *new_lisp_string(char *string);
    173 lisp_string *new_lisp_string(char *string, int length);
     172lisp_string *new_lisp_string(char const *string);
     173lisp_string *new_lisp_string(char const *string, int length);
    174174lisp_string *new_lisp_string(int length);
    175175lisp_fixed_point *new_lisp_fixed_point(int32_t x);
Note: See TracChangeset for help on using the changeset viewer.