AltME groups: search

We could try and export symbols for all [callback]/[cdecl]/[stdcall] 
functions.

(so that should be easy to try)

symbolism is that your wishes will be granted if you try hard enough, 
and the impossible is possible.  We don't need the wizard of oz to 
help us.

Interesting designs indeed, I will try to list my wishes after the 
Devcon this weekend.

I would also not post here, I just try to motivate others to do the 
same from time to time :-)

Yes, but still we want to help where we can. Taking over simple tasks 
to free DocKimble for more complex work that is of yet above our 
abilities. So Doc, try and delegate some simple tasks to this community.

Pekr: right, 400 EUR/month would be enough. 


I believe that the Raspberry pi board has a huge potential, we should 
try our best to support it and build tools for it in Red.

try to search the "atexit" at REBOL3 world, there's few remarks about 
that ...

Recently tried to run the Hello World on my Android based Galaxy 
Samsung Tab 10 but after seeing the "executing ..." msg. Nothing 
appeared. I will try to look at what could be done but I suspect 
I also have to first learn a bit more about Android and my machine 
to help ... I'm very patient and began to read about the ARM. and 
Android itself. What an evolving world we live in ...

If Red adopts R3's port model, I would definitely like to try to 
implement that port PARSE idea I was thinking of for R3.

@Gerard: I will try it under 3.1 in the emulator.

@Doc : Thanks for the try of the emulator - Now installing the Android 
update for my - almost 50 % left to do after 30 minutes - for an 
88 MB download - !!!  I will retest after everything is completed...

@Doc : Now I'm upgraded to Android version 3.2 Kernel is left unchanged 
to version 2.6.36.3 - Will try later for the tests - other more urgent 
taks are awaiting  for me now ...

Evgeniy: I am not sure if a strict superset of REBOL is doable in 
Red without introducing some important runtime overhead, making the 
compilation approach much less efficient, so less useful. I'll try 
to push it as far as possible and will stop when we loose too much 
performances.

You could try increasing the loops another tenfold

Wonderful! My test now runs without a problem. Time to try something 
more complicated :)

Also I've run into some weird problems with float32!. I try to separate 
the code and write some simple examples.

BTW, yesterday I've encountered a strange bug that's very hard to 
separate. The bug is that EITHER will always execute FALSE block, 
even if the condition is TRUE (EITHER is in function and the function 
is in WHILE loop, but that's not enough to trigger the bug). When 
I try to separate the problem the bug is gone. When I leave the function 
as is and just remove all unrelated stuff, the bug is also gone. 
It happens only when I compile my whole project. When I have more 
time, I will once again try to separate the problem and when unsuccesful, 
I will post the project as is for you to check it.

That would have some complications in using them as parameter types, 
though. Maybe I should try how it works out keeping them global first

Kaj: I'll give tonight a quick try to add namespaces support to aliases, 
then I'll make the 0.2.6 release.

Time to try again, I guess :)

I'm giving a try to implicit float32! casting...

Fine, I will try it and it could be even more elegant solution. Anyway, 
when you say it would break REBOL's synactic rules, does not your 
hexa format breaks it as well? Personaly I found very annoying to 
change many values like 0x00FF (usually in C's defines) into 00FFh. 
But I can live with that as I can always use some  converting script.

It is probably not related, but you might try with secure none, but 
I does not seem to be problem of REBOL's security or licence missing 
...

Hm, I'll try with 2.7.6, I'm using 2.7.8 this may be the problem.

Works here from 2.7.8 too. Try from a freshly cloned repo.

No, W7. I will try this under virtual XP

The book is for the people who would love to try programming and 
don't care about which language was used.

I have seen that one before
Try
lbl-language-text: "en"

Hello everybody: I'm working on rebol2.blogspot.com (take a look!). 
If you want to write an article on Rebol, send me an in email with 
the article and I'll publish it. If you want to see a topic discussed, 
send me an email with a request, and I'll try to write about it. 
My email is [maxint-:-tiscali-:-it]

A first pass at accessing the Etsy API: http://reb4.me/r/etsy


Works similarly to my Twitter API script (a few OAuth differences 
here and there). You can download it, or run it in place (do/args 
... [...Settings...]). As with Twitter, you start with etsy/as and 
go through the authorization process.  It has a few example methods, 
and an open method - etsy/api-call - that can call (as far as I can 
tell) every api function. Will try to document at some point.

Sorry, I mean you should try it on a X11 environment.

Congratulations Jerry! I think Carl should get back to R3 at least 
just because of your book. Maybe you should try to send him an email 
about that?

Sorry DocKimbel that I did contribute yet, but I fear I do not understand 
GitHub, I try to find a button to accept changes that were committed 
since I forked Red but I only find the pull request that I suspect 
to be for changes I made to be pulled by others. That could be a 
bad idea ;-)

