2 ; Ullrich von Bassewitz, 12.11.2002
4 ; time_t __fastcall__ time (time_t* timep);
10 .importzp ptr1, sreg, tmp1, tmp2
23 ; Get the time (machine dependent)
32 .assert timespec::tv_sec = 0, error
34 sta tmp1 ; Save low byte of result
36 ; Restore timep and check if it is NULL
41 sta ptr1 ; Restore timep
42 ora ptr1+1 ; timep == 0?
45 ; timep is not NULL, store the result there
60 ; If the result is != 0, return -1
70 ; Reload the low byte of the result and return
77 ; ------------------------------------------------------------------------