xo::ical proc dates_valid_p (public)

 xo::ical dates_valid_p -start_date start_date  -end_date end_date 

Defined in packages/xotcl-core/tcl/01-debug-procs.tcl

A sanity check that the start time is before the end time. This is a rewrite of calendar::item::dates_valid_p, but about 100 times faster.

Switches:

-start_date (required)

-end_date (required)

Testcases:

No testcase defined.

Source code:

# A sanity check that the start time is before the end time.
# This is a rewrite of calendar::item::dates_valid_p, but
# about 100 times faster.
#

#my log "$start_date <= $end_date = [expr {[clock scan $start_date] <= [clock scan $end_date]}]"
expr {[clock scan $start_date] <= [clock scan $end_date]}

XQL Not present:

Generic, PostgreSQL, Oracle