Wrap args of DBGLOC in immediate tuple

This commit is contained in:
Gaith Hallak 2022-12-06 19:29:07 +03:00
parent 34d363f166
commit 3ed7e36d29

View File

@ -770,7 +770,7 @@ dbgloc(Env, Ann) ->
case {Line, Col} of case {Line, Col} of
{undefined, _} -> []; {undefined, _} -> [];
{_, undefined} -> []; {_, undefined} -> [];
{Line, Col} -> [{'DBGLOC', File, Line, Col}] {Line, Col} -> [{'DBGLOC', {immediate, File}, {immediate, Line}, {immediate, Col}}]
end end
end. end.