From ca2da577af38d95a3b44a996d0694ccd2d2f8cd8 Mon Sep 17 00:00:00 2001
From: vsc <vsc@b08c6af1-5177-4d33-ba66-4b1c6b8b522a>
Date: Thu, 13 Mar 2003 18:30:33 +0000
Subject: [PATCH] string parsing should stop at finding an EOF

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@796 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
---
 C/scanner.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/C/scanner.c b/C/scanner.c
index 9b546eae9..0cc649516 100644
--- a/C/scanner.c
+++ b/C/scanner.c
@@ -764,6 +764,7 @@ Yap_tokenizer(int inp_stream)
 	} else if (chtype[ch] == EF) {
 	  Yap_ReleasePreAllocCodeSpace((CODEADDR)TokImage);
 	  t->Tok = Ord(kind = eot_tok);
+	  break;
 	} else {
 	  *charp++ = ch;
 	  ch = QuotedNxtch(inp_stream);