Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
e936de0b
Commit
e936de0b
authored
Apr 15, 1997
by
Richard M. Stallman
Browse files
(pascal-mode): Set comment-start.
parent
20606f3d
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
4 additions
and
2 deletions
+4
-2
lisp/progmodes/pascal.el
lisp/progmodes/pascal.el
+4
-2
No files found.
lisp/progmodes/pascal.el
View file @
e936de0b
...
...
@@ -98,7 +98,7 @@
(
defvar
pascal-imenu-generic-expression
'
(
"^[ \t]*\\(function\\|procedure\\)[ \t\n]+\\([a-zA-Z0-9_.:]+\\)"
.
(
2
))
"Imenu expression for Pascal-mode. See `imenu-generic-expression'."
)
(
defvar
pascal-keywords
'
(
"and"
"array"
"begin"
"case"
"const"
"div"
"do"
"downto"
"else"
"end"
"file"
"for"
"function"
"goto"
"if"
"in"
"label"
"mod"
"nil"
"not"
"of"
...
...
@@ -301,7 +301,7 @@ Variables controlling indentation/edit style:
Non-nil means a comment { ... } is set after the ends which ends cases and
functions. The name of the function or case will be set between the braces.
pascal-auto-lineup (default t)
List of contexts where auto lineup of :'s or ='s hould be done.
List of contexts where auto lineup of :'s or ='s
s
hould be done.
See also the user variables pascal-type-keywords, pascal-start-keywords and
pascal-separator-keywords.
...
...
@@ -319,6 +319,8 @@ no args, if that value is non-nil."
(setq indent-line-function 'pascal-indent-line)
(make-local-variable 'comment-indent-function)
(setq comment-indent-function 'pascal-indent-comment)
(make-local-variable 'comment-start)
(setq comment-start "{")
(make-local-variable 'parse-sexp-ignore-comments)
(setq parse-sexp-ignore-comments nil)
(make-local-variable 'case-fold-search)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment