Пытаюсь вызвать в ББ из dll функцию, у которой параметр указатель на функцию, т.е. исходно в dll есть

> -- Цитата:
> typedef double (* ptr2func) (double);double Funcres(ptr2func f, double a) {	return f(a);	}

В ББ интерфейс описан как
## Код:
```
ptr2func* = PROCEDURE ( x: REAL ): REAL;
PROCEDURE  Funcres* ["Funcres"] ( f: ptr2func; a: REAL ): REAL;
```


При попытке вызвать Funcres, например,
## Код:
```
...
PROCEDURE f(x: REAL): REAL;
      VAR  
   BEGIN
      RETURN  x*x*x*x;
   END f;
...
z:= TestInterface.Funcres(f, 2.0);
```

выскакивает трап NIL procedure call.
Попытки использовать SYSTEM.ADR, SYSTEM.VAL пока также ни к чему не привели.
Кто-нибудь может что-то посоветовать?