Source position: lberh.inc line 112
type BER_MEMCALLOC_FN = function(
n: ber_len_t;
size: ber_len_t
):Pointer;