view samples/recursive_closure.tp @ 65:b4190db72288

Add sample for bug triggered by accessing a lambda-defined message in variable style
author Mike Pavone <pavone@retrodev.com>
date Sat, 14 Jul 2012 04:56:05 -0700
parents 93ddb4ad6fcb
children 3a169ebb3224
line wrap: on
line source

#{
	true <- #{
	  if:else <- :self trueblock :elseblock {
		trueblock:
	  }
	}

	false <- #{
	  if:else <- :self trueblock :elseblock {
		elseblock:
	  }
	}
	main <- {
		foo <- :n {
			if: n < 10 {
				true
			} else: {
				foo <- :n { n }
			}
			foo: n + 1
		}
		print: (string: (foo: 0))
	}
}