How to output #13 char?

[martinrame]

Hi, I need to output CR (ascii 13) on a very simple Linux command line program. To do that I just do this:

Code: Pascal  [Select][+][-]

1. write('Hello ' + #13 + 'world.' + #13);

When I examine the output with xxd I get this:

Code: Pascal  [Select][+][-]

1. 00000000: 4865 6c6c 6f20 776f 726c 642e            Hello world.

As you can see, there isn's any 0d (0d is 13 in hex) char in the output.

Why the CR is removed?.

[Thaddy]

Because a linebreak in Linux is #10, not #13.
use

Code: Pascal  [Select][+][-]

1.   writeln('Hello',LineEnding,'World. ,Proof it is #10: #',Ord(LineEnding));  
2.  
3.  

This is the cross platform way.

[martinrame]

I know that, but I need to return #13 to be read by another program that expect it instead of #10. How can I do that?.

[marcov]

Check with strace/ktrace what the application actually writes.

Otherwise it might be a problem of other parts of the system, like xxd, filtering the #13s

[Thaddy]

write #13#10. The #13 will be ignored on unix systems but #13 will be used on dos/windows.

Code: Pascal  [Select][+][-]

1.   writeln('Hello',#13#10,'World.');

Reason this works cross platform is that these are non-printable characters so #13 is ignored on linux. 

Code: Bash  [Select][+][-]

1. Hello
2. World.

Code: Bash  [Select][+][-]

1. xxd testlineending | grep Hello
2. 00035990: 0548 656c 6c6f 0000 020d 0a00 0657 6f72  .Hello.......Wor

See the 0d0a?

[martinrame]

Yes, #10 is in the response, but the caller expects #13.

The caller is an integration engine (Mirth Connect) that expects it, this is the response I'm getting:

Code: Pascal  [Select][+][-]

1. ERROR MESSAGE: Error receiving response: End of message bytes (<F5><CR>) not detected. Last bytes received: <FS><LF>

[martinrame]

If I just do this:

Code: Pascal  [Select][+][-]

1. echo "Hello\rWorld"|xxd

The output is correct:

Code: Pascal  [Select][+][-]

1. 00000000: 4865 6c6c 6f0d 576f 726c 640a            Hello.World.

The 0d after 6f is the #13 char.

[Thaddy]

I edited my response.
See above I added xxd output.

This *should* be acceptable

[martinrame]

Well, it seems to be some unit in my program doing something strange, because using this very simple program the output is correct:

Code: Pascal  [Select][+][-]

1. program test;
2.  
3. begin
4.   writeln('Hello', #13, 'World');
5. end.

Output:

Code: Pascal  [Select][+][-]

1. 00000000: 4865 6c6c 6f0d 576f 726c 640a            Hello.World.

[martinrame]

I found it!, in one of the millions of tests I did I included the crt unit. I removed it and it started to work as expected.

[Thaddy]

On my side - but I do not have sufficient information - the output handled as string is only correct when #13#10 is used. Both on Windows and Linux.