I try to find a nice tutorial for Git(hub)

Somewhere I have read that someone had a problem with a similar drawing 
trick, can't remember where unfortunately, but it made me fear this 
trick might be impossible. Luckely it did work like I implemented 
it right on the first try..

I have seen that one before
Try
lbl-language-text: "en"

For both, R2 and R3, you can use HELP on a console to get a listing 
of all global values of a certain type. So to see all functions, 
try
>> HELP function!

Look at this pages http://www.maxvessi.net/pmwiki/pmwiki.php?n=Main.GuidaARebol
   http://rebol2.blogspot.comhttp://http://www.maxvessi.net/rebsite/wr/ 
        I try to unify all documentation, but it's missing a central 
index.

try to listen to the same port... you will get an error that the 
port is already opened.

I just wrote some code that seems to work.

; Checks to see if port is already open

either error? is-port-open: try [listen-port: open/binary/no-wait 
tcp://:xxx] [
	; Port already open, so do nothing
][
	; Port can be used so run the program
]

ok it's simpler then, let me try...

you can always try using /binary, but I don't know how it relates 
to using /lines.  IMO if you use /lines, the /binary refinement doesn't 
make a lot of sense

James, I'll try it tomorrow. Too late for my mind. Thank you.

There should be TRY:
if error? try [...]

Try to WRITE to a file the text you read from the web, it might be 
VERY long?

Tomoorw I'll try. Thanks for your help. Now it is time to go to BED

BrianH: Thanks for the info. It corrupts when I try it on objects. 
And wierd effects on blocks.. I've added "unset 'path" to my rebol.r 
file, so I won't be confused anymore.

Gregg, a little difficult for me but I'll try to lear.

Today I tried combining some tables in Excel, but without (frustrating!) 
no success. So tomorrow I will try and build a quicky REBOL script 
to put the data in one Rebdb databasetable and then do a dump of 
that and import that again in Excel.

So I combine data NAME PROP1 with NAME PROP2 giving a table NAME 
PROP1 PROP2
Any tips suggestions for lookalike scripts? Tia!

Try using Gregg's perfect REBOL Excel Control Dialect: http://www.robertmuench.ch/development/projects/excel/dialect_documentation/

Also look at Brian's csv-tools on rebol.org:

http://www.rebol.org/view-script.r?script=csv-tools.r&sid=cfnzx597gl

If that does the trick I'll try to trick it into believing this eof?: 
tail?

For a complete package that has a tree view (rather than a separate 
component), try rebGUI:
   http://www.dobeash.com/RebGUI/widgets.html

I'll try with some other version than rather old view.exe

Guiseppe: "I am not ablie to understand the use of Break. Why it 
is useful ?"
I'll try to explain:

>> parse/all "http://a.txthttp://b.dat"[any [to "http://"copy 
x any [".txt" | ".dat" | skip] (print x)]]

http://a.txthttp://b.dat;it prints just one line, from the first 
http:// to the last .dat


>> parse/all "http://a.txthttp://b.dat"[any [to "http://"copy 
x any [".txt" break | ".dat" break | skip] (print x)]]

http://a.txt;now it works as expected, from http:// to .txt 
and breaks
http://b.dat;and from the next http:// to .dat

But still there is a problem in your example. Here I'll try to explain:


