procedure a2clnk(VAR clunks:clunk_type; VAR add_or_sub:integer; VAR days:integer; VAR hours:integer; VAR minutes:integer; VAR seconds:integer; VAR ids: integer); NONPASCAL; { LAST EDIT: 2-JUN-1987 20:57:45 This is the external declaration for the Pascal callable routine to add or subtract a specific amount of time from a given clunk time. This external declaration expects that the file 'CLUNK.TYP' has been included at some point before this. How it works: You need to supply the procedure a standard clunk time as a 64 bit integer. The modified clunk time is returned in the same parameter. To add, the value in the "add_or_sub" field needs to be positive. To subtract, the value in this field needs to be negitive. The fields "days", "hours", "minutes" and "seconds" are the amount of time you wish to add to or subtract from the clunk value. Please realise that no range checking is done and unsigned integers are expected. (i.e. If you add a -1 days you are really adding 65,535 days or 189 years.) The values of the these fields are all preserved. Two valid "ids" statuses are possible: 1 = success -3 = overflow or underflow of clunk time. }