diff options
Diffstat (limited to 'src/parser.mly')
| -rw-r--r-- | src/parser.mly | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/src/parser.mly b/src/parser.mly index 39fdf7d..a079886 100644 --- a/src/parser.mly +++ b/src/parser.mly @@ -109,12 +109,13 @@ member: ; cls_proto: -| ident = typed_var +| ident = typed_qvar LPAREN args = separated_list(COMMA, typed_var) RPAREN - { { - p_ret_type = Some(fst ident); - p_name = snd ident; - p_class = None; + { + let (vt, vc, vn) = ident in { + p_ret_type = Some(vt); + p_name = vn; + p_class = vc; p_args = args; p_loc = $startpos, $endpos } } | cls = TIDENT |