diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index a2e2ff768b..3611bec7d2 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,10 @@
    2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2005-10-05 15:05 UTC+0100 Ryszard Glab <rglab@imid.med.pl>
+   * source/common/expropt2.c
+      * fixed bug in ASC() optimization (when character code > 127)
+
 
 2005-10-05 03:08 UTC-0500 David Arturo Macias Corona <dmacias@mail.udg.mx>
   * harbour/include/hbextern.ch
diff --git a/harbour/source/common/expropt2.c b/harbour/source/common/expropt2.c
index 2dc1183260..0383097d94 100644
--- a/harbour/source/common/expropt2.c
+++ b/harbour/source/common/expropt2.c
@@ -1231,7 +1231,7 @@ BOOL hb_compExprReduceASC( HB_EXPR_PTR pSelf, HB_MACRO_DECL )
 	
    if( pArg->ExprType == HB_ET_STRING )
    {
-   	HB_EXPR_PTR pExpr = hb_compExprNewLong( pArg->value.asString.string[0] );
+   	HB_EXPR_PTR pExpr = hb_compExprNewLong( (BYTE)pArg->value.asString.string[0] );
 
      	hb_compExprFree( pParms, HB_MACRO_PARAM );
      	hb_compExprFree( pSelf->value.asFunCall.pFunName, HB_MACRO_PARAM );