{$I-,S-}
{$IFNDEF OS2}
{$R-,V-,B-,F+,O+,A-}
{$ENDIF}

{Conditional defines that may affect this unit}
{$I APDEFINE.INC}

{*********************************************************}
{*                   APMISC.PAS 2.03                     *}
{*        Copyright (c) TurboPower Software 1991.        *}
{*                 All rights reserved.                  *}
{*********************************************************}

Unit ApMisc;
  {-Error codes, checksuming, date and other miscellaneous routines}

Interface

Uses
  DOS,
  tMisc,
  ApSame,
  Crc32;

{$I APMISC.PA0}

Implementation

Const
  DosDelimSet : Set Of Char = ['\', ':', #0];
  Digits : Array [0..$F] Of Char = '0123456789ABCDEF';

Begin
  Crc32TableOfs := Ofs (Crc32Table);
End.
