Unqualified type in session results in generator error

[senier]

package Test is

   type T is mod 2 ** 8;

   generic
      with function Fn return T;
   session Session with
      Initial => I,
      Final => F
   is
      Result : T;
   begin
      state I is
      begin
         Result := Fn;
      transition
         goto F
      end I;
      state F is null state;
   end Session;
end Test;

 rflx generate -d generate/ test.rflx 
Parsing test.rflx
Processing Test
id: error: empty identifier

This should also result in a bug box containing a proper backtrace.

[senier]

The function return type is the culprit. Prefixing it with Test:: mitigates the issue.