comparison src/mule.c @ 398:74fd4e045ea6 r21-2-29

Import from CVS: tag r21-2-29
author cvs
date Mon, 13 Aug 2007 11:13:30 +0200
parents c5d627a313b1
children 697ef44129c6
comparison
equal deleted inserted replaced
397:f4aeb21a5bad 398:74fd4e045ea6
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!");