World: r3wp

IS there something terrible in it which annois some people, like 
hard religion or something? Else i see none.

ok now it's public.

How can I read any char from stdin?

system/console/input. if you need chars, not lines, set it to binary 
IIRC.

or [lines: false]? something like that.

using SET-MODES I think

Suggestion: ATTEMPT offers no possibility to provide a default value 
in case of failure. How about:

attempt/failure [2 / 0] "Invalid!"
== "Invalid!"

attempt [2 / 0]
== none

default-values: [a b c]

values: copy attempt/failure [read %values-file] default-values

2% more elegance? Or a debugging trap?

inbuild:
values: copy any[attempt [read %values-file] default-values]
Ladislav has something like your suggestion, called 'default.

not as clear, but I resorted to this when wanting to read out 0 when 
a numeric computation that is always positive failed:


first maximum-of reduce [0 attempt [2 / 0]] ; what's going on? .... 
oh :-)

attempt/default [2 / 0] 0 ; seems more clear

He did not patch attempt, its own. so
 default [ 2 / 0 ] 0  ; IIRC

default [read %values-file] "This file missing"

found it in RAMBO #3225...

one version is here, with explicit error-variable: http://www.fm.vslib.cz/~ladislav/rebol/default.r
- ah, you too.

interesting, i googled for "ladislav default", no "rebol" in it, 
42k hist, this one #4 :)

hist -> hits

google thinks rambo is a movie character. how quaint!

But always in the center of the action?

But why would an actor call himself after a broker?!

ups, no, rambo, not rugby. bug-squasher then.

Rebol will have sufficient fame when Stallone sues over the RAMBO 
name.

Maybe they join, the next RAMBO is about entering some bad computer 
and sqush all the bugmonsters there?

Does read/skip work in the new releases?

Doesn't look like it. I think file skip was removed because of moving 
to new Windows api.

When will open/seek be added? It was supposed to be there with new 
async core, we had async core for a while, but I do not remember 
anyone mentioning open/seek is there ...

you mean  "file seek"   or  "open/skip".

It was in the experimental releases, like View 1.2.57.3.1
Test with a line like:
	print copy/part read/skip %user.r 10 40    ;   compare 10 with 0

Now, how to add a link without killing the Korean language UTF-8...

Re DEFAULT. It looks, that a version with implicit variable may be 
more popular:

default: func [
    {Execute code. If error occurs, execute fault.}
    [throw]
    code [block!] {Code to execute}
    fault [block!] {Error handler}
] [
    either error? set/any 'code try code [
        fault: make function! [[throw] error [error!]] fault
		fault code
    ] [get/any 'code]
]

this one uses 'error as the error variable

note: although it looks safe, it may become a victim of the GC bug 
I described in RAMBO group recently. A slower but safer implementation 
is:

default: func [
    {Execute code. If error occurs, execute fault.}
    [throw]
    code [block!] {Code to execute}
    fault [block!] {Error handler}
] [
    either error? set/any 'code try code [
        do make function! [[throw] error [error!]] fault
    ] [get/any 'code]
]

sorry, correction:

default: func [
    {Execute code. If error occurs, execute fault.}
    [throw]
    code [block!] {Code to execute}
    fault [block!] {Error handler}
] [
    either error? set/any 'code try code [
        do make function! [[throw] error [error!]] fault code
    ] [get/any 'code]
]

gc-bug: i prefer the function which overwrites itself cares about 
that, else a lot code will be bloated. caring means plug somewhere 
reachable from global context, like dont-gc-me: :me

the above code is exactly the case where your suggestion cannot help

moreover, it is more bloated, than the actual solution used

yes, could not get me own function there. but would not reload myself 
by 'default then.

sorry, I don't understand the last post?

i would not use default when i know i would trigger the gc-bug.

the last version will not trigger it

the only time i trap about that bug is when i do a script i did before, 
thus overwriting the loading function.

and in that case i prefer to care mayelf isntead of forcing every 
tool to be aware of it.

you don't overwrite the function at all - Rebol functions are anonymous 
in nature, it is just an interpreter bug

ok, overwrite the only reference from the global context.

if a safe version is no effort or even shorter, thats ok, will not 
stop that.

did you notice why the former version above may become a victim of 
the GC bug while not looking like overwriting the reference?

hmm, started re-reading just a moment before. thought maybe i miss 
something.

No, i dont see how. everything is referenced from locals. as long 
as you don't overwrite 'default itself, it should work?

actually not, the problem is this:

default [1 / 0] [default [2 / 0] [...] print mold disarm error]

but i missed the point anyway, thought 'default takes care if i overwrite 
my own function. to hasty. its because of its own created function 
i guess.

oh, recursion. and locals on the recursion-stack are not checked 
too?

aha, it *may* work, I didn't check it