From 2311661a0eec87c591174bce1016b2aa99a72720 Mon Sep 17 00:00:00 2001
From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Thu, 27 Jul 2000 06:38:22 +0000
Subject: [PATCH] Fixed a bug in the .ERROR directive

git-svn-id: svn://svn.cc65.org/cc65/trunk@202 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 src/ca65/pseudo.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ca65/pseudo.c b/src/ca65/pseudo.c
index ada1f4951..3dbf41fe5 100644
--- a/src/ca65/pseudo.c
+++ b/src/ca65/pseudo.c
@@ -408,7 +408,7 @@ static void DoEndProc (void)
 static void DoError (void)
 /* Use error */
 {
-    if (Tok == TOK_STRCON) {
+    if (Tok != TOK_STRCON) {
  	ErrorSkip (ERR_STRCON_EXPECTED);
     } else {
        	Error (ERR_USER, SVal);
-- 
2.39.5