aboutsummaryrefslogtreecommitdiffhomepage
path: root/coq/coq-abbrev.el
diff options
context:
space:
mode:
authorGravatar Pierre Courtieu <courtieu@lri.fr>2006-08-21 07:50:05 +0000
committerGravatar Pierre Courtieu <courtieu@lri.fr>2006-08-21 07:50:05 +0000
commit933112fcc5c21c816649ded7cff3564d407ab9d5 (patch)
treec969192a08d7851e24d37513a9a06a6e4f067b46 /coq/coq-abbrev.el
parentb40cca6bde4d432934bdd6e38d7e7454f6e9ca5f (diff)
Started the coq-insert-tactic.
Diffstat (limited to 'coq/coq-abbrev.el')
-rw-r--r--coq/coq-abbrev.el25
1 files changed, 5 insertions, 20 deletions
diff --git a/coq/coq-abbrev.el b/coq/coq-abbrev.el
index 19b2ac44..4b74b2b5 100644
--- a/coq/coq-abbrev.el
+++ b/coq/coq-abbrev.el
@@ -141,7 +141,7 @@
("s" "simpl" holes-abbrev-complete 23)
("set" "set ( # := #)" holes-abbrev-complete 23)
("seth" "set ( # := #) in * |-" holes-abbrev-complete 23)
- ("setg" "set ( # := #) in |-*" holes-abbrev-complete 23)
+ ("setg" "set ( # := #) in |- *" holes-abbrev-complete 23)
("seti" "set ( # := #) in #" holes-abbrev-complete 23)
("su" "subst #" holes-abbrev-complete 23)
("sc" "Scheme @{name} := Induction for # Sort #." nil 0)
@@ -190,7 +190,7 @@
["Print Scope/Visibility..." coq-PrintScope t]
)
["Smart intros" coq-intros t]
- ["Require/Export/Import" coq-insert-requires t]
+ ["Require/Export/Import..." coq-insert-requires t]
("INSERT COMMAND"
"COMMAND ABBREVIATION"
["Definition def<C-BS>" (holes-insert-and-expand "def") t]
@@ -204,23 +204,8 @@
["Inductive4 indv4<C-BS>" (holes-insert-and-expand "indv4") t]
""
["Section/Module (interactive)..." coq-insert-section-or-module t]
- ["Require/Export/Import" coq-insert-requires t]
+ ["Require/Export/Import (interactive)..." coq-insert-requires t]
""
- ("Modules"
- "COMMAND ABBREVIATION"
- ["Module (interactive)... " coq-insert-section-or-module t]
- ["Module mo<C-BS>" (holes-insert-and-expand "mo") t]
- ["Module (<:) mo2<C-BS>" (holes-insert-and-expand "mo") t]
-; ["Module (interactive) moi<C-BS>" (holes-insert-and-expand "moi") t]
-; ["Module (interactive <:) moi2<C-BS>" (holes-insert-and-expand "moi2") t]
- ["Module Type mt<C-BS>" (holes-insert-and-expand "mt") t]
-; ["Module Type (interactive) mti<C-BS>" (holes-insert-and-expand "mti") t]
-; ""
- ["Declare Module dm<C-BS>" (holes-insert-and-expand "dm") t]
- ["Declare Module (<:) dm2<C-BS>" (holes-insert-and-expand "dm") t]
-; ["Declare Module (inter.) dmi<C-BS>" (holes-insert-and-expand "dmi") t]
-; ["Declare Module (inter. <:) dmi2<C-BS>" (holes-insert-and-expand "dmi2") t]
- )
("Hints"
"COMMAND ABBREVIATION"
["Hint Constructors hc<C-BS>" (holes-insert-and-expand "hc") t]
@@ -248,8 +233,8 @@
["Set Printing All sprall<C-BS>" (holes-insert-and-expand "sprall") t]
["Unset Printing All unsprall<C-BS>" (holes-insert-and-expand "unsprall") t]
""
- ["Print Scope/Visibility..." coq-PrintScope t]
- ["Locate..." coq-LocateNotation t]
+ ["Print Scope/Visibility (interactive)..." coq-PrintScope t]
+ ["Locate (interactive)..." coq-LocateNotation t]
""
["Infix inf<C-BS>" (holes-insert-and-expand "inf") t]