[REBOL] Re: A hard question
From: lmecir:mbox:vol:cz at: 3-Feb-2001 22:36
Correcting myself:
> to be a solution, HARD must pass any test. Let's try:
>
arg1: func [x] [return make error! x]
arg2: ["some error"]
probe disarm arg1 first arg2
The result is:
make object! [
code: 800
type: 'user
id: 'message
arg1: "some error"
arg2: none
arg3: none
near: [return make error! x]
where: none
]
> while the result of HARD is:
>
probe disarm hard :arg1 arg2
** User Error: some error
** Near: return make error! x