/[gcl]/gcl/o/regexpr.c
ViewVC logotype

Diff of /gcl/o/regexpr.c

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

revision 1.13 by camm, Thu Sep 22 21:31:38 2005 UTC revision 1.14 by camm, Wed Oct 12 03:12:57 2005 UTC
# Line 67  DEFUN_NEW("COMPILE-REGEXP",object,fScomp Line 67  DEFUN_NEW("COMPILE-REGEXP",object,fScomp
67    char *tmp;    char *tmp;
68    object res;    object res;
69    void *v;    void *v;
70    fixnum sz;    fixnum sz=0;
71    
72    if (type_of(p)!= t_string && type_of(p)!=t_symbol)    if (type_of(p)!= t_string && type_of(p)!=t_symbol)
73      not_a_string_or_symbol(p);      not_a_string_or_symbol(p);

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

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