Here are the result for HP-UX
Brgds/Micael
make object! [
code: 305
type: 'script
id: 'invalid-arg
arg1: 'status-change-date
arg2: none
arg3: none
near: [set-modes file compose [
(to-set-word mode) (get-modes file mode)
]]
where: none
]
date status-change-date ?object?
date modification-date none
date access-date none
string owner-name none
string group-name none
integer owner-id none
integer group-id none
logic owner-read none
logic owner-write none
logic owner-execute none
logic group-read none
logic group-write none
logic group-execute none
logic world-read none
logic world-write none
logic world-execute none
logic set-user-id none
logic set-group-id none
make object! [
code: 305
type: 'script
id: 'invalid-arg
arg1: 'full-path
arg2: none
arg3: none
near: [set-modes file compose [
(to-set-word mode) (get-modes file mode)
]]
where: none
]
file full-path ?object?
-----Ursprungligt meddelande-----
Fran: Anton [mailto:[EMAIL PROTECTED]]
Skickat: den 18 maj 2002 13:30
Till: [EMAIL PROTECTED]
Amne: [REBOL] Re: File-modes on different platforms
Thanks to all of you.
Ok, I have:
- Windows 2000
- Linux
Ok, anyone who wants to help me on:
- Amiga, Mac, BSD or any other platform
than Windows 2000 or Linux, run this script and report the results:
print reform [join "REBOL/" system/product system/version system/build/date]
save file: %anton-filemode-test "" ; create a file to experiment on
foreach mode get-modes %dummy 'file-modes [
print [
type? get-modes file mode
mode
if error? set/any 'err try [
set-modes file compose [
(to-set-word mode) (get-modes file mode)
]
][mold disarm err] ; <- mold instead of probe
]
]
delete file ; clean up
Anton.
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of
Etienne ALAURENT
Sent: Saturday, 18 May, 2002 8:33 AM
To: [EMAIL PROTECTED]
Subject: [REBOL] Re: File-modes on different platforms
Hi Anton,
I tested your script and I got this :
make object! [
code: 305
type: 'script
id: 'invalid-arg
arg1: 'status-change-date
arg2: none
arg3: none
near: [set-modes file compose [
(to-set-word mode) (get-modes file mode)
]]
where: 'do-boot
]
date status-change-date ?object?
date modification-date none
date access-date none
string owner-name none
string group-name none
integer owner-id none
integer group-id none
logic owner-read none
logic owner-write none
logic owner-execute none
logic group-read none
logic group-write none
logic group-execute none
logic world-read none
logic world-write none
logic world-execute none
logic set-user-id none
logic set-group-id none
make object! [
code: 305
type: 'script
id: 'invalid-arg
arg1: 'full-path
arg2: none
arg3: none
near: [set-modes file compose [
(to-set-word mode) (get-modes file mode)
]]
where: 'do-boot
]
file full-path ?object?
I hope it will be usefull for you.
Anton wrote:
>Hello,
>
>I am interested to see the different file modes
>available on different platforms.
>I have tested on Windows2k and NT4.
>I need Linux, Amiga, Mac and any others.
>I would like you out there who have one of the above platforms to
>try the following code and report back with the result.
>The code just prints out the datatype of each mode,
>the mode word, and reports if there was an error
>setting that mode. (I want to see which modes cannot
>be modified, if any.)
>Anton.
Etienne
---
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
