World: r3wp
[Core] Discuss core issues
older newer | first last |
Graham 17-Jul-2005 [1544] | run will call a native application to open the file in question eg. acrobat reader for pdf files. It is only enabled on IOS .. I have asked RT why it can't be enabled for the sdk as well. |
[unknown: 5] 18-Jul-2005 [1545] | Yes Graham that is what it looks like to me as well - looks similiar to a winshellexecute function. Would be good for them to activate it as that would be a very good function to have. |
Carl 19-Jul-2005 [1546] | And, perhaps even REBOL View too eh? |
[unknown: 5] 19-Jul-2005 [1547] | Ahhh not complaint here Carl. |
Rebolek 21-Jul-2005 [1548x2] | Is this OK? And if yes, then why? |
>> x: context [d: does [print e]] >> y: make x [e: 1] >> y/e == 1 >> y/d ** Script Error: e has no value ** Where: d ** Near: print e | |
Cyphre 21-Jul-2005 [1550] | yes, this is OK |
Rebolek 21-Jul-2005 [1551] | and why? |
Cyphre 21-Jul-2005 [1552x2] | because you refer to word 'e with global context |
>> x: context [d: does [print self/e]] >> y: make x [e: 1] >> y/d 1 | |
Rebolek 21-Jul-2005 [1554] | ok I see |
Cyphre 21-Jul-2005 [1555x2] | In this case it would work: >> x: context [e: 5 d: does [print e]] >> y: make x [e: 1] >> y/d 1 |
because the 'e in function d would be bound to the context of the object (self) | |
Rebolek 21-Jul-2005 [1557x2] | yes I know, I needed it when extending objects |
so I'll use 'self or define everything in advance | |
Cyphre 21-Jul-2005 [1559] | If you use 'self you are safe rearding contexts IMO. |
Ladislav 21-Jul-2005 [1560x2] | if you want to extend context, you might want to try associative array instead |
or a "dynamic" object like o: make object! [data: make object! [x: 1]] usage: >> o/data/x == 1 >> o/data: make o/data [y: 5] >> o/data/x == 1 >> o/data/y == 5 | |
Joe 23-Jul-2005 [1562] | . |
Ingo 25-Jul-2005 [1563x4] | Q1: I want to replace all 'none in a block with _different_ empty strings, what's the fastest way to do this? (replace/all BLOCK none "" replaces all 'none with the same empty string) |
Q2: I have to blocks containing strings, and want to find out which of these strings differ (I need all differing positions), what do you think is the fastest way to achieve this? | |
Thanks in advance for all ideas! | |
PS. Do you, like me, feel that the replace way of doing things is questionable? | |
Volker 25-Jul-2005 [1567] | b: ["s1" "s2" "s3" "s1"] parse b[any[to "s1" p: (p/1: copy "t0") skip]] ? b |
Ingo 25-Jul-2005 [1568] | Q2 again: Sorry, my axplanaition was a little unclear: I have a row from a database, and store away one block, and display the other for the user. The user may, or may not, change the data. >> orig: ["Mr" "Petr" "Ustinov"] >> data: ["Sir" "Peter" "Ustinov"] >> magic-changed-func orig data == [1 2] |
Volker 25-Jul-2005 [1569] | orig: ["Mr" "Petr" "Ustinov"] data: ["Sir" "Peter" "Ustinov"] ; same length ! out: copy[] repeat i length? orig [ if orig/:i <> data/:i [ append out i ] ] ? out |
BrianH 25-Jul-2005 [1570x3] | Q1:use [x] [ |
Sorry | |
Q1: use [x] [ x: block while [x: find x none!] [change x copy ""] ] | |
Anton 26-Jul-2005 [1573x2] | Ingo, I have similar feelings too sometimes. I need a higher level function to do some things like that, but it's not there.... |
I often wanted reduce and compose to not make a copy for you, but work directly on the block. (Perhaps new functions "induce" and "impose" ?) | |
Sunanda 26-Jul-2005 [1575] | induce should be fairly easy -- walk the block with 'for and 'poke back the value |
Anton 26-Jul-2005 [1576x3] | blk: [a b c] format: [(1 + 2) (random 100) c] impose: func [blk format][repeat n length? format [if paren? format/:n [poke blk n do format/:n]]] impose blk format ;blk == [3 95 c] |
For induce I think I would use do/next. | |
induce: func [blk format][change blk reduce format] ; (except, as a native!, without creating a temporary block) induce blk [1 + 2 random 100 'c] ; == [3 67 c] | |
Ingo 26-Jul-2005 [1579x2] | Hi Voker, BrianH, thanks for your ideas ... they look mighty long compared to normal Rebol code ;-) |
Sorry, I wanted to type Volker, of course! | |
Brett 26-Jul-2005 [1581x3] | ; Q1: copy/deep will give you new strings: block: [none none none] new-block: copy/deep replace/all block 'none {} |
; Q1 Or if you know you can reduce it you could do something obtuse like: block: ["a" none "b" none none] use [none][none: does [copy {}] bind block 'none] reduce block | |
But if you do need to do an actual replace on the original block - see the other solutions :-) | |
Ingo 27-Jul-2005 [1584] | Hi Brett, your first version looks pretty good ... now I'll have to dig out my little profiler, and see what's the fastest of all of these ;-) |
Anton 27-Jul-2005 [1585x4] | I reckon the parse will win. |
Brett's is the nicest looking though. | |
Brett, your obtuse way will only work if you are replacing 'none (as a word), but not none! values. | |
eg. reduce your input block: block: reduce ["a" none "b" none none] | |
Brett 27-Jul-2005 [1589] | Agreed Anton and perhaps that shows the obtuse method is not a great idea for this situation - though perhaps an interesting one ;-) |
Gabriele 29-Jul-2005 [1590] | In case anyone is interested... http://www.rebol.org/cgi-bin/cgiwrap/rebol/view-script.r?script=reboldiff.r |
Henrik 30-Jul-2005 [1591] | Are there any other instances where the a: copy [] vs. a: [] "problem" appears? I'm have a bug where two arrays: 1. an array with data that can be manipulated 2. a similar one containing default data, which is used whenever I want to reset the first one They apparently "stick" together with synchronized values. When I manipulate array 1, array 2 changes too. This would be the old COPY problem, but I use COPY everywhere, whenever I need to create array 2. However I do frequently PICK values from array 2 and POKE it in array 1 at the same location to reset a specific location to a default value. Would that create a similar problem? |
Gabriele 30-Jul-2005 [1592x2] | it depends on the kind of value you are picking/poking. |
i guess you need copy/deep and poke ... copy pick ... | |
older newer | first last |