World: r3wp

That is actually not what I want - suppose that you manipulate a 
file on a different machine, not using synchronized clock

BTW, did you use the SET-MODES function?

Yes.

I would have thought that logically the file on the other pc is for 
the time owned by the original pc

Does the SET-MODES function work for you in R2.7.7?

Haven't tried ... not for many years

There's no way PC1 can know what time it is on PC2

There is: Touch a file and get its time

;-)

that implies the resource on pc2 has a touch facility

Actually, that is why I am using the Touch function

no watch??

right

(I just do not know on which machine the file is)

a related problem: how to remove the last character from a file in 
R3?

In my file replication tool I hit a snag ... when replicating directories 
I was not able to set the file date :(

ie. get-modes can't set directory dates

I suppose you mean Set-modes?

yes

Now that I think about it .. my NAS box has that problem .. I copy 
files to it, and the file dates are in the future because the box's 
time runs fast :(

how to remove the last character from a file in R3?


I don't know, if it will be done differently in R3, but using R2 
I would do something like:

sz: length? p: open/binary %file
write/binary %newfile copy/part p sz - 1
close p

hmm, ugly

in R2 it can be simpler, but probably not in R3

yeah! :-)

Is this better with your definition of 'ugly'?


write/binary %file copy/part read/binary %file (get in info? %file 
'size) - 1

- that is the same for me, I would like to just remove one character, 
not to copy the whole file

Is that possible?

in R2 it is, as it looks

I mean, is it possible in R2?

Could you show me?

port: open %file
remove back tail file
close port

Neat! :)

remove back tail port is what I meant

yes

And it doesn't work in R3 for some reason?

...at least not for me...

:-(

Here (under windows) a unix format text file is changed to dos format, 
if I do, what you just suggested. So it become longer.

Doing open/binary and it works.

Using R3, I get:
** Script error: cannot use remove on port! value
Probably the same, you see.

Using R3, 

	>> clear back tail port

works for me.

aha, fine

thanks

amazing!

That was just by luck.

Hmm, I thought, that OPEN does not create the file when it does not 
exist?

(in R2)

in R2, you use open/new for such purpose (to create a file if it 
does not exist)

But, I need the exact opposite, to open touch a file only if it exists, 
which looks like not supported...

>> port: open/read %test

** Access Error: Cannot open /c/program files (x86)/rebol/view/test
** Near: port: open/read %test

isn't suited for your purpose, I guess.