 
 [ 1 ] [
     V{
-        T{ ##load-immediate f 0 32 }
+        T{ ##load-tagged f 0 32 }
         T{ ##add-imm f 0 0 -16 }
     } compile-test-bb
 ] unit-test

    execute( -- result ) ;

! loading constants
[ f ] [
    V{
        T{ ##load-constant f 0 f }
    } compile-test-bb
] unit-test

[ "hello" ] [
    V{
        T{ ##load-reference f 0 "hello" }

[ CHAR: l ] [
    V{
        T{ ##load-reference f 0 "hello world" }
        T{ ##load-tagged f 1 3 }
        T{ ##string-nth f 0 0 1 2 }
        T{ ##shl-imm f 0 0 4 }
    } compile-test-bb
