/* Copyright (C) 1995 Free Software Foundation.
+ Copyright (C) 1999,2000,2001,2002,2003,2005,2006,2007 MORIOKA Tomohiko
This file is part of XEmacs.
int i, len;
char *p;
Lisp_Object temp;
- struct Lisp_String *s;
+ Lisp_String *s;
CHECK_CONS (pattern);
len = XINT (Flength (pattern));
#endif /* MULE_REGEXP */
+#ifdef UTF2000
+Lisp_Object Vxemacs_chise_version;
+#endif
+
\f
void
syms_of_mule (void)
Fprovide (intern ("mule"));
+#ifdef UTF2000
+ Fprovide (intern ("utf-2000"));
+
+ Vxemacs_chise_version = build_string("0.24 (Kasagi)");
+ DEFVAR_LISP ("xemacs-chise-version", &Vxemacs_chise_version /*
+Version number of XEmacs CHISE.
+*/ );
+ DEFVAR_LISP ("utf-2000-version", &Vxemacs_chise_version /*
+Version number of XEmacs CHISE.
+*/ );
+#endif
+
+#ifdef HAVE_CHISE
+ Fprovide (intern ("chise"));
+#endif
+
#ifdef HAVE_EGG
Fprovide (intern ("egg"));
#endif