Script Library: 1238 scripts
 

itemize.r

REBOL [ Title: "Itemize" Date: 16-Oct-2002 Name: 'Itemize Version: 1.1.0 File: %itemize.r Author: "Andrew Martin" Purpose: {Appends Value to Values, if Value not all ready in block.} eMail: %Al--Bri--xtra--co--nz Web: http://valley.150m.com library: [ level: 'beginner platform: none type: 'tool domain: none tested-under: none support: none license: none see-also: none ] ] Itemize: func [ "Appends Value to Values, if Value not all ready in block." Values [series!] Value ] [ if not found? find/only Values Value [ insert/only tail Values Value ] Values ]
halt ;; to terminate script if DO'ne from webpage
Notes
  • email address(es) have been munged to protect them from spam harvesters. If you are a Library member, you can log on and view this script without the munging.
  • (Al:Bri:xtra:co:nz)