Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/sml-mode/sml-move.el
ViewVC logotype

Diff of /sml/trunk/sml-mode/sml-move.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 334, Thu Jun 17 02:43:15 1999 UTC revision 339, Thu Jun 17 16:14:01 1999 UTC
# Line 227  Line 227 
227         ((and prec op-prec (>= prec op-prec)) nil)         ((and prec op-prec (>= prec op-prec)) nil)
228         ;; special rules for nested constructs like if..then..else         ;; special rules for nested constructs like if..then..else
229         ((and (or (not prec) (and prec op-prec))         ((and (or (not prec) (and prec op-prec))
230               (setq match (cdr (assoc op sml-close-paren))))               (setq match (second (assoc op sml-close-paren))))
231          (sml-find-match-backward (concat "\\<" op "\\>") match))          (sml-find-match-backward (concat "\\<" op "\\>") match))
232         ;; don't back over open-parens         ;; don't back over open-parens
233         ((assoc op sml-open-paren) nil)         ((assoc op sml-open-paren) nil)

Legend:
Removed from v.334  
changed lines
  Added in v.339

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0