Archive version of: c-aware.r ... version: 1 ... ladislav 3-Nov-2010

Amendment note: new script || Publicly available? Yes

REBOL [
	Author: "Ladislav Mecir"
	Title: "C-aware"
	File: %c-aware.r
	Date: 3-Nov-2010/17:55:48+1:00
	Purpose: {
		This is an idea, how to "instantly" make R2 cycle bodies CONTINUE-aware.
	}
]

c-aware: func [
	{make a block CONTINUE-aware}
	body [block!]
] [
	compose/only [catch/name (block) 'continue]
]

continue: func [[throw]] [throw/name none 'continue]

comment [
	; usage:
	for n 1 5 1 c-aware [
		if n < 3 [continue]
		print n
	]
]