On Tue, 29 Jul 2008, Francesco Saverio Giudice wrote:

Hi Francesco,

> It is partially working.

It's not exactly the same as in Clipper. F.e. try this code:

   #define CRLF      ( Chr( 13 ) + Chr( 10 ) )
   #define SOFTCR    ( Chr( 141 ) + Chr( 10 ) )
   proc main()
   local cText, aPos, nOffset
   #ifdef _SET_EOL
      set( _SET_EOL, CRLF )
   #endif
   cText := "1234567890 " + SOFTCR + "1234567890" + CRLF
   nOffset := 14
   aPos := mpostolc( cText, 10, nOffset )
   ? nOffset, "=>", aPos[1], aPos[2], ;
              "=>", mlctopos( cText, 10, aPos[1], aPos[2] )
   return

I made the mpostolc()/mlctopos() revertible when in Clipper
they aren't. I do not know why it behaves in such way in Clipper.

> Now I found a bug with an endless loop using the code below. I'm digging 
> inside c code and I have found that in MPosToLC(), putting a var dumping 
[...]
> Tested against Clipper 5.2c as before.

Thank you very much for tests and for the info. Should be fixed now.

best regards,
Przemek
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to