[EMAIL PROTECTED] :
> 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. 
-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to