[REBOL] getting Rebol OK Re:(4)
What with infinite loops? "rebol.exe" says Windows? my 95 can stop rebol's with the task-manager, but for instance old textpad can't do it (maybe textpads fault)? And all are named REBOL.. Could there be a timeout which triggers like escape? Volker Hi Volker, This is kind of off target here, but.. The method below would solve that problem in rebol/view. It ensures that processes don't keep running in the task manager after the window is closed for a rebol/view script that has an infinite loop. Hopefully the event scheme could be added to rebol/core too. or Perhaps some of the rebol/core gurus have similar solution for rebol/core? event-port: open [scheme: 'event] forever [ ; do stuff... ; do more stuff wait event-port ; since time events are always firing it won't have to wait long. event: first event-port if event/type = 'quit [break] do event ] close event-port ; end of script.. Cheers, Allen K
[REBOL] getting Rebol OK Re:(5)
In einer eMail vom 11.03.00 09:20:12 (MEZ) Mitteleuropäische Zeit schreibt [EMAIL PROTECTED]: Hi Volker, This is kind of off target here, but.. The method below would solve that problem in rebol/view. It ensures that processes don't keep running in the task manager after the window is closed for a rebol/view script that has an infinite loop. Hopefully the event scheme could be added to rebol/core too. or Perhaps some of the rebol/core gurus have similar solution for rebol/core? event-port: open [scheme: 'event] forever [ ; do stuff... ; do more stuff wait event-port ; since time events are always firing it won't have to wait long. event: first event-port if event/type = 'quit [break] do event ] close event-port ; end of script.. Hm, this is not asynchrone? i need a "programmable escape key". The problem is, what i do with _buggy_ infinite loops when i test over the net (the "do stuff" hangs, not the main-loop)? there is no escape-key then. Think i want _really_ to use one of this nice rebol-cgi-servers, or, Yea, the wicki server (:-)), and my script has a bug. happily the server hangs. if i could say [after 5 seconds escape with 'server-restart], it would be much safer. running the server in a extern shell-loop, it could free itself nearly allways. having memory-limits, context-protection (Gabrieles?) too and a really crash-hard kernel would make this stuff really portable, but a simple "start: rebol server.r ^/ goto start" is so short that porting is acceptable :) Killing rebols, especially on windows, is another thing. for example, in my perl "kill" does not work, and external communication would be needed to say "ok, iam well, let me continue". Having a "escape-key" and controlled pre-buffering would make more threading nearly unneccessary, i think. (Maybe full threading looks cool, but, write Java with and without it.. And than look at Oberon (well, partly:). And think you write REBOL in minutes, not java-like system-design :) Hopefully iam missing something :) Note: the realtime JBed (mentioned in Dr Dobbs) preferres this approach.. Note2: the original message was "can't stop rebol, bad script".. Cheers, Allen K Cheers back :) Volker
[REBOL] finding stuff, and looping
finding stuff, and looping Hey guys, I'm pretty sure it's not the best way, but can this be done? open a directory, or mailbox, etc: word: open %/directory/ howmany: length? word howmanymore: howmany ++1 do stuff to word/howmany do stuff to word/howmanymore either howmanymore = howmanymore [close word] [keep going] That's not a very clear question, but, have any ideas? -t
[REBOL] rebol and SSL
Hi Folks, I've been developing a shopping basket system using several rebol scripts (partly based on the sid and cart scripts on rebol.org) but now it is partly working I came to the matter of sending a secure order with credit card numbers. Since rebol doesn't currently support SSL I'm not entirely sure about how it could be used for securely sending credit card details. I don't have a lot of knowledge about SSL servers so anyone got suggestions about how this can be implemented (without dropping it and having credit details sent seperately by e-mail/phone) ? All the best, Ed. -- _ \___ \ /\ / ___// ICQ: 34895924 | \ \\_/\_// __// TWF Home : http://www.worldfoundry.com/ |_ /__\/_// CEG Home : http://www.worldfoundry.com/ceg/ = The World Foundry LLC - Amiga PPC - Explorer 2260 - Maim Mangle SNH, SNH, SNH. -- (Terry Pratchett, Soul Music)
[REBOL] RE: rebol and SSL
Perhaps this site is pertinent? http://www.openssl.org/ My knowledge of the project is zero but maybe it can be integrated into REBOL. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] Sent: Saturday, March 11, 2000 2:57 PM To: [EMAIL PROTECTED] Subject: [REBOL] rebol and SSL
[REBOL] Is there a shorter way to pass refinements?
Is there a shorter way to pass refinements? for example a: func[ /header][] b: func[ /header][ either header [ a/header ][ a ]] Volker
[REBOL] finding stuff, and looping Re:
Hi -t, you wrote: finding stuff, and looping foreach filename load %ddbms/ [ if not dir? filename [ file: read join %ddbms/ [filename] ;- do-stuff-with-contents-of-file filename, ;- or just print the name of the file read: print ["read filename" filename] ] ] ;- Elan [: - )]
[REBOL] Is there a shorter way to pass refinements? Re:
Volker asked: Is there a shorter way to pass refinements? for example a: func[ /header][] b: func[ /header][ either header [ a/header ][ a ]] Yes. For example: SNA_switch: function [ "Selects a choice and evaluates what follows it." value "Value to search for." cases [block!] "Block of cases to search." /case "Value is case-sensitive." /only "Treats a series value as a single value." /any "Enables the * and ? wildcards." /default Default_Case "Default case if no others are found." ][ Refined_Select ][ Refined_Select: to path! 'select if case [head insert tail :Refined_Select 'case] if only [head insert tail :Refined_Select 'only] if any [head insert tail :Refined_Select 'any] either found? value: Refined_Select cases value [ do value ][ either default [ do Default_Case ][ none ] ] ] I hope that helps. Andrew Martin ICQ: 26227169 http://members.xoom.com/AndrewMartin/ --