summaryrefslogtreecommitdiffstats
path: root/src/parser.y
diff options
context:
space:
mode:
Diffstat (limited to 'src/parser.y')
-rw-r--r--src/parser.y3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/parser.y b/src/parser.y
index c011ae26..78782dde 100644
--- a/src/parser.y
+++ b/src/parser.y
@@ -822,6 +822,9 @@ ObjPat:
'$' IDENT {
$$ = gen_object_matcher(gen_const($2), gen_op_unbound(STOREV, jv_string_value($2)));
} |
+'$' IDENT ':' Pattern {
+ $$ = gen_object_matcher(gen_const($2), BLOCK(gen_op_simple(DUP), gen_op_unbound(STOREV, jv_string_value($2)), $4));
+} |
IDENT ':' Pattern {
$$ = gen_object_matcher(gen_const($1), $3);
} |