spec-block-to-named-block: func [ "Change all set-words in a spec block to regular words." input [block!] ][ input: copy input parse input [ some [mark: set-word! any-type! (change mark to word! first mark)] ] input ]
You need to create an account or log in to post comments to this site.