[ARPE]

Hola a tod@s, de repente me encuentro que ninguna udf me funciona al probar FB 2.5.
¿qué tengo mal aquí?

Código Delphi [-]
library UDF25;

uses
  ShareMem,
  uFunciones in 'uFunciones.pas';

{$R *.RES}

exports
  asPrueba;

begin
end.

unit uFunciones;

interface

  function asPrueba(Var N: double): Double; stdcall; export;

implementation

function asPrueba(Var N: Double): double; stdcall; export;
Begin
  Result := N;
end;

end.

Código SQL [-]
    Declare External Function asPrueba
    Double Precision
    Returns DOUBLE PRECISION BY value
    ENTRY_POINT 'asPrueba' MODULE_NAME 'UDF25';

Select asPrueba(5.2)
from tabla;

La librería bien compilada en la carpeta UDF de firebird. Si creo una función sin parámetros de entrada va bien, pero en el momento que le pongo un parámetro de entrada (y he probado de todo tipo y varias maneras) no le gusta a firebird.

gracias de antemano