Source position: typinfo.pp line 123
Type TRegisterType = (Invalid,Int,FP,MMX,MultiMedia,Special,Address)