Remove col from fann

This commit is contained in:
Gaith Hallak 2023-01-03 10:12:48 +03:00
parent 9dc7ed3d97
commit ee4c0eee34

View File

@ -58,7 +58,7 @@
| {contract_code, string()} %% for CREATE, by name | {contract_code, string()} %% for CREATE, by name
| {typerep, ftype()}. | {typerep, ftype()}.
-type fann() :: [ {file, aeso_syntax:ann_file()} | {line, aeso_syntax:ann_line()} | {col, aeso_syntax:ann_col()} ]. -type fann() :: [ {file, aeso_syntax:ann_file()} | {line, aeso_syntax:ann_line()} ].
-type fexpr() :: {lit, fann(), flit()} -type fexpr() :: {lit, fann(), flit()}
| {nil, fann()} | {nil, fann()}
@ -391,8 +391,7 @@ to_fcode(Env, [{namespace, _, {con, _, Con}, Decls} | Code]) ->
to_fann(Ann) -> to_fann(Ann) ->
File = proplists:lookup_all(file, Ann), File = proplists:lookup_all(file, Ann),
Line = proplists:lookup_all(line, Ann), Line = proplists:lookup_all(line, Ann),
Col = proplists:lookup_all(col, Ann), lists:flatten([File, Line]).
lists:flatten([File, Line, Col]).
-spec get_fann(fexpr()) -> fann(). -spec get_fann(fexpr()) -> fann().
get_fann(FExpr) -> element(2, FExpr). get_fann(FExpr) -> element(2, FExpr).