*ot-base*Offset Universal Timeot2utcheck-ot-baseGoTo Top

check-ot-base   &optional suppress-warning => boolean[Function]

Purpose
Check if the current time can be represented as a fixnum given the current Offset Universal Time time-base value.

Package   :gbbopen-tools

Module   :gbbopen-tools

Arguments and values

suppress-warning     A generalized boolean (default is nil)
boolean     A generalized boolean

Returns
True if the current time can be represented as a fixnum Offset Universal Time value; nil otherwise.

Errors
The Offset Universal Time time-base value has not been set.

See also
    *ot-base*
    ot2ut
    set-ot-base
    ut2ot

Examples
Set the time base for Offset Universal Time to today and check:

  > (set-ot-base)
  3410655616
  > (check-ot-base)
  t
  >
Set the time base for Offset Universal Time to January 1, 1900 and check:
  > (set-ot-base 1 1 1900)
  16777216
  > (check-ot-base)
  ;; Warning: The current time represented as an Offset~Universal~Time is not a fixnum.
  nil
  > (check-ot-base 't)
  nil
  >


The GBBopen Project


*ot-base*Offset Universal Timeot2utcheck-ot-baseGoTo Top