Wrong error format for resource overflows

[UWN]

?- catch((length(L,N),L=N),error(E,Imp_def),true).
   throw(resource_error(memory)), unexpected.
   E = resource_error(memory), ... . % expected, but not found