Updating preprocessor files

harbour/ChangeLog

@@ -1,3 +1,7 @@
+199908.02-12:15 GMT+3 Alexander Kresin
+  * source/hbpp/hbpp.c
+    * Bug fixed ( mentioned by Victor Szel )
+
 19990802-02:30 EDT Paul Tucker <ptucker@sympatico.ca>
    * source/rtl/gtapi.c
      ! hb_gtDispbegin/end and hb_gtSetMode now supported for gtwin

harbour/source/hbpp/hbpp.c

@@ -553,12 +553,12 @@ int ParseExpression( char* sLine, char* sOutLine )
   do
   {
     strotrim ( sLine );
-    ptri = sLine; ptro = sOutLine;
     rezDef = 0; rezTra = 0; rezCom = 0;
     lastused = kolused;
     isdvig = 0;
     do
     {
+      ptro = sOutLine;
       ptri = sLine + isdvig;
       ipos = md_strAt( ";", 1, ptri, FALSE );
       if ( ipos > 0 ) *(ptri+ipos-1) = '\0';