record type with tag literal

marianoguerra · Mar 15, 2015 · 5d80c2a · 5d80c2a
1 parent a11ea36
commit 5d80c2a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/fn_spec.erl b/src/fn_spec.erl
@@ -73,7 +73,7 @@ parse_type_value(?O(Line, 'or', Left, Right), State) ->
     Types = flatten_or(Right, [Left]),
     {FnTypes, State1} = parse_types(Types, State),
     {{type, Line, union, FnTypes}, State1};
-parse_type_value(?V(Line, tag, [?Atom(r), ?Atom(RecordName)]), State) ->
+parse_type_value(?LTag(Line, [?Atom(r)], ?Atom(RecordName)), State) ->
     {{type, Line, record, [{atom, Line, RecordName}]}, State};
 
 parse_type_value(Ast, State) ->