From ceb3507a8fca872770b3dcd7e5c5b36179ab95b0 Mon Sep 17 00:00:00 2001 From: Manoj Srivastava Date: Fri, 30 May 2008 12:42:47 -0700 Subject: Import dist_3.5-236.orig.tar.gz [dgit import orig dist_3.5-236.orig.tar.gz] --- mcon/U/d_time.U | 66 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 66 insertions(+) create mode 100644 mcon/U/d_time.U (limited to 'mcon/U/d_time.U') diff --git a/mcon/U/d_time.U b/mcon/U/d_time.U new file mode 100644 index 0000000..b783560 --- /dev/null +++ b/mcon/U/d_time.U @@ -0,0 +1,66 @@ +?RCS: $Id$ +?RCS: +?RCS: Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi +?RCS: +?RCS: You may redistribute only under the terms of the Artistic License, +?RCS: as specified in the README file that comes with the distribution. +?RCS: You may reuse parts of this distribution only within the terms of +?RCS: that same Artistic License; a copy of which may be found at the root +?RCS: of the source tree for dist 4.0. +?RCS: +?RCS: $Log: d_time.U,v $ +?RCS: Revision 3.0.1.2 1995/07/25 14:07:43 ram +?RCS: patch56: typo fix, sytem -> system +?RCS: +?RCS: Revision 3.0.1.1 1994/10/29 16:16:38 ram +?RCS: patch36: now uses new Typedef unit to compute type information (ADO) +?RCS: +?RCS: Revision 3.0 1993/08/18 12:07:45 ram +?RCS: Baseline for dist 3.0 netwide release. +?RCS: +?X: Maybe should be included? +?X:INC: i_systypes +?MAKE:d_time timetype: Csym Setvar Findhdr Myread Typedef +?MAKE: -pick add $@ %< +?S:d_time: +?S: This variable conditionally defines the HAS_TIME symbol, which indicates +?S: that the time() routine exists. The time() routine is normally +?S: provided on UNIX systems. +?S:. +?S:timetype: +?S: This variable holds the type returned by time(). It can be long, +?S: or time_t on BSD sites (in which case should be +?S: included). Anyway, the type Time_t should be used. +?S:. +?C:HAS_TIME (TIMER): +?C: This symbol, if defined, indicates that the time() routine exists. +?C:. +?C:Time_t (TIMETYPE): +?C: This symbol holds the type returned by time(). It can be long, +?C: or time_t on BSD sites (in which case should be +?C: included). +?C:. +?H:#$d_time HAS_TIME /**/ +?H:#define Time_t $timetype /* Time type */ +?H:. +?LINT:set d_time +: see if time exists +echo " " +if set time val -f d_time; eval $csym; $val; then + echo 'time() found.' >&4 + val="$define" + set time_t timetype long stdio.h sys/types.h + eval $typedef + dflt="$timetype" + echo " " + rp="What type is returned by time() on this system?" + . ./myread + timetype="$ans" +else + echo 'time() not found, hope that will do.' >&4 + val="$undef" + timetype='int'; +fi +set d_time +eval $setvar + -- cgit v1.2.3