Macro resolving a type argument

MacroResolvingTypeArgument.boo

import Boo.Lang.Compiler
import Boo.Lang.Compiler.Ast
import Boo.Lang.Compiler.MetaProgramming // compile_
import Boo.Lang.Compiler.TypeSystem
import Boo.Lang.Compiler.TypeSystem.Services
import Boo.Lang.Environments

struct Vector3:
	x as single
	y as single
	z as single

	
macro swizzle(typeExpression as Expression):
	
	def ResolveType():
		typeRef = TypeReference.Lift(typeExpression)
		my(NameResolutionService).ResolveTypeReference(typeRef)
		return typeRef.Entity cast IType
	
	type = ResolveType()
	for member in type.GetMembers():
		print member
	
code = [|
	namespace Test
	
	swizzle Vector3:
		pass
|]

result = compile_(code, typeof(Vector3).Assembly)
print result.Errors