Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[REBOL] Re: Rebol programs

From: sunandadh::aol::com at: 19-Mar-2002 10:59

[riusa--email--it] :
> does anybody know someone who created (single persons or companies) > heavy programs in Rebol? For heavy programs I intend big programs, not > small utilities/games like mines, some email readers, etc...
How big is big? I'm a single person and I've developed two stand-alone applications for non-profit organizations. One is 6,000 lines. The other is 4,000, but likely to double in size if I ever get round to implementing the second half. I count lines of code as being any non-blank, non-comment line that contains something other than a square bracket, so, by my count, the code below is six lines: ;; ============================== Normalise-url: func [url-in] ;; ============================== ;; ------------------------------- ;; Ensures URL starts with default ;; protocol and server name ;; ------------------------------- ;; Dev notes: need to extend to add ;; default server if absolute URL ;; format -- will need server as ;; input parameter. [ if (copy/part url-in 7) = "http://" [return url-in] if (copy/part url-in 4) = "www." [return join "http://" url-in] return join "http://www." url-in ] ;; end func My total income from Rebol-related activities to date is about USD100. So it's not a big money-spinner for me. Sunanda.