>> parse/all "http://a.txthttp://b.dat"[any [to "http://"copy 
x any [thru ".txt" (print 1) break | thru ".dat" (print 2) break 
| skip (print 3)] (print x)]]
1
http://a.txt
2
http://b.dat


it looks correct. but actually it depends on which one is first (.txt 
or .dat)

here is the problem:

>> parse/all "http://a.txthttp://b.dat"[any [to "http://"copy 
x [thru ".dat" (print 1) | thru ".txt" (print 2) | skip (print 3)] 
(print x)]]
1
http://a.txthttp://b.dat

Petr, if you need a quick command line codepage converter program, 
try txtcnv32 here: http://www.ltr-data.se/files/txtcnv32.zip

It lets you specify code pages by number. The documentation of the 
code page numbers is here:

    http://msdn.microsoft.com/en-us/library/windows/desktop/dd317756(v=vs.85).aspx

try this interactive test:

view layout [p: panel [button]]

escape to console and type:

p/pane: get in layout/tight [field 100] 'pane

show p

let me try...

Try:


func [a b][probe type? a probe type? b length? a/mcapz  > length? 
b/mcapz ]

will try with both approaches.

thanks for the filtered-data tip maxim - will definitely move to 
that!

How can I get the error text when I use TRY, I want to show the original 
error text to the user: 
if error? set/any 'err try [1 / 0] [probe disarm err]


I think I saw something similar in UniServe sources but couldn't 
find it.

Anyone want to have a try at this little puzzle? I have a working 
solution, but I am sure there is way more REBOLish way.


I have two objects that each contain simple REBOL values (ie imagine 
they've just been created from some serialised data, so no recursive 
blocks or anything tricky):
    obj1: make object! [aaa: 1 bbb: "xx"]
    obj2: make object! [bbb: "XX" aaa: 1]


All I want to do is confirm that they contain identical words and 
values under normal REBOL comparison rules -- so obj1 and obj2 should 
be treated as identical, while the next few are not identical to 
obj1 or obj2:
    obj3: make object! [bbb: "xx"]    ;; no 'aaa word
    obj4: make object! [bbb: "XX" aaa: 1 ccc: 3]  ;; extra word

    obj5: make object! [bbb: "XX" aaa: -1]  ;; different 'aaa word value


I am sure there is a simple one-line 'parse solution .... Isn't there 
always!? Thanks!

Look at my Try REBOL site for a simple AJAX example

Endo: you should rather bench on one long series rather than 1M times 
on a small one in order to avoid function calls overhead and get 
a more fair comparison. When I try with a 1M size string with random 
a,b,c chars, my parse solution is twice faster than the mezz one 
(Brian's one is crashing so can't test it). I was expecting a greater 
difference though.

Talking of test, I am trying to write a simple function that checks 
if a data item matches a rebol datatype, so for example:

    print is-it-a? "number?" "12.5"
    == true
    print is-it-a? "number?" "xxx"
    == false
    print is-it-a? "number?" "?"
    == false


Except my function goes bad on that third example -- it prints the 
console help text.


Any thoughts on how to check incoming values without executing them 
as code? Thanks

    is-it-a?: func [
       data-type [string!]
       value [string!]
    ][
      data-type: first load/all data-type  
      error? try [
          value: first load/all value 
          return do reduce [data-type value]
      ]
      false
    ]

