World: r3wp

R3 can't read and write back source file, to correct platform terminators? 
I used such aproach in R3 - just read, and write back to the same 
file. In R3 I even tried read/string, but it does not help when I 
wrote file back ....

terminators ? you mean the robots from the futur that are tracking 
down sarah conor and john conor ?

Pekr, just tried
write %foo.r read/string %foo.r
on Linux. Converted DOS (CRLF) line endings to LF-only for me.

sorry ...

I tried RMA's source under Windows, and no luck ...

R2 turned out being handy, though :-)

Ah yes, WRITE does not do any conversion, but READ does. So you'll 
always end up with LF-only.

Well, shouldn't R3 under Windows turn line terminators (Johns and 
Sarahs :-) into Windows compatible ones?

Use ENLINE for that.

The full sequence for line terminator recoding is:
write %foo.r to-binary enline deline to-string read %foo.r

- READ/string is a shortcut for "deline to-string read"

- WRITE auto-converts string! to binary, so is a shortcut for "write 
to-binary" in this case.

So it can be just:
write %foo.r enline read/string %foo.r

Thanks - that is a gem - should be docced :-)

Is there a home for R3 one-liners and idioms?


reline: func [file] [write file to-binary enline deline to-string 
read file]

reline: func [file] [write file to-binary enline read/string file]

reline: func [file] [write file enline read/string file]

(whoops, missed one)

New bug: http://issue.cc/r3/1830

Sorry, that one's intentional.

It's all part of the plan to make SELECT treat blocks, objects and 
maps more alike.

I've always felt that doing so was dumbing down select.  now I can't 
use select with/within parse, cause the different types will not 
be identified.   

has switch suffered the same fate?

Nope.

Now that I have internet again (it's been out for possibly a week) 
I'll check with Carl about this, but I remember code from 2007-2008 
that depended on this change, even from before SELECT was extended 
to objects and maps. It's used to make blocks that look like spec 
blocks for objects or maps act like objects or maps. SELECT does 
EQUAL? comparison, and SELECT/case does STRICT-EQUAL? comparison. 
So you can make it work by using SELECT/case. Note: Words now support 
case-sensitivity in blocks too, letting them be searched with FIND/case 
and SELECT/case.

>> select [a 1 :a 2] quote :a
== 1
>> select/case [a 1 :a 2] quote :a
== 2

fine!

I'll add this info to the ticket in a comment and dismiss it. It's 
actually more powerful than R2 :)

but not perfect as the case-sensitivity may cause problems...but 
I can live with it.

but not perfect as the case-sensitivity may cause problems...but 
I can live with it.

Not when you realize that this is consistent throughout R3, and just 
don't mix case when you don't need to.

The trick is that objects and maps are case-preserving rather than 
case-sensitive, so their fields get the same case as the first instance 
of the word. Plus, case-insensitivity is a little broken for a lot 
of languages right now (Unicode case is a complex problem).

Characters are case-sensitive

 is a pretty misleading description of the difference you've pointed 
 out between SELECT and SELECT/CASE, Brian. 


I would appriciate SELECT/STRICT over /CASE, /STRICT would even be 
usefull to imply case sensitivity, at least it seems better suited 
to express the semantic difference between the refined und the unrefined 
function call .

Same for 

>> find/case [a :a] quote :a
== [:a]
>> replace/case [a :a] quote :a quote a:
== [a a:]
>> alter/case [a] [:a]
== true


DIFFERENCE, UNIQUE and other "set-functions" obviously haven't been 
subject to change when the treatment of blocks, objects and maps 
converged:

>> difference/case [:a] [a:] 
== []
>> unique/case [a: a :a] 
== [a:]
>> union/case [a] [:a] 
== [a]
>> intersect/case [a] [:a] 
== [a]
>> exclude/case [a] [:a]
== []


In all cases, /STRICT would read at least as well as /CASE, if not 
better.

Christian, please report the latter cases as bug.

I'm not sure if it isn't by design, at least I wouldn't be surprised 
if being told so. Anyways, I'd prefer it being a bug, so, added it 
to CureCode.

Given the above discussed behaviour, I would very much prefer /STRICT 
instead of /CASE as well. But I fear the chance for such thorough 
naming improvements has long passed.

hmm, you should post it as a separate CC item (wish?)

yes, using /CASE for strict word comparison is VERY ugly. the only 
reason I can think of is that Carl didn't want to add a refinement 
just for this.

Well, if there's sufficient backing in the community, we really should 
manifest that in the form of a CC wish.

No problem with me

I'd bet /CASE is not used that much for word comparison in the R3 
mezz code.

(if at all, maybe in r3gui)

do not think so

Already did (curecode that wish above).

#1832

already added my weight behind the /STRICT naming  :-)

The /strict option sounds interesting, and would solve those inconsistencies. 
However, it would need to be an additional option; /case would need 
to remain for compatibility reasons.

I'm not sure it's completely OK though, since there is one part of 
strict comparison that SELECT/case doesn't cover: binding.
>> select/case reduce [use [a] ['a] 1 'a 2] 'a
== 1
>> strict-equal? use [a] ['a] 'a
== false

Nor do we want it to, because SELECT, FIND and other functions to 
which /strict would apply would generally not be applied to data 
which could be guaranteed to have the same binding as the value you 
are searching for.

Christian, REPLACE and ALTER are mezzanines that call FIND. You don't 
need to include them in the examples.

A new refinement for considering datatypes would be a good idea (if 
a bit overhead-inducing), but probably not the name /strict. We have 
to keep the /case refinement because of the legacy naming rules, 
but those don't prohibit adding new refinements.

The #1832 ticket needs its summary line changed accordingly.

select/a-bit-more-than-case-but-a-bit-less-than-strict-but-definitely-not-equiv-or-same

We can't remove /case. So the new option would not have to be a superset 
of /case, it would be additive. What would you call an option that 
made it consider datatypes? Keep in mind that this option would only 
apply to block types, so would be overhead for other types that implement 
the FIND and SELECT actions.