function alloca(__size:size_t):pointer;cdecl;external clib name '__builtin_alloca';

{ ---------------------------------------------------------------------
    Borland compatibility types
  ---------------------------------------------------------------------}

// Type