[firebird-support] Why this procedure crashes server

[jonatan.laurit...@yahoo.dk [firebird-support]]

I am trying to create or modify the following procedure:

create or alter procedure test_procedure(id integer, p_from_date date)
as

  declare variable from_date date;
  declare variable to_date date;

begin
end   

But this SQL restarts server or the connection remains hanging (from IBExpert 
or from Flamerobin). This problem is in Firebird 3.0.0 and 3.0.1 (64 bit). 
There are no relevant messages in firebird.log (e.g. no gds exceptions). 

J.