[REBOL] AW: [REBOL] Syntax highlighting for GoldED
> -Ursprüngliche Nachricht- > Von: [EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED]] > Gesendet am: Mittwoch, 17. Mai 2000 23:12 > An: [EMAIL PROTECTED] > Betreff: [REBOL] Syntax highlighting for GoldED > > Hello, > > when talking about syntax highlighting... > > is there any syntax highlighting module for Amiga's GoldED? > > Thanks, Bolek > -- > --you've been/byl jsi contacted/kontaktovan > --- > [EMAIL PROTECTED] > -www.volny.cz/weirddream > > There isn't. And I doubtit's possible to write a good syntax highlighting module for rebol at all. In most languages there are exact naming rules, e.g. in my favourite language E: first two literals of word are upper case->constant first two literals of word are lowercase , not ending in a ( ->variable first literal upper case, second one lower case -> standard E function or a system function ... But with rebol ? imagine the syntax parser finds a word like Öffne_Datei : what is it ? A variable, a function ? ciao, Jean
[REBOL] Question on Secure (repost) Re:(5)
Mike wrote: > Not sure what to say, Andrew. Don't take this personally but your solutions didn't work whereas Volker's did. I won't take it tooo personally. I can call my self an idiot for not checking it? :-) 'source doesn't evaluate it's argument. I didn't check for that. :-( >> source secure secure: native [ {Specifies security policies (access levels and directories). Return prior settings.} 'level [word! block!] "Levels are: quit, throw, ask, and allow." ] Note the little tick { ' } by 'level. I'm used to the arguments being evaluated. Andrew Martin Making new records in personal idiocy. :-D ICQ: 26227169 http://members.xoom.com/AndrewMartin/ -><-
[REBOL] Question on Secure (repost) Re:(4)
Not sure what to say, Andrew. Don't take this personally but your solutions didn't work whereas Volker's did. Yours: downloaddir: %/d/anti%20virus%20downloads/ == %/d/anti%20virus%20downloads/ >> secure compose [(downloaddir) allow] ** Script Error: Invalid argument: compose. ** Where: secure compose [(downloaddir) allow] >> DirPermission: 'allow == allow >> secure reduce [downloaddir DirPermission] ** Script Error: Invalid argument: reduce. ** Where: secure reduce [downloaddir DirPermission] = Volker's >> do compose/deep[secure[(downloaddir) allow]] == [net allow file [allow read ask write ask execute]] >> do compose/deep[secure[(downloaddir) allow]] == [net allow file [allow read ask write ask execute] %/d/anti%20virus%20downloads allo w] >> Mike. === - Original Message - From: <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Wednesday, May 17, 2000 2:29 AM Subject: [REBOL] Question on Secure (repost) Re:(3) > Hi, Volker. > Call me idiot, but I didn't understand what you're trying to say here: > > > do compose/deep[secure[(my-dir) allow]] > > > > attention to the 'level in secure, this means, the compose is not > evaluatet! > > you have to hack a bit more :) > > > > >> source secure > > secure: native [ > > {Specify security policies (access levels and directories). Return prior > settings.} > > 'level [word! block!] "Levels are: quit, throw, ask, and allow." > > ] > > > > I suggest with default protection before: > > do compose/deep[secure[net ask file ask (my-dir) allow]] > > How is your solution better than: > DirPermission: 'allow > secure reduce [downloaddir DirPermission] > ? > > Andrew Martin > Who's been called an idiot today! :-( But I don't believe them... :-) > ICQ: 26227169 > http://members.xoom.com/AndrewMartin/ > -><- >
[REBOL] Suppressing == false Re:(2)
Tim wrote: > I get "== false" in the output. > How do I get rid of that? The best way currently, is to swap the 'if for a 'either. I, too, would like rebol to get rid of the 'false returned by a 'if not taken. Andrew Martin ICQ: 26227169 http://members.xoom.com/AndrewMartin/ -><-
[REBOL] read-io
Can anyone tell me what it means when read-io returns -1? Thanks, Max
[REBOL] CGI Error Re:(2)
Elan, There server is running Windows NT. That is all I know. Thanks for the help. Louis At 05:01 PM 5/17/00 -0700, you wrote: >Do you happen to know their configuration? What OS are they using? Webserver? > > > >;- Elan >> [: - )]
[REBOL] CGI Error Re:(3)
> print "" This should be - but that would not have caused the error you reported. Here's a generic email script that I've been using. The form uses the same variable names you see here (TO, FROM, SUBJECT). Note that you can add variables in the form, and REBOL will automatically be appended them to the content. The thing I've been meaning to add is a way to redirect the user to a confirmation page from the HTML form. -- #!/usr/bin/rebol --cgi REBOL[Title: "Contact CGI" ] ;- Configure Internet Mail, if necessary ; set-net [ ] ;- Create object based on system/standard/email with usual defaults. ;- (!) Added FROM_NAME for personal name email-obj!: make object! [ TO: none CC: none BCC: none FROM: none FROM_NAME: none REPLY-TO: none DATE: none SUBJECT: none RETURN-PATH: none ORGANIZATION: "" MESSAGE-ID: none COMMENT: none X-REBOL: {2.2.0.3.1 "The Internet Messaging Language (TM) WWW.REBOL.COM"} MIME-VERSION: none CONTENT-TYPE: none CONTENT: none ] ;- Retrieve HTML form variables from either CGI Environment or Standard Input email-obj: make email-obj! decode-cgi either system/options/cgi/request-method = "GET" [system/options/cgi/query-string] [make string! input] ;- Tweak email object set in email-obj 'FROM to-string join email-obj/FROM_NAME [" <" email-obj/FROM ">"] set in email-obj 'REPLY-TO email-obj/FROM set in email-obj 'SUBJECT join "[CONTACT] " email-obj/SUBJECT ;- (!) Work around bug in send - skips first line of CONTENT thinking it's the SUBJECT set in email-obj 'CONTENT join email-obj/SUBJECT [crlf email-obj/CONTENT] ;- Send it - Message is in email-obj send/header to-email email-obj/TO "" email-obj ;- Confirm it print {Content-Type: text/html Contact Confirmed Thank you for contacting us. } ;- END OF PRINT ;- Done quit -- Ted Husted, Husted dot Com, Fairport NY USA. -- Custom Software ~ Technical Services. -- Tel 716 425-0252; Fax 716 223-2506. -- http://www.husted.com/
[REBOL] Suppressing == false Re:
Hello: Frequently when I use rebol code that evaluates a condition, the interpreter spits out == false I'd like to be able to suppress that. I've got a basic template to trap error messages. It goes like this (complements of other list members): if error? set/any 'err try [ print "yes" ] [ err: disarm err print reform bind (get in (get in system/error err/type) err/id) in err 'type ] since the code: print "yes" is syntactically correct, I get "== false" in the output. How do I get rid of that? Thanks Tim
[REBOL] [REBOL]Finding characters in strings/Comparing Re:(2)
Hey Elan! This is really important info, as far as I am concerned. The side effect is that you also showed me how to do simple bench-marking. I had speculated myself that char-pos1 would be the fastest. Thanks, and good luck with the book! Tim At 04:53 PM 5/17/00 -0700, you wrote: >Hi Tim, > >you wrote: >[...] >>I would love to see some input and discussion as to what >>is the most efficient of the three functions. >[...] > >If you compare char-pos1 to char-pos2 then the only difference is that >char-pos2 adds a call to found? to char-pos1. It's probably safe to >speculate that char-pos1 should be more efficient. > >if you accept that, then the field is narrowed down to char-pos1 vs. >char-pos0. You can speculate about these two, but without knowing the >implementation details of all, any and either, the degree of confidence in >the result of this speculation is a little lower. > >As a matter of principle, either accomplishes what the combined any and all >accomplish. At face value I tend to think that char-pos1 should be more >efficient, since it consists of one (native) function call, where the >combination all/any requires two function calls. I doubt that any and all's >implementations can be that much more efficient than either's >implementation, that parsing and calling any and all would still be more >efficient than a single parse/call to either. > >If you compare this speculation to some (inaccurate) measurements, I appear >to be on the right track: > >>> start: now/time loop 100 [char-pos0 s c] print now/time - start >0:00:46 >>> start: now/time loop 100 [char-pos1 s c] print now/time - start >0:00:42 >>> start: now/time loop 100 [char-pos2 s c] print now/time - start >0:00:54 > > > >>I wouldn't consider readability to be an issue, because >>this would not be a function that would need any maintenance. >> >>Here goes: >>char-pos0: func [str [string!] ch [char!] /ndx] >>[ >> any[all [ndx: find/case str ch index? ndx] 0] >>] >>char-pos1: func [str[string!] ch[char!] /local result] >>[ >> either result: find/case str ch [index? result] [0] >>] >>char-pos2: func [str[string!] ch[char!] /local result] >>[ >> either found? result: find/case str ch [index? result][0] >>] >> >> >> > >;- Elan >> [: - )] > >
[REBOL] CGI Error Re:(3)
Hi Louis, a little off-topic, but it is more efficient to collect your output in a string and print the complete string in one go, using a single call to print. Like so: output: make string! 1000 insert output {Content-Type: text/html^/^/ Results:} cgi: make system/standard/email decode-cgi system/options/cgi/query-string either all [ email? try [cgi/to: load cgi/to] email? try [cgi/from: load cgi/from] ][ append output " Sending Email to cgi/to " send/header cgi/to cgi/content cgi ][ append output "Invalid email to or from address" ] print [output ""] At 07:32 PM 5/17/00 -0500, you wrote: >Here's the script: > >#!rebol -cs > >REBOL [ > Title: "Sends Email via CGI Form" > Date: 20-July-1999 > File: %cgiemailer.r > Purpose: { > Uses a Web form to send an email message. > } >] > >print "Content-Type: text/html^/^/" ;-- Required Page Header > >print "Results:" > >cgi: make system/standard/email decode-cgi system/options/cgi/query-string > >either all [ > email? try [cgi/to: load cgi/to] > email? try [cgi/from: load cgi/from] >][ > print [ "Sending Email to" cgi/to ] > send/header cgi/to cgi/content cgi >][ > print "Invalid email to or from address" >] > >print "" > >And here is the HTML: > > > > > > > untitled > > > > >http://worldmerchantltd.com/www/cgi-bin/cgiemailer.r" >METHOD="GET"> >Send an Email Message: > > > > > To: > > > > > > From: > > > > > > Subject: > > > > > > Message: > > > > > > > > > > > > > >At 04:07 PM 5/17/00 -0700, you wrote: >>Louis wrote: >> > CGI Error >> > The specified CGI application misbehaved by not returning a complete >> set of >> > HTTP headers. The headers it did return are: >> >>Is your script printing a Content-type header as the first thing it >>does, followed by a blank line? >> >>print "Content-type: text/html^/^/" >> >>Kev >> >> >>Kevin McKinnon, Network Engineer [EMAIL PROTECTED] >>Sunshine Communications http://www.sunshinecable.com >> >>PGP Public Key: http://www.dockmaster.net/pgp.html PGP 6.0 www.pgp.com > > > ;- Elan >> [: - )]
[REBOL] CGI Error Re:
Hi Louis, you wrote: >I'm having trouble getting set up. What is causing the following error >message? I it caused by me or my ISP? > >Many thanks in advance. >Louis > >CGI Error >The specified CGI application misbehaved by not returning a complete set of >HTTP headers. The headers it did return are: If this is the complete error message, then the Content-type: text/html is not being reported. Provided that your script does print the string Content-type: text/html before it outputs anything else, at least that string should appear in the reported headers. If the first thing being printed by your script is the Content-type ... thing, and the error you report is the complete text of the error reported by your ISP, then at least something is wrong with their error reporting mechanism. 1. Perhaps their error reporting mechanism has a bug and is suppressing the Content-type header? 2. Or their bug is that they are missing the Content-type header you are printing, and therefore they report that they did not receive any headers? 3. Perhaps they should not be displaying an error at all? 4. Perhaps something is wrong with your configuration on their machine and therefore the Content-type header you are printing is not reported to them? Do you happen to know their configuration? What OS are they using? Webserver? ;- Elan >> [: - )]
[REBOL] [REBOL]Finding characters in strings/Comparing Re:
Hi Tim, you wrote: [...] >I would love to see some input and discussion as to what >is the most efficient of the three functions. [...] If you compare char-pos1 to char-pos2 then the only difference is that char-pos2 adds a call to found? to char-pos1. It's probably safe to speculate that char-pos1 should be more efficient. if you accept that, then the field is narrowed down to char-pos1 vs. char-pos0. You can speculate about these two, but without knowing the implementation details of all, any and either, the degree of confidence in the result of this speculation is a little lower. As a matter of principle, either accomplishes what the combined any and all accomplish. At face value I tend to think that char-pos1 should be more efficient, since it consists of one (native) function call, where the combination all/any requires two function calls. I doubt that any and all's implementations can be that much more efficient than either's implementation, that parsing and calling any and all would still be more efficient than a single parse/call to either. If you compare this speculation to some (inaccurate) measurements, I appear to be on the right track: >> start: now/time loop 100 [char-pos0 s c] print now/time - start 0:00:46 >> start: now/time loop 100 [char-pos1 s c] print now/time - start 0:00:42 >> start: now/time loop 100 [char-pos2 s c] print now/time - start 0:00:54 >I wouldn't consider readability to be an issue, because >this would not be a function that would need any maintenance. > >Here goes: >char-pos0: func [str [string!] ch [char!] /ndx] >[ > any[all [ndx: find/case str ch index? ndx] 0] >] >char-pos1: func [str[string!] ch[char!] /local result] >[ > either result: find/case str ch [index? result] [0] >] >char-pos2: func [str[string!] ch[char!] /local result] >[ > either found? result: find/case str ch [index? result][0] >] > > > ;- Elan >> [: - )]
[REBOL] CGI Error Re:(2)
Here's the script: #!rebol -cs REBOL [ Title: "Sends Email via CGI Form" Date: 20-July-1999 File: %cgiemailer.r Purpose: { Uses a Web form to send an email message. } ] print "Content-Type: text/html^/^/" ;-- Required Page Header print "Results:" cgi: make system/standard/email decode-cgi system/options/cgi/query-string either all [ email? try [cgi/to: load cgi/to] email? try [cgi/from: load cgi/from] ][ print [ "Sending Email to" cgi/to ] send/header cgi/to cgi/content cgi ][ print "Invalid email to or from address" ] print "" And here is the HTML: untitled http://worldmerchantltd.com/www/cgi-bin/cgiemailer.r" METHOD="GET"> Send an Email Message: To: From: Subject: Message: At 04:07 PM 5/17/00 -0700, you wrote: >Louis wrote: > > CGI Error > > The specified CGI application misbehaved by not returning a complete > set of > > HTTP headers. The headers it did return are: > >Is your script printing a Content-type header as the first thing it >does, followed by a blank line? > >print "Content-type: text/html^/^/" > >Kev > > >Kevin McKinnon, Network Engineer [EMAIL PROTECTED] >Sunshine Communications http://www.sunshinecable.com > >PGP Public Key: http://www.dockmaster.net/pgp.html PGP 6.0 www.pgp.com
[REBOL] CGI Error Re:(2)
Kev, My last post was directed to you, but I forgot to put your name on it. Sorry. Thanks for the help. Louis At 04:07 PM 5/17/00 -0700, you wrote: >Louis wrote: > > CGI Error > > The specified CGI application misbehaved by not returning a complete > set of > > HTTP headers. The headers it did return are: > >Is your script printing a Content-type header as the first thing it >does, followed by a blank line? > >print "Content-type: text/html^/^/" > >Kev > > >Kevin McKinnon, Network Engineer [EMAIL PROTECTED] >Sunshine Communications http://www.sunshinecable.com > >PGP Public Key: http://www.dockmaster.net/pgp.html PGP 6.0 www.pgp.com
[REBOL] CGI Error Re:
I should have mentioned that I am trying to get the cgiemailer.r script from rebol.com to work. I haven't changed anything except the path in cgiemailer.html. Louis At 06:23 PM 5/17/00 -0500, you wrote: >I'm having trouble getting set up. What is causing the following error >message? Is it caused by me or my ISP? > >Many thanks in advance. >Louis > >CGI Error >The specified CGI application misbehaved by not returning a complete set >of HTTP headers. The headers it did return are:
[REBOL] CGI Error Re:
Louis wrote: > CGI Error > The specified CGI application misbehaved by not returning a complete set of > HTTP headers. The headers it did return are: Is your script printing a Content-type header as the first thing it does, followed by a blank line? print "Content-type: text/html^/^/" Kev Kevin McKinnon, Network Engineer [EMAIL PROTECTED] Sunshine Communications http://www.sunshinecable.com PGP Public Key: http://www.dockmaster.net/pgp.html PGP 6.0 www.pgp.com
[REBOL] [REBOL]Finding characters in strings/Comparing
Hello You'All: Being my own most demanding critic, I wrote a function to find the matching index of a character in a string. I submitted that function, and have gotten three versions of an improvement upon the algorithm. All are obviously an improvement over mine. I would love to see some input and discussion as to what is the most efficient of the three functions. Forgive me, but I just can't help myself - my first paying programming work was writing C and Assembly for a 286. I've always been miserly when it came to machine overhead. I wouldn't consider readability to be an issue, because this would not be a function that would need any maintenance. Here goes: char-pos0: func [str [string!] ch [char!] /ndx] [ any[all [ndx: find/case str ch index? ndx] 0] ] char-pos1: func [str[string!] ch[char!] /local result] [ either result: find/case str ch [index? result] [0] ] char-pos2: func [str[string!] ch[char!] /local result] [ either found? result: find/case str ch [index? result][0] ]
[REBOL] Windows NT 4.0 / Apache / Rebol Configuration
I am running Windows NT 4.0 (I believe with SP5) with Rebol/Core 2.2.0.3.1 (which is the latest version as far as I can tell) and Apache 1.3.9. My goal is to get Rebol running with Apache and CGI. (I figure I should be able to CGI working first before I move on to anything more advanced.) If anyone has an NT 4.0 / Apache / Rebol setup running and can provide some help, I would appreciate it! My script (sample.r) looks like this: #!e:\rebol\rebol.exe --cgi REBOL [] print "Content-Type: text/plain^/" print ["Welcome to my time and date page!" " The time and date is" now] If I run the program using the command "e:\rebol\rebol.exe sample.r", the Rebol console opens and the script output is display (good). If I run the program using the command "e:\rebol\rebol.exe --cgi sample.r", the Rebol console doesn't open (good) but there is no output to the CMD.EXE console (bad). Based on one of the e-mails in this list, I tried "e:\rebol rebol.exe --cgi sample.r | more". This gives me output to the CMD.EXE console (good). I'm assuming I need to get the "" version working before I have a chance of getting Apache CGI working. I have a second problem... When I bring up http://server/cgi-bin/sample.r in the browser I get an error: Internal Server Error The server encountered an internal error or misconfiguration and was unable to complete your request. The error log says: (2)No such file or directory: couldn't spawn child process: e:/program files/apache group/apache/cgi-bin/sample.r If I cut and paste that pathname to the CMD.EXE window and change the forward slashes to back slashes and put quotes around the whole thing, I can do a DIR on it and see the file exists. I have set up the file associations as follows: E:\>assoc .r .r=rfile E:\>ftype rfile rfile=e:\rebol\rebol.exe --cgi "%1" %* If I remove the --cgi from the above command and type "sample.r" in the CMD.EXE window, the Rebol script runs in a Rebol window as expected. If I put the --cgi back in and type "sample.r" in the CMD.EXE window, I get the behavior I mentioned above where the output doesn't show up. Now, it seems from the error log that there is something else wrong with my configuration such that, even if I get the script output to appear, Apache still won't run the script. I can put Perl scripts in the cgi-bin directory and they work in the browser. Thanks for any help! /jonathan
[REBOL] CGI Error
I'm having trouble getting set up. What is causing the following error message? I it caused by me or my ISP? Many thanks in advance. Louis CGI Error The specified CGI application misbehaved by not returning a complete set of HTTP headers. The headers it did return are:
[REBOL] [REBOL]Finding characters in strings Re:
Hi Tim, this would be my version ... char-pos: func [str[string!] ch[char!] /local result] [ either found? result: find/case str ch [index? result][0] ] regards, Ingo Those were the words of [EMAIL PROTECTED]: > Hi: > I have written a function to find the matching index > for a character in a string: > > ;code follows: > char-pos: func [str[string!] ch[char!] /local result] > [ > result: find/case str ch > either equal? result none [return 0] > [return index? find/case str ch] > ] <...> -- _ ._ ingo@)|_ /| _| _ ingo@| |(_|o(_)| (_| http://www.2b1.de/Rebol/ ._| ._|
[REBOL] [REBOL]Finding characters in strings Re:(2)
Thank you Jeff: It works without the redundant call all right Tell me - how r is returned with a specific call to return? Regards Tim P.S. will read Docs on ANY and ALL At 01:18 PM 5/17/00 -0800, you wrote: > > > Howdy Tim: > > I'm a big fan of ANY and ALL for instance like that > >char-pos: func [str [string!] ch [char!] /r][ >any [all [r: find/case str ch index? r] 0] >] > >> Hi: >> I have written a function to find the matching index >> for a character in a string: >> >> ;code follows: >> char-pos: func [str[string!] ch[char!] /local result] [ >>result: find/case str ch either equal? result none >>[return 0] [return index? find/case str ch] >> ] ;I have had to use find/case twice because if ; I use >> index? find str ch ; and i submit a character that is not >> found in str ; I get the following error message from the >> interpreter ** ScriptError: index? expected series >> argument of type: series port How can Ichange this >> function so that I don't have to call find/case twice? >> >> Thanks In advance Tim >> >> > >
[REBOL] Syntax highlighting for GoldED
Hello, when talking about syntax highlighting... is there any syntax highlighting module for Amiga's GoldED? Thanks, Bolek -- --you've been/byl jsi contacted/kontaktovan --- [EMAIL PROTECTED] -www.volny.cz/weirddream
[REBOL] [REBOL]Finding characters in strings Re:(2)
Not being used to the any/all construct (below) I find it a little hard to read. It does produce terse code, but then the original example could have been shortened up considerably too (if this is all there was to the problem). To solve the problem in the original context, the second 'find (in the original example) could simply have been replaced by the previous 'find result in 'result. Thus: char-pos: func [str[string!] ch[char!] /local result] [ result: find/case str ch either equal? result none [return 0] [return index? result] ] Reducing this example could look like: char-pos: func [str[string!] ch[char!] /local result] [ either result: find/case str ch [index? result] [0] ] - Michael Jelinek -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] Sent: Wednesday, May 17, 2000 2:19 PM To: [EMAIL PROTECTED] Subject: [REBOL] [REBOL]Finding characters in strings Re: Howdy Tim: I'm a big fan of ANY and ALL for instance like that char-pos: func [str [string!] ch [char!] /r][ any [all [r: find/case str ch index? r] 0] ] > Hi: > I have written a function to find the matching index > for a character in a string: > > ;code follows: > char-pos: func [str[string!] ch[char!] /local result] [ >result: find/case str ch either equal? result none >[return 0] [return index? find/case str ch] > ] ;I have had to use find/case twice because if ; I use > index? find str ch ; and i submit a character that is not > found in str ; I get the following error message from the > interpreter ** ScriptError: index? expected series > argument of type: series port How can Ichange this > function so that I don't have to call find/case twice? > > Thanks In advance Tim > >
[REBOL] [REBOL]Finding characters in strings Re:
Howdy Tim: I'm a big fan of ANY and ALL for instance like that char-pos: func [str [string!] ch [char!] /r][ any [all [r: find/case str ch index? r] 0] ] > Hi: > I have written a function to find the matching index > for a character in a string: > > ;code follows: > char-pos: func [str[string!] ch[char!] /local result] [ >result: find/case str ch either equal? result none >[return 0] [return index? find/case str ch] > ] ;I have had to use find/case twice because if ; I use > index? find str ch ; and i submit a character that is not > found in str ; I get the following error message from the > interpreter ** ScriptError: index? expected series > argument of type: series port How can Ichange this > function so that I don't have to call find/case twice? > > Thanks In advance Tim > >
[REBOL] [REBOL]Finding characters in strings
Hi: I have written a function to find the matching index for a character in a string: ;code follows: char-pos: func [str[string!] ch[char!] /local result] [ result: find/case str ch either equal? result none [return 0] [return index? find/case str ch] ] ;I have had to use find/case twice because if ; I use index? find str ch ; and i submit a character that is not found in str ; I get the following error message from the interpreter ** Script Error: index? expected series argument of type: series port How can I change this function so that I don't have to call find/case twice? Thanks In advance Tim
[REBOL] Re: rebol ecommerce site Re:(3)
On 17-May-00, [EMAIL PROTECTED] said about the subject [REBOL] rebol ecommerce site Re:(3): Hi, > I just want to tell you how impressed I am with your work. The site looks Thanks. > great and the total use of REBOL is awesome. I was wondering if your > content is store in a database or flat file. How did you deal with REBOL's > data limitations? I had to go for a flat file database considering the rebol/core limitations with databases. Kind Regards, 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 Things I'd Do If I Ever Became An Evil Overlord 77. If I have a fit of temporary insanity and decide to give the hero the chance to reject a job as my trusted lieutenant, I will retain enough sanity to wait until my current trusted lieutenant is out of earshot before making the offer.
[REBOL] Re: data storage (was: [REBOL] rebol ecommerce site Re:(3))
This subject brings something else to mind I would like to share... I am looking forward to REBOL/Command in the hopes that the BeOS version will support read/write access to extended BeOS File System attributes. Extended BFS attributes are a simple, reliable way to store and retrieve data in fast, robust, journaled file system. Within the next few weeks or months, the new BeOS kernel-based networking environment dubbed "BONE" is expected to be released in a point release upgrade for the BeOS. BONE is rumored to be just as robust and stable as Linux. Meanwhile, Apache 2.0 when completed will support the BeOS. I was wondering if your > content is store in a database or flat file. How did you deal with > REBOL's data limitations?
[REBOL] rebol ecommerce site Re:(3)
I just want to tell you how impressed I am with your work. The site looks great and the total use of REBOL is awesome. I was wondering if your content is store in a database or flat file. How did you deal with REBOL's data limitations? -Original Message- Anyone else have any comments on the system or suggested improvements ?
[REBOL] Re: rebol ecommerce site Re:
On 17-May-00, [EMAIL PROTECTED] said about the subject [REBOL] rebol ecommerce site Re:: Hi, > very cool...REBOL View and Command will make this much easier and more > comprehensive for you in the near future...we're plugging away! dan Thanks. Rebol/Command will certainly be of benefit for a larger scale version of such a system. Anyone else have any comments on the system or suggested improvements ? Kind Regards, 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 Injustice anywhere is a threat to justice everywhere. -- Martin Luther King, Jr.
[REBOL] emacs colors Re:(5)
Howdy, Fredrik ( and other brothers and sisters of the EMACS faith (-: ): Okay, you may want to byte-compile the file first: M-x byte-compile-file This will produce "rebol.elc". Then you might put this in your home directory. You may need to add your home directory to the search path. Add this to your .emacs: (setq load-path (cons "/path/to/your-home-dir" load-path)) After that you can add this line: (load "rebol") To associate the mode with .r files add: (setq auto-mode-alist (cons '("\\.r$" . rebol-mode) auto-mode-alist)) Now here's a real handy piece of elisp to rebol glue code: (defun go-rebol () (interactive) (progn (mark-whole-buffer) (write-region (buffer-string) 0 "/path/to/somewhere/.temp.r") (switch-to-buffer (process-buffer (setq proc (start-process "subrebol" "subrebol" "/path/to/rebol" "-s" "/path/to/somewhere/.temp.r" (comint-mode) ) ) (global-set-key "\M-e" (quote go-rebol)) ;- changing all the paths to where ever they are. Now you can be in a buffer making a script, type M-e and it will pass your script to rebol and start it in a separate buffer. Good luck! If any one out there has some experience dealing with emacs modes, the rebol.el emacs mode could use your help. There are still a couple things wrong with the way it parses strings in particular and where it places close square brackets. -jeff > src> print emacs-mode: read http://www.rebol.org/rebol.el > > Thank you. > > Now I'm not this good at emacs, the program is very good, > but i cannot figure out where to put the rebol.el file and > how to include/start it in emacs. > > I tried: ESC-x load-file rebol.el (add-hook > 'rebol-mode-hook 'turn-on-font-lock) > > neither one works, may be because this isn't the right way? > > Regards, Fredrik Bergstrom > > -- > > [ PowerWebs have a good Webhotel for everyone, supports > Rebol to =) ] [ www.powerwebs.se ] > > PowerWebs AB Wåxnäsgatan 10 S-653 40 Karlstad Sweden Tel: > +46-(0)54-103377 Fax: +46-(0)54-103376 ICQ# 7654213 > > >
[REBOL] emacs colors Re:(5)
Here's what I've got... The first line insures that where I put my rebol.el file is in the load path, it loads the file, requires it (whatever that's worth I don't know exactly), then adds the hook and associates .r files. (setq load-path (cons "/usr/lib/xemacs/site-lisp" load-path)) (load "rebol") (require 'rebol) (add-hook 'rebol-mode-hook (lambda () (font-lock-mode 1))) (setq auto-mode-alist (cons (cons "\\.r\\'" 'rebol-mode) auto-mode-alist)) )) Sterling > Hello sterling, > > Tuesday, May 16, 2000, 7:15:44 PM, you wrote: > > > src> print emacs-mode: read http://www.rebol.org/rebol.el > > Thank you. > > Now I'm not this good at emacs, the program is very good, but i > cannot figure out where to put the rebol.el file and how to > include/start it in emacs. > > I tried: > ESC-x load-file rebol.el > (add-hook 'rebol-mode-hook 'turn-on-font-lock) > > neither one works, may be because this isn't the right way? > > Regards, Fredrik Bergstrom
[REBOL] stack space Re:(2)
Oops, yes this was a bug, now fixed. The reason I jumped to conclusions was because I ran out of stack space once with REBOL on the Amiga and it clearly WASN'T a bug (the same program ran on NT without error). As I said, on the Amiga it was easy to increase the stack size and the program ran fine. - Michael Jelinek -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] Sent: Tuesday, May 16, 2000 4:42 PM To: [EMAIL PROTECTED] Subject: [REBOL] stack space Re: out of stack space usually means an infinite loop with recursion. so increasing it to any amount, no matter how huge, is futile. fix the bug instead.
[REBOL] load/next - bug?! Re:(9)
[EMAIL PROTECTED] wrote: > Hi, > > [...] > > > BTW, how about a link to the creation-point of a value? > > this would help me, i often have this "you need a block here!" > > and have to look around where the var is assigned, > > especially when using locals (no good look-in). > > Exec-Lists had such a debug-text-field :) > > > > BTW2: What happens if i change the body of a running function > yet?! > > > > Volker > > > > BTW: I cannot imagine any simple way how to accomplish it. > > BTW2: If you change the body of a running function, the behaviour > of it changes (a self modifying code). > REBOL [] x: func [par1 par2][ print "inside function 'x" print par1 print "+" print par2 count par1 par2 ] count: func [parm1 parm2][ print "--" print parm1 + parm2 insert tail second :x compose [+ random 300] ] print "Original function: " print mold :x x 100 25 print newline print "Inline changed function: " x 100 30 print mold :x :-) Just note the last line: count par1 par2 + random 300 + random 300 Why random 300 is there two times? -pekr- > > Ladislav
[REBOL] apache? Re:
[EMAIL PROTECTED] wrote: > do i need to have apache/rebol to use rebol?as i am unable to get core > working to display simple cgi.i have set permissions. is there > anything i am looking out for? > > > > etcha you don't need REBOL/Apache to do cgi. /Core is enough for you. Just check you have set unix rights correctly. Look also for some cgi examples at www.rebol.com or www.rebol.org -pekr-
[REBOL] apache?
do i need to have apache/rebol to use rebol? as i am unable to get core working to display simple cgi. i have set permissions. is there anything i am looking out for? etcha
[REBOL] load/next - bug?! Re:(8)
Hi, [...] > BTW, how about a link to the creation-point of a value? > this would help me, i often have this "you need a block here!" > and have to look around where the var is assigned, > especially when using locals (no good look-in). > Exec-Lists had such a debug-text-field :) > > BTW2: What happens if i change the body of a running function yet?! > > Volker > BTW: I cannot imagine any simple way how to accomplish it. BTW2: If you change the body of a running function, the behaviour of it changes (a self modifying code). Ladislav
[REBOL] Question on Secure (repost) Re:(3)
Hi, Volker. Call me idiot, but I didn't understand what you're trying to say here: > do compose/deep[secure[(my-dir) allow]] > > attention to the 'level in secure, this means, the compose is not evaluatet! > you have to hack a bit more :) > > >> source secure > secure: native [ > {Specify security policies (access levels and directories). Return prior settings.} > 'level [word! block!] "Levels are: quit, throw, ask, and allow." > ] > > I suggest with default protection before: > do compose/deep[secure[net ask file ask (my-dir) allow]] How is your solution better than: DirPermission: 'allow secure reduce [downloaddir DirPermission] ? Andrew Martin Who's been called an idiot today! :-( But I don't believe them... :-) ICQ: 26227169 http://members.xoom.com/AndrewMartin/ -><-
[REBOL] load/next - bug?! Re:(7)
> Hi, > > just my two cents... > > > [EMAIL PROTECTED] wrote: > > > > > > > I suggest inline-strings and blocks should be read-only, > > > > > > > > This might be an idea, but then you have more problems when > you > > > > save and then load strings... No, I don't think this would > be a > > > > good solution. > > > > > > > > > [...] > > > What's your reservation with load and save? I have no idea > yet. > > > (and later) a write-protected saved string is changeable after > > > load? or loaded blocks are then write-protected? hm. > thinking.. > > > > If literal strings should be made "write-protected" (a better > > approach wuold be a sort of copy-on-modify for series, this has > > been discussed and was proposed mainly by Ladislav), then every > > string you are loading form your data will be made > write-protected > > (because it is "literal"). > > > [...] > > My suggestion is a little bit different. If you want to have > "Protected Literals" ("Immutable Literals" can > be the term the others may prefer), you can use a simple strategy. > > 1) You can have two different types: > > immutable-block! > mutable-block! > > , where the usual literals such as [] are of Immutable-block! > type. > > This principle doesn't lead to a big deformation of Rebol, it is > already there - see the object! or list! types. They (sort of) > don't have "normal" literals, you often use expressions like: > > make object! [...] or make list! [...] instead > > 2) For every mutable type you create its immutable counterpart > type. > > 3) Values of immutable-block! type contain only immutable values. > > 4) The expressions: > > do blk > > func args body > > work normally for immutable-blocks Blk, Args, Body. If you want to > use them for mutable-blocks, they work like: > > do make immutable-block! blk > func make immutable-block! args make immutable-block! body > > , this doesn't lead to a big complication for the code, because it > is (sort of) present already - Args/Body are deep copied even now > > 5) The [a: []] "paradox" doesn't exist anymore, because [] is > immutable. If you want to have a mutable value, you must write: > > [a: make mutable-block! []] > > , but the last is safe. > > Ladislav > Yes. and [block!] is the name for mutable and [copy]'s are mutable, (except with refinement) and rebol-code lookes like before. but we have a handy warning. BTW, how about a link to the creation-point of a value? this would help me, i often have this "you need a block here!" and have to look around where the var is assigned, especially when using locals (no good look-in). Exec-Lists had such a debug-text-field :) BTW2: What happens if i change the body of a running function yet?! Volker
[REBOL] Question on Secure (repost) Re:(2)
do compose/deep[secure[(my-dir) allow]] attention to the 'level in secure, this means, the compose is not evaluatet! you have to hack a bit more :) >> source secure secure: native [ {Specify security policies (access levels and directories). Return prior settings.} 'level [word! block!] "Levels are: quit, throw, ask, and allow." ] i suggest with default protection before: do compose/deep[secure[net ask file ask (my-dir) allow]] Volker > > But if I try using: > > > downloaddir: %/d/anti%20virus%20downloads/ > > == %/d/anti%20virus%20downloads/ > > > >> secure [downloaddir allow] > > ** Script Error: Invalid argument: downloaddir. > > ** Where: secure [downloaddir allow] > > > it doesn't. Shouldn't either way work? > > 'secure doesn't evaluate the block passed to it. Try using 'compose like > this: > secure compose [(downloaddir) allow] > and see if that works better for you. Or you could do this: > > DirPermission: 'allow > secure reduce [downloaddir DirPermission] > > 'reduce-ing the block first. > > Andrew Martin > Fully condensed... > ICQ: 26227169 > http://members.xoom.com/AndrewMartin/ > -><- > > > >
[REBOL] Timeouts. Re:(2)
> Dear Rebolers, > > seems there's some demand for a timeout, may I > suggest to make it possible to snap in a user > defined function that'll be called when the > timeout occurs? This would make it possible to > end the program controlled, of course you'll > have to pay attention not to start the next > loop there ... > Should help much. normaly there is a stable base and a new feature, and this kills the programm? the timeout-code would be the first thing good tested. and short. [write error, quit] :) with something like an error-message (where it was) as arg? Volker > > regards, > > Ingo > > > Those were the words of [EMAIL PROTECTED]: > > Dear Rebol-list, > > > > Hello, I'm having some problems with my Rebol processes, quite often I > > end up with a endless process, taking about 30% of the CPU. > > > > Shouldn't there be the possibility to set some kind of timeout? > > > > So the Rebol process will die after a period of seconds that the > > timeout is set to ? > > -- _ ._ > ingo@)|_ /| _| _ www./_|_) |o(_|(/_ We ARE all FREE> ingo@| |(_|o(_)| (_| > http://www.2b1.de/Rebol/ ._| ._| > > >