function bdflush(__func:longint; __data:longint):longint;cdecl;external clib name 'bdflush';

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

// Type