From a670d1ca6c90acc79610f79996f7bb492e3fe4ce Mon Sep 17 00:00:00 2001
From: Thomas Arts <thomas.arts@robuster.software>
Date: Tue, 9 Apr 2019 09:05:26 +0200
Subject: [PATCH] Remove the quotes from scanned string

---
 src/aeb_fate_asm_scan.template | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/aeb_fate_asm_scan.template b/src/aeb_fate_asm_scan.template
index ba125e6..cd0bb5f 100644
--- a/src/aeb_fate_asm_scan.template
+++ b/src/aeb_fate_asm_scan.template
@@ -51,8 +51,11 @@ FUNCTION       : {token, {function, TokenLine, 'FUNCTION' }}.
  {token, {int, TokenLine, parse_int(TokenChars)}}.
 -{INT} :
  {token, {int, TokenLine, parse_int(TokenChars)}}.
+
+%% Due to the definition of STRING the tokens start and end with a quote ".
 {STRING} :
- {token, {string, TokenLine, unicode:characters_to_binary(TokenChars)}}.
+ {token, {string, TokenLine, unicode:characters_to_binary(
+                lists:sublist(TokenChars, 2, length(TokenChars) - 2))}}.
 {BITS} :
  {token, {bits, TokenLine, bits(TokenChars)}}.