From 25f818f8f57b6606215ccbf3884b2cec7b30c7b1 Mon Sep 17 00:00:00 2001
From: Hans Bolinder <hasse@erlang.org>
Date: Fri, 10 Feb 2017 16:16:17 +0100
Subject: dialyzer: Fix handling of annotations in a test

---
 lib/dialyzer/test/abstract_SUITE.erl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'lib/dialyzer')

diff --git a/lib/dialyzer/test/abstract_SUITE.erl b/lib/dialyzer/test/abstract_SUITE.erl
index 0e84dfab24..37fb39cf27 100644
--- a/lib/dialyzer/test/abstract_SUITE.erl
+++ b/lib/dialyzer/test/abstract_SUITE.erl
@@ -83,7 +83,8 @@ generated_case(Config) when is_list(Config) ->
 	     Config, [], []),
     ok.
 
-test(Prog, Config, COpts, DOpts) ->
+test(Prog0, Config, COpts, DOpts) ->
+    Prog = erl_parse:anno_from_term(Prog0),
     {ok, BeamFile} = compile(Config, Prog, COpts),
     run_dialyzer(Config, succ_typings, [BeamFile], DOpts).
 
-- 
cgit v1.2.3