[m-rev.] trivial diff: timestamp.m: add missing #includes
Fergus Henderson
fjh at cs.mu.OZ.AU
Mon Jul 2 11:59:18 AEST 2001
Estimated hours taken: 0.25
Branches: main
compiler/timestamp.m:
Add some missing #include directives.
This fixes a bug where this file would not compile with `--target asm'.
Workspace: /mnt/mars/home/mars/fjh/ws1/mercury
Index: compiler/timestamp.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/timestamp.m,v
retrieving revision 1.1
diff -u -d -r1.1 timestamp.m
--- compiler/timestamp.m 2001/06/27 05:04:30 1.1
+++ compiler/timestamp.m 2001/07/02 01:55:30
@@ -61,6 +61,10 @@
:- func gmtime_to_timestamp(int, int, int, int,
int, int, int, int, int) = timestamp.
+:- pragma foreign_decl("C", "
+ #include ""mercury_string.h""
+ #include <time.h>
+").
:- pragma foreign_proc("C",
gmtime_to_timestamp(Yr::in, Mnt::in, MD::in, Hrs::in, Min::in, Sec::in,
YD::in, WD::in, N::in) = (Result::out),
--
Fergus Henderson <fjh at cs.mu.oz.au> | "I have always known that the pursuit
The University of Melbourne | of excellence is a lethal habit"
WWW: <http://www.cs.mu.oz.au/~fjh> | -- the last words of T. S. Garp.
--------------------------------------------------------------------------
mercury-reviews mailing list
post: mercury-reviews at cs.mu.oz.au
administrative address: owner-mercury-reviews at cs.mu.oz.au
unsubscribe: Address: mercury-reviews-request at cs.mu.oz.au Message: unsubscribe
subscribe: Address: mercury-reviews-request at cs.mu.oz.au Message: subscribe
--------------------------------------------------------------------------
More information about the reviews
mailing list