File: date.e

package info (click to toggle)
eglade 0.3.6-1
  • links: PTS
  • area: main
  • in suites: woody
  • size: 572 kB
  • ctags: 849
  • sloc: yacc: 429; makefile: 183; sh: 24; ansic: 9
file content (29 lines) | stat: -rw-r--r-- 486 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 
-- Copyright (C) 1999 Daniel Elphick and others
-- Licensed under Eiffel Forum Freeware License, version 1;
-- (see forum.txt)
--
indexing

	description: "DATE minimal support for showing today's date"
	author: "Oliver Elphick"
	date: "29th October 1999"
	cvs: "$Id: date.e,v 1.2 2000/07/10 11:31:10 elphick Exp $"

class DATE

feature

	now: STRING is
		do
			!!Result.make(0)
			Result.from_external(datetime)
		end

feature {NONE}

	datetime: POINTER is
		external
			"C"
		end

end