We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 8604837 commit d86c0aeCopy full SHA for d86c0ae
src/q/selftest.sml
@@ -435,6 +435,11 @@ val _ = require (check_result (fn _ => true))
435
REWRITE_TAC [])
436
([], ``p /\ T = p``)
437
438
+val _ = tprint "PAT_ABBREV_TAC handles underscores"
439
+val _ = require (check_result (fn _ => true))
440
+ (Q.PAT_ABBREV_TAC `bar = foo _`)
441
+ ([], ``_ y = foo a``)
442
+
443
val _ = new_definition ("gh425a_def", ``gh425a a = a``);
444
val _ = new_definition ("gh425b_def", ``gh425b p = (p ==> T)``);
445
val _ = overload_on ("gh425", ``gh425a``);
0 commit comments