Sage-ST

Sage-ST ä
Binlib
Documentation

Global Declarations (Constants, Types, Variables)

BinaryDelete	BinaryDeleteA	BinaryInsert
BinaryInsertA	BinaryLocate	BinaryLocateHandle	BinaryLocateLong
BinarySearch	BinarySearchA



  TYPE
    BcompareProc = PROCEDURE (CONST CARDINAL) : INTEGER;

    BcompareLongProc = PROCEDURE (CONST ModSys.INT32) : INTEGER;

    BcompareHProc = PROCEDURE (CONST SYSTEM.ADDRESS,
                               CONST CARDINAL) : INTEGER;


  PROCEDURE BinaryLocate
             (CONST NumberOfKeys : CARDINAL;
              CONST CompareP     : BcompareProc) : INTEGER;


  PROCEDURE BinaryLocateLong
             (CONST NumberOfKeys : ModSys.INT32;
              CONST Compare      : BcompareLongProc) : ModSys.INT32;


  PROCEDURE BinaryLocateHandle
             (CONST handle       : SYSTEM.ADDRESS;
              CONST NumberOfKeys : CARDINAL;
              CONST Compare      : BcompareHProc) : INTEGER;


  PROCEDURE BinarySearch
             (VAR   Keys         : ARRAY OF CHAR;
              VAR   KeyToFind    : ARRAY OF CHAR;
              CONST NumKeys      : CARDINAL;
              CONST KeyStart     : CARDINAL;
              CONST KeyLength    : CARDINAL;
              CONST RecordLength : CARDINAL) : INTEGER;


  PROCEDURE BinaryInsert
             (VAR   Keys         : ARRAY OF CHAR;
              VAR   KeyToAdd     : ARRAY OF CHAR;
              VAR   NumKeys      : CARDINAL;
              CONST Location     : CARDINAL;
              CONST RecordLength : CARDINAL);


  PROCEDURE BinaryDelete
             (VAR   Keys         : ARRAY OF CHAR;
              VAR   NumKeys      : CARDINAL;
              CONST Location     : CARDINAL;
              CONST RecordLength : CARDINAL);


  PROCEDURE BinarySearchA
             (CONST Keys         : SYSTEM.ADDRESS;
              CONST KeyToFind    : SYSTEM.ADDRESS;
              CONST NumKeys      : CARDINAL;
              CONST KeyStart     : CARDINAL;
              CONST KeyLength    : CARDINAL;
              CONST RecordLength : CARDINAL) : INTEGER;


  PROCEDURE BinaryInsertA
             (CONST Keys         : SYSTEM.ADDRESS;
              CONST KeyToAdd     : SYSTEM.ADDRESS;
              VAR   NumKeys      : CARDINAL;
              CONST Location     : CARDINAL;
              CONST RecordLength : CARDINAL);


  PROCEDURE BinaryDeleteA
             (CONST Keys         : SYSTEM.ADDRESS;
              VAR   NumKeys      : CARDINAL;
              CONST Location     : CARDINAL;
              CONST RecordLength : CARDINAL);