syntax problem with #| ... |# lisp comments

This bug report will be sent to the XEmacs Development Team, not to your local site managers!! Please write in English, because the XEmacs maintainers do not have translators to read other languages for them. Please describe as succinctly as possible: - What happened. - What you thought should have happened. - Precisely what you were doing at the time. Please also include any C or lisp back-traces that you may have. ================================================================ Dear Bug Team! in lisp-mode, there is a problem with the syntactic highlighting and/or the way syntax is parsed during font locking (sorry for the wishy-washy terminology). consider this file: --test.lisp------- (+ 1 2) #| ( <- single open paren at beginning of line |# (+ 3 4) (+ 5 6) ------------------ upon load, the file is colored right (ie, the comment including delimiters is displayed using font-lock-comment-face. however, as soon as one edits the "|#" or "(+ 3 4)" lines, they will be displayed in font-lock-string-face (the `|' char is rightfully marked as a `"' string quote character class AND part of the two-character comment syntax in the lisp mode syntax table). this parsing mistake happens only if there is an open parenthesis at the beginning of a line inside the multiline comment. This example works just fine: --test.lisp------- (+ 1 2) #| ;( <- single open paren NOT at beginning of line |# (+ 3 4) (+ 5 6) ------------------ but it's often impractical to prefix everything with a comment char in order to fix the highlighting... -Tobias Kunze Briseño ================================================================ System Info to help track down your bug: --------------------------------------- uname -a: Linux eeyore 2.4.19-pre8-ac3 #1 Wed May 15 10:39:43 EDT 2002 i686 unknown ./configure '--with-sound=none,native' '--cflags=-O2 -g -Wall' '--with-x11' '--extra-verbose' '--with-site-lisp' '--statedir=/var/lib' '--infodir=/usr/share/info/xemacs-21.4.8' '--prefix=/usr' '--error-checking=none' '--debug=no' '--dynamic' '--with-gpm=no' '--with_menubars=lucid' '--with_scrollbars=lucid' '--with_dialogs=athena' '--docdir=/usr/lib/xemacs-21.4.8/i386-debian-linux/mule/' '--with-mule' '--with-canna=no' '--with-wnn=no' '--with-xim=xlib' '--with-xfs' '--package-path=~/.xemacs:~/.xemacs/packages:~/.xemacs/xemacs-packages::/usr/share/xemacs21/packages:/usr/share/xemacs21/mule-packages:/usr/share/xemacs21/site-packages' 'i386-debian-linux' XEmacs 21.4.8 "Honest Recruiter" configured for `i386-debian-linux'. Compilation / Installation: Source code location: /home/dres/project/debian/current/xemacs21/xemacs-21.4.8 Installation prefix: /usr Operating system description file: `s/linux.h' Machine description file: `m/intel386.h' Compiler: gcc -O2 -g -Wall Relocating allocator for buffers: no GNU version of malloc: yes - Using Doug Lea's new malloc from the GNU C Library. Linking with `-Xlinker -znocombreloc'. - Consider configuring with --pdump. Window System: Compiling in support for the X window system: - X Windows headers location: /usr/X11R6/include - X Windows libraries location: /usr/X11R6/lib - Handling WM_COMMAND properly. Compiling in support for the Athena widget set: - Athena headers location: X11/Xaw - Athena library to link: Xaw Using Lucid menubars. Using Lucid scrollbars. Using Athena dialog boxes. Using Athena native widgets. TTY: Compiling in support for ncurses. Images: Compiling in support for GIF images (builtin). Compiling in support for XPM images. Compiling in support for PNG images. Compiling in support for JPEG images. Compiling in support for TIFF images. Compiling in support for X-Face message headers. Sound: Compiling in support for sound (native). Databases: Compiling in support for Berkeley database. Compiling in support for LDAP. Compiling in support for PostgreSQL. - Using PostgreSQL header file: postgresql/libpq-fe.h - Using PostgreSQL V7 bindings. Internationalization: Compiling in support for Mule (multi-lingual Emacs). Compiling in support for XIM (X11R5+ I18N input method). - Using raw Xlib to provide XIM support. - Using XFontSet to provide bilingual menubar. Mail: Compiling in support for "dot-locking" mail spool file locking method. Other Features: Inhibiting IPv6 canonicalization at startup. Compiling in support for dynamic shared object modules. Load-Path Lisp Shadows: ---------------------- (/usr/share/xemacs21/site-lisp/gnuserv/gnuserv-compat /usr/share/xemacs21/site-lisp/gnuserv/gnuserv-compat /usr/share/xemacs21/site-lisp/gnuserv/gnuserv /usr/share/xemacs21/site-lisp/gnuserv/gnuserv /usr/share/xemacs21/site-lisp/gnuserv/devices /usr/share/xemacs21/site-lisp/gnuserv/devices /usr/share/xemacs21/site-lisp/x-face-el/x-face-xmas /usr/share/xemacs21/site-lisp/x-face-el/x-face-xmas /usr/share/xemacs21/site-lisp/x-face-el/x-face /usr/share/xemacs21/site-lisp/x-face-el/x-face /usr/share/xemacs21/site-lisp/x-face-el/x-face-e21 /usr/share/xemacs21/site-lisp/x-face-el/x-face-e21 /usr/share/xemacs21/site-lisp/debian-startup /usr/share/emacs/site-lisp/debian-startup /usr/share/xemacs21/site-lisp/gnuplot-mode/info-look.20.3 /usr/share/xemacs21/site-lisp/gnuplot-mode/info-look.20.3 /usr/share/xemacs21/site-lisp/gnuplot-mode/gnuplot /usr/share/xemacs21/site-lisp/gnuplot-mode/gnuplot /usr/share/xemacs21/site-lisp/gnuplot-mode/gnuplot-gui /usr/share/xemacs21/site-lisp/gnuplot-mode/gnuplot-gui /usr/share/xemacs21/site-lisp/timidity-el/timidity /usr/share/xemacs21/site-lisp/timidity-el/timidity /usr/share/emacs/site-lisp/tex-site /usr/share/xemacs21/packages/lisp/auctex/tex-site /home/tkunze/lib/el/backup-dir /usr/share/xemacs21/packages/lisp/edit-utils/backup-dir /usr/share/xemacs21/site-lisp/elib/stack-m /usr/share/xemacs21/packages/lisp/elib/stack-m /usr/share/xemacs21/site-lisp/elib/read /usr/share/xemacs21/packages/lisp/elib/read /usr/share/xemacs21/site-lisp/elib/queue-m /usr/share/xemacs21/packages/lisp/elib/queue-m /usr/share/xemacs21/site-lisp/elib/queue-f /usr/share/xemacs21/packages/lisp/elib/queue-f /usr/share/xemacs21/site-lisp/elib/avltree /usr/share/xemacs21/packages/lisp/elib/avltree /usr/share/xemacs21/site-lisp/elib/elib-node /usr/share/xemacs21/packages/lisp/elib/elib-node /usr/share/xemacs21/site-lisp/elib/cookie /usr/share/xemacs21/packages/lisp/elib/cookie /usr/share/xemacs21/site-lisp/elib/stack-f /usr/share/xemacs21/packages/lisp/elib/stack-f /usr/share/xemacs21/site-lisp/elib/dll /usr/share/xemacs21/packages/lisp/elib/dll /usr/share/xemacs21/site-lisp/elib/string /usr/share/xemacs21/packages/lisp/elib/string /usr/share/xemacs21/site-lisp/elib/bintree /usr/share/xemacs21/packages/lisp/elib/bintree /usr/share/xemacs21/site-lisp/elib/dll-debug /usr/share/xemacs21/packages/lisp/elib/dll-debug /usr/share/xemacs21/site-lisp/pcl-cvs/pcl-cvs /usr/share/xemacs21/packages/lisp/pcl-cvs/pcl-cvs /home/tkunze/lib/el/htmlize /usr/share/xemacs21/packages/lisp/text-modes/htmlize /etc/emacs/site-start /usr/share/xemacs21/site-packages/lisp/site-start /usr/share/xemacs21/site-lisp/gnuserv/gnuserv /usr/lib/xemacs-21.4.8/lisp/gnuserv) Installed XEmacs Packages: ------------------------- ((ada:version 1.1 :type regular) (apel :version 1.23 :type regular) (auctex :version 1.31 :type regular) (bbdb :version 1.2 :type regular) (c-support :version 1.16 :type single-file) (calc :version 1.23 :type regular) (calendar :version 1.18 :type regular) (cc-mode :version 1.28 :type regular) (clearcase :version 1.03 :type regular) (cookie :version 1.14 :type regular) (crisp :version 1.12 :type regular) (debug :version 1.15 :type regular) (dictionary :version 1.11 :type regular) (dired :version 1.12 :type regular) (edebug :version 1.14 :type regular) (ediff :version 1.41 :type regular) (edit-utils :version 1.85 :type single-file) (edt :version 1.12 :type regular) (efs :version 1.29 :type regular) (eieio :version 1.02 :type regular) (elib :version 1.1 :type single-file) (emerge :version 1.09 :type regular) (eshell :version 1.03 :type regular) (eterm :version 1.13 :type regular) (eudc :version 1.36 :type regular) (footnote :version 1.15 :type regular) (forms :version 1.14 :type regular) (frame-icon :version 1.09 :type regular) (fsf-compat :version 1.11 :type single-file) (games :version 1.13 :type regular) (gnats :version 1.14 :type regular) (gnus :version 1.6 :type regular) (haskell-mode :version 1.04 :type regular) (hm--html-menus :version 1.18 :type regular) (ibuffer :version 1.07 :type regular) (idlwave :version 1.25 :type regular) (igrep :version 1.08 :type regular) (ilisp :version 1.22 :type regular) (ispell :version 1.24 :type regular) (jde :version 1.35 :type regular) (liece :version 1.04 :type regular) (mail-lib :version 1.46 :type regular) (mailcrypt :version 2.11 :type regular) (mew :version 1.17 :type regular) (mh-e :version 1.14 :type regular) (mine :version 1.14 :type regular) (misc-games :version 1.15 :type single-file) (mmm-mode :version 1.0 :type regular) (net-utils :version 1.24 :type single-file) (os-utils :version 1.28 :type single-file) (pc :version 1.22 :type single-file) (pcl-cvs :version 1.61 :type regular) (pcomplete :version 1.01 :type regular) (prog-modes :version 1 .56 :type single-file) (ps-print :version 1.04 :type regular) (psgml :version 1.28 :type regular) (reftex :version 1.25 :type regular) (rmail :version 1.13 :type regular) (scheme :version 1.11 :type regular) (semantic :version 1.12 :type regular) (sgml :version 1.08 :type regular) (sh-script :version 1.15 :type regular) (sieve :version 1.02 :type regular) (slider :version 1.13 :type regular) (sounds-au :version 1.1 :type regular) (sounds-wav :version 1.1 :type regular) (speedbar :version 1.23 :type regular) (strokes :version 1.08 :type regular) (supercite :version 1.19 :type regular) (texinfo :version 1.2 :type regular) (text-modes :version 1.43 :type single-file) (textools :version 1.12 :type regular) (time :version 1.11 :type regular) (tm :version 1.32 :type regular) (tooltalk :version 1.13 :type regular) (tpu :version 1.12 :type regular) (tramp :version 1.05 :type regular) (vc :version 1.3 :type regular) (vc-cc :version 1.18 :type regular) (vhdl :version 1.15 :type regular) (view-process :version 1.11 :type regular) (viper :version 1.34 :type regular) (w3 :version 1.23 :type regular) (xemacs-base :version 1.63 :type regular) (xemacs-devel :version 1.44 :type single-file) (xslide :version 1.02 :type regular) (zenirc :version 1.13 :type regular) (edict :version 1.13 :type regular) (egg-its :version 1.26 :type regular) (latin-unity :version 1.05 :type regular) (leim :version 1.18 :type regular) (locale :version 1.18 :type regular) (lookup :version 1.1 :type regular) (mule-base :version 1.4 :type regular) (skk :version 1.22 :type regular) (mule-ucs :version 1.04 :type regular) (vm :version 7.04 :type regular) (build :version 1.05 :type regular)) Features: -------- (highlight-headers xemacsbug shadow apache-mode regexp-opt find-func cl-indent hyper-apropos cperl-mode javascript-mode cc-mode cc-align cc-cmds cc-engine cc-styles cc-langs cc-vars cc-menus imenu cc-defs css-mode edmacro rect sh-script skeleton executable view-less view man dired-faces dired-xemacs dired efs-cu paren blink-paren backup-dir ps-print lpr env file-hdr gnuserv-compat gnuserv gaudy-bibtex bibtex jka-compr pending-del filladapt gaudy-outline outline inf-lisp comint ring browse-url latex tex advice advice-preload font-lock x-compose iswitchb x-face-xmas x-face vm-macro mew-cache mew gnus-sum gnus-group gnus-undo nnmail mail-source format-spec gnus-start gnus-range gnus-spec gnus-int gnus-win gnus gnus-ems gnus-xmas wid-edit message messagexmas mml mm-decode mm-encode mailcap mm-bodies uudecode mail-parse rfc2045 rfc2231 rfc2047 qp ietf-drums mail-abbrevs sendmail rfc822 mailheader gnus-util time-date parse-time nnheader nnheaderxm mail-utils cus-face mm-util mail-prsvr alist ispell tex-site ada-autoloads apel-autoloads auctex-autoloads bbdb-autoloads c-support-autoloads calc-autoloads calendar-autoloads cc-mode-autoloads clearcase-autoloads cookie-autoloads crisp-autoloads debug-autoloads dictionary-autoloads dired-autoloads edebug-autoloads ediff-autoloads edit-utils-autoloads edt-autoloads efs-autoloads eieio-autoloads elib-autoloads emerge-autoloads eshell-autoloads eterm-autoloads eudc-autoloads footnote-autoloads forms-autoloads frame-icon-autoloads fsf-compat-autoloads games-autoloads gnats-autoloads gnus-autoloads haskell-mode-autoloads hm--html-menus-autoloads ibuffer-autoloads idlwave-autoloads igrep-autoloads ilisp-autoloads ispell-autoloads jde-autoloads liece-autoloads mail-lib-autoloads mailcrypt-autoloads mew-autoloads mh-e-autoloads mine-autoloads misc-games-autoloads mmm-mode-autoloads net-utils-autoloads os-utils-autoloads pc-autoloads pcl-cvs-autoloads pcomplete-autoloads prog-modes-autoloads ps-print-autoloads psgml-autoloads reftex-autoloads rmail-autoloads scheme-autoloads semantic-autoloads sgml-autoloads sh-script-autoloads sieve-autoloads slider-autoloads sounds-au-autoloads sounds-wav-autoloads speedbar-autoloads strokes-autoloads supercite-autoloads texinfo-autoloads text-modes-autoloads textools-autoloads time-autoloads tm-autoloads tooltalk-autoloads tpu-autoloads tramp-autoloads vc-autoloads vc-cc-autoloads vhdl-autoloads view-process-autoloads viper-autoloads w3-autoloads xemacs-base-autoloads xemacs-devel-autoloads xslide-autoloads zenirc-autoloads edict-autoloads egg-its-autoloads latin-unity-autoloads leim-autoloads locale-autoloads lookup-autoloads mule-base-autoloads skk-autoloads mule-autoloads mule-ucs-autoloads vm-autoloads build-autoloads lisp-autoloads loadhist auto-show fontl-hooks x-iso8859-1 slovenian czech romanian ccl mule-help code-cmds gutter-items menubar-items x-menubar mode-motion mouse itimer auto-save lisp-mode easymenu iso8859-1 page buff-menu lib-complete cus-file derived frame text-props obsolete cus-start custom widget cl-extra mini-cl cl cl-19 packages backquote very-early-lisp postgresqlv7 postgresql file-coding mule lucid-scrollbars cut-buffer lucid-menubars athena-dialogs x c-balloon-help tty-frames tty toolbar native-sound scrollbar unix-processes multicast network-streams subprocesses modules menu-accelerator-support menubar berkeley-db md5 xemacs xim gutter tiff png gif jpeg xface xpm xbm lisp-float-type linux dialog devices window-system base64) Recent keystrokes: ----------------- down down down down down down down down down down down down down down down down down down SPC BS SPC BS down C-x C-s left up up SPC BS down C-x C-s C-x k RET C-x C-f M-p RET down down down down down down down down down down down down down down down down down down down down down down down down down down down down SPC d s f ( BS BS BS BS ( RET C-x C-s M-x m a n BS BS BS r e p o r t - x e m TAB RET Recent messages (most recent first): ----------------------------------- Parsing /home/tkunze/.mailrc... Loading xemacsbug...done Loading xemacsbug... Wrote /home/tkunze/foo.lisp Fontifying foo.lisp... done. Fontifying foo.lisp... (regexps)... Fontifying foo.lisp... (regexps)... Fontifying foo.lisp... (syntactically). Fontifying foo.lisp... Wrote /home/tkunze/foo.lisp Wrote /home/tkunze/foo.lisp Fontifying foo.lisp... done. Fontifying foo.lisp... (regexps)... Fontifying foo.lisp... (regexps)... Fontifying foo.lisp... (syntactically). Fontifying foo.lisp... nil Wrote /home/tkunze/foo.lisp Fontifying httpd.conf... done. Loading apache-mode...done