[perl #112344] [BUG] Variable return types cause an error

[via RT]

# New Ticket Created by  spider-mario 
# Please include the string:  [perl #112344]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=112344 >


With Rakudo 2012.03-53-g119fe3b (commit 
119fe3b5b85fe680aa1a7ea29042a5714e63a402), the following code fails:

    sub id(Any ::T $x) returns T {
        $x
    }

    say id 42;

with the following error message:

    Type check failed for return value
      in sub id at testcase.pl:1
      in block <anon> at testcase.pl:5

::T correctly contains Int, though.

testcase.pl
Description: Perl program