🚀 go-pugleaf

In article <oylerb-2108950012310001@msp1-5.nas.mr.net>,
oylerb@tdkt.skypoint.net (Bill A. Oyler) wrote:

> Hello,
> 
> Back in my Pascal days, I had absolutely no problem writing strings
> (Str255s) to text files.  I would just do something like this:
> 
>         TextToWrite := 'hello, world!';
>         Count := Length(TextToWrite) - 1;
>         OSError := SetFPos(LogFileRefNum, fsFromLEOF, 0);
>         OSError := FSWrite(LogFileRefNum, Count, @TextToWrite[1]);
> 
> What would be the C equivalent of this code??
> 
> Asside from the obvious syntax differences, all I changed was
> "@TextToWrite[1]" to "&TextToWrite + 1".  Is there something more I need
> to do?  I keep getting garble in my text file....
> 
> 
> Try:
>  ...
>  OSError = SetFPos(LogFileRefNum, fsFromLEOF, 0);
>  OSError = FSWrite(LogFileRefNum, Count,(Ptr) &(TextToWrite[1]));
>  ...
> 
> this should work, also i didn't try it

Sorry for "also", it was my f.. english!

your version "&TextToWrite + 1" didn't work because in C the var
"TextToWrite" is the pointer to the pascal-string. So, your assignment
"&TextToWrite" is an ptr to a ptr to the pascal-string, this can't work.
for details, you should read the pointer/array-chapter of any c-book.

the following line should be equivalent:

OSError = FSWrite(LogFileRefNum, Count,(Ptr) &(TextToWrite[1]));
OSError = FSWrite(LogFileRefNum, Count,(Ptr) (TextToWrite + 1));

(i like to write more brackets and typecoercing than really needed, but i
think this makes the code more readable)



Gulpi
= Martin Adler