World: r3wp

*TARD indeed, because such a function wouldn't be able to call external 
functions, not even DO :)

ahah...

arghhh... rebdev is bugging.... Carl what have you done !!!!???? 
:-)

It might interest you to know that all event handlers in the R3 GUI 
are created with the R3 version of FUNCT.

event handlers are my next assignement i have some new ideas too

They are declared as code blocks in R3, not functions, and then turned 
into functions using a fixed spec and FUNCT. Safer that way.

like actors in scheme i begin to know well that behavior

btw, i know some optimisations on the make-port intrinsic function, 
it's an old one currently

humm... what i said is not clear

Static locals.  I love it.

R3 has changed SET to allow [set-word:] arguments so that they can 
be used with functions like FUNCT and FUNCTOR. R2 not (yet?).

Cool functions Brian.

Yeah, I wrote them this evening (with helpful criticism from Steeve. 
I also wrote the R3 version of FUNCTOR.

Excellent, maybe these need to be added to list in the 2.7.7 world.

forgot the name of that world.

r2-beta is that world.

Rebol looks totally consistent to me in Paul's example above, the 
key to that result is that rebol doesn't automatically evaluate (reduce) 
blocks -- which is the key properti of rebol that makes most of it's 
things possible. This is how I see it :

>> b: 'test   ;; line gets evaluated , b already holds a word!
== test
>> append a :b  ;; word get's added to serries
== [test]
>> type? first a
== word!

>> find a 'test  ;; 'test get's evaluated into a word again so find 
finds it in block
== [test]

>> c: ['test]      ;; 'test is in a block and of course doesn't get 
evaluated as any other thing in a block wouldn't so it stays lit-word!
== ['test]

if you want a block to get evalueated you should reduce it, then 
it will also find it

>>c: reduce ['test]

or >>c: [test]

BrianH and others : you made such great word (and ported it to mezzaine 
- I still have no idea what that is :) ) of the word map (as in functional 
programming ) ... did you maybe or is there any chance that its sister 
function reduce or fold or fold-left could be made in such a way.. 
I use your map a lot now but I have to use my poor fold word for 
folds :)

on OS X and Linux, for every instance of rebol , 2 processes are 
launched, the second for dns, right? is there any known bug? I have 
an difficult to debug situation , when quitting cheyenne after some 
load, some handler process goes 100% cpu, but the dns process is 
no more there, this make me think it may be a problem with rebol, 
otherwise also if one process would go 100% CPU, the dns one would 
still be present, help!! 8)

I'm not sure I understand what call/show introduced in 2.7.6 does?

got a partial answer from here http://www.rebol.net/cgi-bin/rambo.r?id=4113
is that window specific?

When you did call, the black cmd window was always visible. Now you 
must do call/show to see the window (which you mostly don't want 
to see) And  I think this was just Windows change. I'm not sure how 
it worls on Linux or in other OSes.

thank you Oldes, I may do nothing on linux/osx

have this 2 bugs been fixed in 2.7.6 ? are they bordercases, difficult 
to reproduce/debug?
http://www.rebol.net/cgi-bin/rambo.r?id=4153&
http://www.rebol.net/cgi-bin/rambo.r?id=4003&

both bugs have window as platform but I'm investigating a similar 
issue to 4153 on os x

I may -> it may ..

I'm on 2.7.6 os x , symtom is rebol just goes mad using up 100% CPU 
and never quits , using "ktrace -p processid" generate an empty ktrace.out

And how do you start the script? Do you use -cs switch?

Because call is asking security question if you don't run rebol with 
at least -s switch

-qs, the problem is when doing a ctrl-c on running cheyenne (not 
always, mostly after some load) traying hard to have a 100% repoducible 
code but nothing yet, hard

not even sure the problem is with call, what is sure is cpu goes 
full, the dns help process quit ok, ktrace on that process return 
nothing

I'm testing it now with cheyenne and it seems not to be working... 
even if I do:
	print "Content-type: text/html^/"
	tmp: copy ""
	call/output/wait "dir" tmp
	probe tmp

CPU is fine here.. just the output is missing and there is error:
Error Code :  	300
Description : 	script error !
tmpnone has no value
Near : 	[probe tmpnone]
Where : 	protect-code

sorry I may have been more clear, the code is in uni-engine.r, this 
line:

call/show join form to-local-file system/options/boot [" -qs " cmd]
not in a RSP, and not sure at all the problem is with call... 8/

the above is not in RSP either.. it's as a cgi script. Cheyenne is 
not only RSP:)

ok, thank you, now I need a guru with some tips on how to track down 
the issue.

More backports: AJOIN

ajoin: func [
    "Joins a block of values into a new string."
    block [block!]
] [
    head insert copy "" reduce block
]


AJOIN is native in R3 and doesn't generate an intermediate block 
(it reduces in place), but even in R2 it has advantages:

- It always returns a string, no matter what the type of the first 
value in the block is.
- It is faster than REJOIN.

Might change the description a bit to say that is reduces the block. 
 "Reduces a block of values and joins them into a new string."  Reducing 
is a security concern so we might want to ensure whoever uses the 
function is aware of this.

Since that is the doc comment of the R3 version I will submit that 
concern as a trouble ticket in CureCode.

Brian, in AJOIN, why not prefer the use of [make string! 0] instead 
of [copy ""] so that REBOL don't need to allocate a literal string 
to be used only as a prototype? That would reduce memory usage by 
one string buffer allocation.

I guess that memory usage is a high concern in mezzanines.

COPY "" is faster than MAKE STRING! 0 (amazingly enough), and you 
don't have to allocate a literal "" every time, just once at LOAD 
time

Speed is a bigger concern for mezzanines, but there has to be a balance. 
We are doing more advanced tricks in R3 to increase speed and reduce 
memory overhead, but R2 is in bugfix and backport only mode right 
now.

Brian, did you compare with make string! reduce ? It may be faster.

In R3  (R2 is a very small bit faster, but I guess its related to 
the console) :

>> t: now/time/precise loop 1000000 [copy ""] print [t - now/time/precise]
-0:00:00.203

>> t: now/time/precise loop 1000000 [make string! 0] print [t - now/time/precise]
-0:00:00.25

Not a big difference if you consider 1'000'000 loop !