macro traceable_property:
	case [| traceable_property $name as $type |]:

		backingField = [|
			private $("_$name") as $type
		|]
		yield backingField

		yield [|
			public $name:
				get:
					print "$self." + $(name.ToString())
					return $backingField
				set: $backingField = value
		|]