Mercurial > hg > Members > kono > nitros9-code

view 3rdparty/packages/cc/sources/time.a @ 2229:918c7c68ea4d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Made formats quiet
author boisy
date Sun, 22 Mar 2009 12:21:59 +0000
parents 0198655f2552
children
line wrap: on
line source

*
* Time system calls
*


 use ..../defs/os9defs.a
 psect time_a,0,0,1,0,0

* setime(buffer)
setime: ldx 2,s
 os9 F$STIME call os9
 lbra _sysret usual return

* getime(buffer)
getime: ldx 2,s
 os9 F$TIME call os9
 lbra _sysret
 endsect