From 3ff93c5c890c438bc5623355bb353e5a44ef2a97 Mon Sep 17 00:00:00 2001
From: Ulf Norell <ulf.norell@gmail.com>
Date: Tue, 27 Aug 2019 14:29:24 +0200
Subject: [PATCH] Fix bug in include chasing

... making it possible for the same file to be included multiple times
---
 src/aeso_parser.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/aeso_parser.erl b/src/aeso_parser.erl
index f0f2078..b3d184f 100644
--- a/src/aeso_parser.erl
+++ b/src/aeso_parser.erl
@@ -566,7 +566,7 @@ expand_includes([{include, Ann, {string, _SAnn, File}} | AST], Included, Acc, Op
                 false ->
                     Opts1 = lists:keystore(src_file, 1, Opts, {src_file, File}),
                     Included1 = sets:add_element(Hashed, Included),
-                    case string(Code, Included1, Opts1) of
+                    case parse_and_scan(file(), Code, Opts1) of
                         {ok, AST1} ->
                             expand_includes(AST1 ++ AST, Included1, Acc, Opts);
                         Err = {error, _} ->