Nim/tests/tlastmod.nim
2008-06-23 01:37:49 +02:00

16 lines
316 B
Nim

# test the new LastModificationTime() proc
import
io, os, times
proc main() =
var
a, b: TTime
a = getLastModificationTime(ParamStr(1))
b = getLastModificationTime(ParamStr(2))
if a < b:
Write(stdout, "b is newer than a\n")
else:
Write(stdout, "a is newer than b\n")
main()