comparison src/mule.c @ 440:8de8e3f6228a r21-2-28

Import from CVS: tag r21-2-28
author cvs
date Mon, 13 Aug 2007 11:33:38 +0200
parents 3ecd8885ac67
children 183866b06e0b
comparison
equal deleted inserted replaced
439:357dd071b03c 440:8de8e3f6228a
38 (pattern)) 38 (pattern))
39 { 39 {
40 int i, len; 40 int i, len;
41 char *p; 41 char *p;
42 Lisp_Object temp; 42 Lisp_Object temp;
43 struct Lisp_String *s; 43 Lisp_String *s;
44 44
45 CHECK_CONS (pattern); 45 CHECK_CONS (pattern);
46 len = XINT (Flength (pattern)); 46 len = XINT (Flength (pattern));
47 if (len > MAXWORDBUF) 47 if (len > MAXWORDBUF)
48 error ("Too complicated regular expression for word!"); 48 error ("Too complicated regular expression for word!");