6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-01-10 19:29:45 +00:00
Code Issues Projects Releases Wiki Activity

Added clock_getres() for CBMs.

Browse Source 
All CBMs have a clock (CIA TOD) resolution of 1/10 second.
This commit is contained in:
Oliver Schmidt 2018-08-15 19:40:27 +02:00
parent 842c151edd
commit 59a8149556
1 changed files with 37 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
libsrc/cbm/getres.s Normal file
View File

@ -0,0 +1,37 @@
;
; Oliver Schmidt, 15.8.2018
;
; int clock_getres (clockid_t clk_id, struct timespec *res);
;
.include "time.inc"
.importzp ptr1
.import incsp1, return0
;----------------------------------------------------------------------------
.code
.proc _clock_getres
sta ptr1
stx ptr1+1
ldy #.sizeof(timespec)-1
@L1: lda time,y
sta (ptr1),y
dey
bpl @L1
jsr incsp1
jmp return0
.endproc
;----------------------------------------------------------------------------
; timespec struct with tv_nsec set to 1/10 second
.rodata
time: .dword 0
.dword 100 * 1000 * 1000