• Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

World: r4wp

[Ann-Reply] Reply to Announce group

Arnold
19-Oct-2012
[847]
Kaj, Installing relevant libraries? So how do I get dyld: Library 
not loaded: /usr/lib/libgthread-2.0.dylib
for RedSystem/hello-GTK-world
Kaj
19-Oct-2012
[848x5]
As I told Henrik above, it's from GLib, included in GTK+ distributions
In most cases, the name of the binding tells you which library you 
need. Then find the official site, the official download for your 
system and see if you need any dependencies
Do you have OS X 10.5 yet?
Here's a workaround you could try:
http://asqueella.blogspot.nl/2010/12/dyld-unknown-required-load-command.html
Arnold
20-Oct-2012
[853]
10.6 upgrade is on its way to here.
MaxV
25-Oct-2012
[854x3]
Maybe is better the follwong one for wikibook:
Rebol [Purpose: {make wikibook entry}
Author: "Max Vessi"
version: 2.0.0
]
my?: func [
    "Prints information about words and values."
    'word [any-type!]

    /local value args item type-name refmode types attrs rtype temp
][       
    temp:  copy ""
    if all [word? :word not value? :word] [word: mold :word]

    if any [string? :word all [word? :word datatype? get :word]] [
        types: dump-obj/match system/words :word
        sort types
        if not empty? types [
            print ["Found these words:" newline types]
            exit
        ]
        print ["No information on" word "(word has no value)"]
        exit
    ]
    type-name: func [value] [
        value: mold type? :value
        clear back tail value
        join either find "aeiou" first value ["an "] ["a "] value
    ]
    if not any [word? :word path? :word] [
        append temp reduce [mold :word "is" type-name :word]
        exit
    ]

    value: either path? :word [first reduce reduce [word]] [get :word]
    if not any-function? :value [

        append temp reduce [uppercase mold word "is" type-name :value "of 
        value: "]

        append temp either object? value [ reduce ["^/" dump-obj value] ] 
        [mold :value]
        exit
    ]
    args: third :value
    append temp  "= USAGE: = ^/ "

    if not op? :value [append temp reduce [ uppercase mold word " "] 
    ]
    while [not tail? args] [
        item: first args
        if :item = /local [break]

        if any [all [any-word? :item not set-word? :item] refinement? :item] 
        [
            append temp reduce [append mold :item " "]

            if op? :value [append temp reduce [append uppercase mold word " "]
	    value: none]
        ]
        args: next args
    ]
    append temp  "^/" 
    args: head args
    value: get word
    append temp "^/= DESCRIPTION: = ^/"
    either string? pick args 1 [
        append temp reduce [first args]
        args: next args
    ] [
        append temp "^/''(undocumented)''^/"
    ]

    append temp reduce [ "^/^/"uppercase mold word " is " type-name :value 
    " value."]
    if block? pick args 1 [
        attrs: first args
        args: next args
    ]
    if tail? args [exit]
    while [not tail? args] [
        item: first args
        args: next args
        if :item = /local [break]
        either not refinement? :item [

            all [set-word? :item :item = to-set-word 'return block? first args 
            rtype: first args]
            if none? refmode [
		append temp "^/= ARGUMENTS: =^/"
                refmode: 'args
            ]
        ] [
            if refmode <> 'refs [
                append temp "^/= REFINEMENTS: =^/"
                refmode: 'refs
            ]
        ]
        either refinement? :item [	   	  
            append temp reduce ["*'''" mold item "'''"]

            if string? pick args 1 [append temp reduce [" -- " first args] 
	    args: next args]
            append temp "^/"
        ] [
            if all [any-word? :item not set-word? :item] [
                if refmode = 'refs [append temp "*"]
                append temp reduce ["*'''" :item "''' -- "]

                types: if block? pick args 1 [args: next args first back args]

                if string? pick args 1 [append temp reduce [first args ""] 
		args: next args]
                if not types [types: 'any]
                append temp rejoin [" (Type: " types ")"]
                append temp "^/"
            ]
        ]
    ]
    if rtype [append temp reduce ["^/RETURNS:^/^-" rtype]]
    if attrs [
        append temp "^/= (SPECIAL ATTRIBUTES) =^/"
        while [not tail? attrs] [
            value: first attrs
            attrs: next attrs
            if any-word? value [
                append temp reduce  ["*'''" value "'''"]
                if string? pick attrs 1 [
                    append temp reduce [" -- " first attrs]
                    attrs: next attrs
                ]
                append temp "^/"
            ]
        ]
    ]
    append temp "^/= Source code =^/"
    append temp  reduce ["<pre>" join word ": "]
    if not value? word [print "''undefined''" exit]
    either any [native? get word op? get word action? get word] [
        append temp reduce ["native" mold third get word]
    ] [append temp reduce  [ mold get word "</pre>"] ]
    editor temp
    ;write clipboard://  temp
    exit
]
OK, I uploaded the script, it's better... :-P
Gregg
25-Oct-2012
[857]
Thanks Max!
Ladislav
31-Oct-2012
[858]
Sorry for replying in Announce, does anybody know more about the 
ALIVE? variable?
MaxV
31-Oct-2012
[859]
>> source alive?
alive?: true
Ladislav
31-Oct-2012
[860x2]
>> source alive?
alive?: false


however, that does not matter. what matters is some *description*, 
the "ALIVE? is ... TRUE" sentence does not explain anything
E.g. the 'ON variable is just a "synonym" for #[true], exactly like 
the 'TRUE variable. However, that hardly is the case of the 'ALIVE? 
variable.
MaxV
31-Oct-2012
[862]
OK, I think that you are welcome to register, login and add the description 
you prefer. It's a wiki, not an hand made Bible. ;-)
Ladislav
31-Oct-2012
[863]
I cannot add it, I do not know it
Endo
31-Oct-2012
[864x2]
'alive? is in SDK, viewtop, connect.r file on line 33. it shows if 
the internet (or network) connection is available.
And used in viewtop's emailer.r and main.r file to show if there 
is connection or not.
Ladislav
31-Oct-2012
[866]
connect.r file? - I do not see such a file in the SDK
Arnold
31-Oct-2012
[867]
>>source dead?
dead?: not alive?

I think it means that if alive? is just true you do not need 'alive? 
Most of the time when you run your code it should state that it is 
alive? 

But it is not a value that is always true, like Endo's example for 
a connection status shows.
BrianH
31-Oct-2012
[868]
Ladislav, it's in the viewtop directory.
Ladislav
31-Oct-2012
[869]
Thanks, Endo, I updated the description.
Pekr
1-Nov-2012
[870]
as I can now see it, MSDOS is really pretty bad option for Red. It 
has really zero connection with MSDOS, surely it is normal windows 
probram, maybe just in console mode ...
Endo
5-Nov-2012
[871]
So, who do you think to suggest as "masters"? DocKimbel has time 
for it?
DocKimbel
5-Nov-2012
[872]
Nope. :-)
Endo
5-Nov-2012
[873x2]
Alright, I won't suggest you then :)
BrianH, Ladislav, Kaj?
DocKimbel
5-Nov-2012
[875x2]
I would be glad to apply, but I really don't have enough time for 
that, especially if it requires reviewing/testing others code.
However, I could help with bugfixing.
Endo
5-Nov-2012
[877x2]
That would be great. All the people in the community would do something 
more or less, I think.
Gabriele, Robert, Cyphere?
BrianH
5-Nov-2012
[879]
I'm up for it. The rest of those suggestions sound good to me too.
AdrianS
5-Nov-2012
[880x2]
I'd like to add my vote for Endo's suggestions, as well. Should these 
nominations not be done as emails to Carl, though?
Doc, I would say that you should be one of the masters even if you 
don't have the time in the way of reviewing or coding if only to 
try to help steer R3 future development to be relatively in sync 
with Red's.
DocKimbel
5-Nov-2012
[882x2]
That's a point. I would be glad to participate with other people 
in charge as my time permits.
In such case, Gabriele should also join.
Arnold
5-Nov-2012
[884]
I think Doc is even too busy to collect a Rebzie ;)
Are we happy with the chosen license?
BrianH
5-Nov-2012
[885]
Works for me :)  It should also allow some collaboration between 
the Red and R3 projects, using the methods we went over in the Red 
group.
Pekr
5-Nov-2012
[886]
It seems Carl is still not much OK with the os-ing REBOL, but understands, 
it is a needed move?
BrianH
5-Nov-2012
[887]
He doesn't like the development model. OS projects have generated 
a lot of crap. Half of good design is saying no, and removing stuff. 
OS projects often do design by committee, and that design style doesn't 
say no enough.
AdrianS
5-Nov-2012
[888]
well, he won't be able to control a mess created in any forks of 
REBOL, but I would think that with a small group of people as the 
only committers to the official REBOL, he could be assured of reasonably 
good results
Henrik
5-Nov-2012
[889]
As long as there is a canonical repository, there is at least one 
place to go for the proper implementation.
Kaj
5-Nov-2012
[890]
Sorry Endo, I would have been very interested in participating in 
R3 even one or two years ago, but I can't justify it anymore compared 
to Red
Endo
7-Nov-2012
[891]
I wish to have both, R3 and Red, even I'll continue to work with 
R2 (encapping is important for my bussines) and also Topaz.
Kaj
7-Nov-2012
[892]
I'm prone to collecting myself, so I'll continue to support R3 and 
R2 in Syllable as long as it's not too much work, but I also dearly 
need to converge on one platform
Ladislav
7-Nov-2012
[893]
encapping is important for my bussines
 - encapping is not a problem in R3 either
Gregg
7-Nov-2012
[894]
Thanks for all your work MaxV!
Endo
8-Nov-2012
[895]
Well, GUI is also important for my work. Is there an encapper for 
R3 anyway? Or you mean put script & r3.exe in a package and write 
a batch?
Pekr
8-Nov-2012
[896]
I think that Saphirion might have some tool for R3, which produces 
final exe, but that is just my gues ...