Lines Matching refs:st
145 (let ((st (make-syntax-table (standard-syntax-table))))
146 (modify-syntax-entry ?\n ">" st)
147 (modify-syntax-entry ?# "<" st)
150 (modify-syntax-entry ?$ "/" st)
151 (modify-syntax-entry ?% ". p" st)
152 (modify-syntax-entry ?@ ". p" st)
153 (modify-syntax-entry ?& "." st)
154 (modify-syntax-entry ?\' "\"" st)
155 (modify-syntax-entry ?* "." st)
156 (modify-syntax-entry ?+ "." st)
157 (modify-syntax-entry ?- "." st)
158 (modify-syntax-entry ?/ "." st)
159 (modify-syntax-entry ?< "." st)
160 (modify-syntax-entry ?= "." st)
161 (modify-syntax-entry ?> "." st)
162 (modify-syntax-entry ?\\ "\\" st)
163 (modify-syntax-entry ?` "\"" st)
164 (modify-syntax-entry ?| "." st)
165 st)
285 (let ((st (copy-syntax-table)))
287 (dotimes (i 256) (aset st i '(1)))
288 (modify-syntax-entry ?\\ "\\" st)
289 st)
294 (st (copy-syntax-table perl-empty-syntax-table)))
296 (modify-syntax-entry char "\"" st)
297 (modify-syntax-entry char "(" st)
298 (modify-syntax-entry close ")" st))
299 st))
337 (st (perl-quote-syntax-table char)))
340 (with-syntax-table st
350 (with-syntax-table st