/[gcl]/gcl/o/string.d
ViewVC logotype

Diff of /gcl/o/string.d

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.10 by camm, Sat Jul 23 08:55:08 2005 UTC revision 1.11 by camm, Sun Sep 18 02:48:59 2005 UTC
# Line 404  LFD(Lstring_not_equal)()   { string_sign Line 404  LFD(Lstring_not_equal)()   { string_sign
404                 char_bits(initial_element) != 0 ||                 char_bits(initial_element) != 0 ||
405                 char_font(initial_element) != 0)                 char_font(initial_element) != 0)
406                  initial_element                  initial_element
407                  = wrong_type_argument(sLstring_char, initial_element);                  = wrong_type_argument(sLcharacter, initial_element);
408          {BEGIN_NO_INTERRUPT;              {BEGIN_NO_INTERRUPT;    
409          x = alloc_simple_string(fix(size));          x = alloc_simple_string(fix(size));
410          x->st.st_self = alloc_relblock(fix(size));          x->st.st_self = alloc_relblock(fix(size));

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26