In your first try (bind 'e self), you're binding only this 'e word, 
not the :e function body, so if you replace it with: bind second 
:e self, it will work.


In second try, you're never binding 'e function body, you've just 
binded a new instance of 'f word that you have created using FIRST. 
That's why it works when you add DO, you're evaluating that new 'f 
instance which has the correct binding. Just remove FIRST, it will 
bind 'e body block and you'll get the result you've expected.

>> e: func [] [f]
>> o: context [f: does [print "ok"]]
>> bind second :e o
== [f]
>> e
ok

Try with system/script/args instead.

Haven't had time to try the above yet. It would be interesting to 
see more complex examples of parsing. No need to write it here, only 
if you can redirect me to any existing code online. The examples 
I have found seems simple, but maybe there are things implicated 
in those examples that I don't grasp ...

The usage comment in the third version is very nice. 


On doc strings, try to keep them short, leaving detailed notes to 
the usage or other comments. e.g.

rfunc: func [

    {Defines a tail-call optimized user function, using RECUR for self-calls.}
    spec [block!] "Function spec (see: func)"
    body [block!] "Function body (modified) (see: func)"
    /local wrapped
] [
    ...
] 

Short doc strings are nicer with HELP.

Also, I try to use special names for augmentations and such. In this 
case, 'with would conflict with my WITH func.

Last version.

- Any spec accepted but needs at least one parameter (can be just 
a local)

rfunc: func [
    [catch]
    spec [block!] body [block!] /local arg obj recur
][
    throw-on-error [

        if error? try [arg: to-lit-word first find spec any-word!][
            make error! "rfunc needs at least one parameter."
        ]
        recur: func spec compose [throw/name bind? (:arg) 'recur]
        obj: catch/name [do second :recur] 'recur
        funct spec compose/deep [
            recur: quote (:recur)
            forever [

                set/any [(to-block form first obj)] second catch/name [
                    return do [(body)]
                ] 'recur
            ]
        ]
    ]
]

Rebol [
    Title: "Catch"
    File: %catch.r
    Date: 5-Oct-2012/17:49:58+2:00
    Author: "Ladislav Mecir"
    Purpose: {
    	Catches local throw'
    	Ignores non-local throws
    }
]

; Error definition
system/error: make system/error [
	throw': make object! [
		code: system/error/throw/code + 50
		type: "throw' error"
    	not-caught: ["throw' not caught"]
    ]
]

catch': func [
    {Catches a throw' from a block and returns the value.}
    [throw]
    block [block!] "Block to evaluate"
    /local err disarmed
] [
	use [throw'] copy/deep compose/only [
		; "localize" 'throw' in the block
		block: (block)

		throw': func [[catch] value [any-type!]] [
			disarmed: disarm err: make error! [throw' not-caught]
			set/any in disarmed 'arg1 get/any 'value
			disarmed/arg2: 'throw'
			throw err
		]

		get/any either all [
			error? set/any 'err try block
			(
				disarmed: disarm err
				disarmed/type = 'throw'
			)
			disarmed/id = 'not-caught
			disarmed/arg2 =? 'throw'
		] [
			in disarmed 'arg1
		] [
			'err
		]
	]
]

so i copied the files over to a new directory, then when i try
>> do %uni-engine.r
>> uniserve/boot
...i get a bunch of errors saying cheyenne is not defined


using the old (0.99) sources on the softinnov website, i can use 
the starter.r script just fine. However, i set up a simple service 
and a module to process tasks, but get:

** Script Error: Cannot use path on none! value
** Where: process-task
** Near: if shared/pool-max > shared/pool-count [
    fork
    if verbose > 0 [log/info "launching new process"]
]

and did you try opendbx?

I figured out a way to make an R3-like ODBC API, and have an R2-like 
API emulated when you try to use it in an R2-like way. But then I 
ran out of time, was assigned to other projects for a while.

i'm pretty happy with hash! so far...will try map!

and, try to connect from a remote PC using mysql command-line tool.

try to get support for that, they can easily do that.

I still think that it is because your mysql server does not accept 
connections except localhost.

Did you try to connect your database using mysql command-line tools? 
or MySQL Workbench from a remote PC?

you can connect from local and configure your server using SQL commands.
did you try TELNET to your server's 3306 port?

After some time, I gave a try to the Sqlite DB. It kind of improved 
in some areas, even locking, so it is even more useable in concurrent 
environment. However - it still uses per file lock, and although 
it uses just milliseconds to lock the file, I have a problem with 
one aproach I am trying to take, and hence maybe the Sqlite is not 
right DB for my purpose, or my aproach is not correct. The reason 
why I wanted to use sqlite DB is, that it is easily movable to other 
target, and its performance is fine for even semi heavy solutions. 
I don't want to be dependant upon the some kind of "server", which 
stores its files who knows where, and to which I don't have proper 
access in cgi environment, unless I am a DB admin or server admin 
...

It's interesting when I try to connect using a port scheme I cannot 
get error msg:

>> con: open [scheme: 'odbc target: "..."] ;try with wrong password 
for example
** Script Error: ODBC error:

>> con: open odbc://sa:[qwe1234-:-mydsn]

** Script Error: ODBC error: [Microsoft][SQL Server Native Client 
10.0][SQL Server]Login failed for user 'sa'.  <<< now I got error 
msg.

Any idea how to get "real" error message?

thanks! I will try it ... otherwise I will reinstall mysq 5.1

learning comes with a lot of try and err even for a 'simple' language 
as REBOL


Probably yes and have your apache server set up right for .r files

Create 2 files. Call the first one e.g. cgi-test.html, and upload 
it to your server. The only thing you have to change is the link 
to your .cgi script in there:

<HTML>
<TITLE>Simple Web Form</TITLE>
<BODY>
<b>Simple Web Form</b><p>
<FORM ACTION="http://www.xidys.com/cgi-bin/cgi-test.cgi">
<INPUT TYPE="TEXT" NAME="Field" SIZE="25"><BR>
<INPUT TYPE="SUBMIT" NAME="Submit" VALUE="Submit">
</FORM>
</BODY>
</HTML>



Create a second file, called cgi-test.cgi (it has to align to how 
you name it in the above source file). Upload it to your cgi working 
directory. Remember to change the first line to contain the path, 
where your REBOL executable is placed:

#!/usr/local/bin/rebcmd -sqc

REBOL []

print join "Content-type: text/plain" newline
start: now/time/precise

submitted: decode-cgi read-cgi
values: construct submitted

prin "Submitted: " print mold submitted
prin "values: " print mold values
prin "values/field: " print mold values/field

print now/time/precise - start
print newline
 

Now go to your URL, and try to submit some values. You can test it 
on my site at: http://www.xidys.com/cgi-test.html

how does it matter where the values come from? it is a totally different 
issue.
try reading
http://www.rebol.com/docs/cgi1.html
http://www.rebol.com/docs/cgi2.html
http://www.rebol.com/docs/cgi-bbs.html

Plugging in the mouse (non-usb port) seems conflicting with mounting 
my usb mp3 player. Unplugging the mouse made my mp3 player disks 
visible again.Well it is not consequent in this. After another try 
it took me some time to mount it because it didn't show up. After 
mounting I plugged in the mouse again. For else I cannot copy files. 
It worked. System hangs up on me or doesn't respond copying the 20th 
mp3. Enough testing for today.

I did choose that option when installing, but I can re-create the 
VM to try to fix a little hassle with the startup menu. What happens 
now is that on the default first option, 'Start Syllable', you get 
an error saying that the selected disk does not exist. Choosing the 
second option, 'Start Syllable (automatic boot drive search), finds 
the OS and boots. I'm not sure what went wron there - I tried to 
install grub to the MBR - basically, I pretty much accepted the defaults 
or suggestions when installing. I'll go through it again just to 
make sure that I didn't mess something up, though, since it doesn't 
take very long.

I will give a quick try at installing 0.6.7 on VMware.

I'm just re-doing the VM now to try and correct that

but I'll try again once I'm finished re-installing

did the install again, and have the same boot issue - will try it 
yet again and see if I can fix it by editing menu.lst - do you think 
that should work?

Few of the drivers support widescreen resolutions, but you can try

Let's try it. We'll see what Doc says :-)

It's a web system currently, but it's prepared to support other platforms. 
My Try REBOL site is made with it

I get "** User Error: Handshake Response does not contain Login URL" 
when I try etsy/as "username"

Wow thanks a lot Chris! Thanks for separating OAuth port scheme, 
unfortunately I'm not familiar with OAuth but I'll try it with Salesforce. 
Thanks a lot!

You may want to try Fossil. It's much easier to run your own server

No, but don't try to use any GPL licenced tools to do it ... (ba 
dump bump)