From 98e782e41ed31ee246836187848b20514d63e9c4 Mon Sep 17 00:00:00 2001
From: Olaf Seibert <rhialto@falu.nl>
Date: Fri, 8 May 2015 00:08:50 +0200
Subject: [PATCH] INCLUDE file names may have quotes around them.

---
 assemble.c | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/assemble.c b/assemble.c
index 67f0052..ee4e94e 100644
--- a/assemble.c
+++ b/assemble.c
@@ -449,7 +449,18 @@ static int assemble(
                             return 0;
                         }
 
-                        incl = new_file_stream(name);
+                        if (name[0] == '"') {
+                            char           *name1 = name + 1;
+                            char           *ename = name1 + strlen(name1) - 1;
+                            if (*ename == '"') {
+                                *ename = '\0';
+                            } else {
+                                report(stack->top, "No closing quotation mark: %s\n", name);
+                            }
+                            incl = new_file_stream(name1);
+                        } else {
+                            incl = new_file_stream(name);
+                        }
                         if (incl == NULL) {
                             report(stack->top, "Unable to open .INCLUDE file %s\n", name);
                             free(name);