[plt-scheme] make-date

Thank you, that was silly of me. I grepped for `make-date'
-pp

>
>   ;; -- Date Structures
>   (define-struct date (nanosecond second minute hour day month year 
> zone-offset) (make-inspector))
>
> creates a number of primitive functions, including
>  make-date ; a constructor
>  date-nanosecond ; a selector
>  date-second ; another one
>  ...
>  date? ; a predicate
>
> -- Matthias
>
>