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

Diff of /gcl/o/character.d

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

revision 1.11 by camm, Sun Sep 18 02:48:58 2005 UTC revision 1.12 by camm, Wed Nov 16 01:03:47 2005 UTC
# Line 534  int w, r; Line 534  int w, r;
534          case '\n':          case '\n':
535                  @(return STnewline)                  @(return STnewline)
536          }          }
537            if (char_code(c)<' ' || char_code(c) >='\177') {
538              object x=make_simple_string(" ");
539              x->st.st_self[0]=char_code(c);
540              @(return x)
541            }
542          @(return Cnil)          @(return Cnil)
543  @)  @)
544    

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

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