diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 8e7c2e45b3..61b1b9d8dc 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+2000-06-26 06:22 UTC-0800 Ron Pinkas <Ron@Profit-Master.com>
+   * source/compiler/harbour.l
+     ! Fixed 3 typos that made strings to be compiled with the closing string delimiter, causing Run-Time error 9004.
+
 2000-06-26-14:40 GMT +1 Ignacio Ortiz de Zuniga <ignacio@fivetech.com>
   * memoline.c
       * fixed minor bug
diff --git a/harbour/source/compiler/harbour.l b/harbour/source/compiler/harbour.l
index b7871063dc..3acdd4e3a4 100644
--- a/harbour/source/compiler/harbour.l
+++ b/harbour/source/compiler/harbour.l
@@ -219,7 +219,7 @@ Separator     {SpaceTab}
                       else
                         BEGIN 0;
 
-                      yytext[yyleng--] = '\0';
+                      yytext[--yyleng] = '\0';
                       yylval.string = hb_strdup( yytext );
 
                       return LITERAL;
@@ -230,7 +230,7 @@ Separator     {SpaceTab}
                       else
                         BEGIN 0;
 
-                      yytext[yyleng--] = '\0';
+                      yytext[--yyleng] = '\0';
                       yylval.string = hb_strdup( yytext );
 
                       return LITERAL;
@@ -241,7 +241,7 @@ Separator     {SpaceTab}
                       else
                          BEGIN 0;
 
-                      yytext[yyleng--] = '\0';
+                      yytext[--yyleng] = '\0';
                       yylval.string = hb_strdup( yytext );
 
                       return LITERAL;