Virtual register assignment.

Getting and setting representations:
rep-of ( vreg -- rep )

set-rep-of ( rep vreg -- )