From 37da2899f40661e3e9631e497da8dc59b971cbd0 Mon Sep 17 00:00:00 2001
From: "Charles.Forsyth" <devnull@localhost>
Date: Fri, 22 Dec 2006 17:07:39 +0000
Subject: 20060303a

---
 appl/svc/httpd/date.m | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 appl/svc/httpd/date.m

(limited to 'appl/svc/httpd/date.m')

diff --git a/appl/svc/httpd/date.m b/appl/svc/httpd/date.m
new file mode 100644
index 00000000..eafd6b49
--- /dev/null
+++ b/appl/svc/httpd/date.m
@@ -0,0 +1,11 @@
+
+Date: module{
+	PATH : con "/dis/svc/httpd/date.dis";
+
+	init: fn();
+	dateconv: fn(secs :int): string; # returns an http formatted
+					 # date representing secs.
+	date2sec: fn(foo:string): int;   # parses a date and returns
+					 # number of secs since the 
+					 # epoch that it represents. 
+};
-- 
cgit v1.2.3