Commit e7d795eb authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(pascal-mode-syntax-table): Give \ punctuation syntax.

parent 14c5f080
...@@ -59,9 +59,6 @@ ...@@ -59,9 +59,6 @@
;;; Code: ;;; Code:
(defconst pascal-mode-version "2.4"
"Version of `pascal.el'.")
(defvar pascal-mode-abbrev-table nil (defvar pascal-mode-abbrev-table nil
"Abbrev table in use in Pascal-mode buffers.") "Abbrev table in use in Pascal-mode buffers.")
(define-abbrev-table 'pascal-mode-abbrev-table ()) (define-abbrev-table 'pascal-mode-abbrev-table ())
...@@ -130,7 +127,7 @@ ...@@ -130,7 +127,7 @@
(if pascal-mode-syntax-table (if pascal-mode-syntax-table
() ()
(setq pascal-mode-syntax-table (make-syntax-table)) (setq pascal-mode-syntax-table (make-syntax-table))
(modify-syntax-entry ?\\ "\\" pascal-mode-syntax-table) (modify-syntax-entry ?\\ "." pascal-mode-syntax-table)
(modify-syntax-entry ?( "()1" pascal-mode-syntax-table) (modify-syntax-entry ?( "()1" pascal-mode-syntax-table)
(modify-syntax-entry ?) ")(4" pascal-mode-syntax-table) (modify-syntax-entry ?) ")(4" pascal-mode-syntax-table)
(modify-syntax-entry ?* ". 23" pascal-mode-syntax-table) (modify-syntax-entry ?* ". 23" pascal-mode-syntax-table)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment