cc65/libsrc/cbm/clock.s

;
; Ullrich von Bassewitz, 21.09.1998
;
; clock_t clock (void);
;

      	.export	       	_clock
        .import         RDTIM
	.importzp	sreg


.proc	_clock

	lda	#0  	    	; Byte 3 is always zero
       	sta    	sreg+1
	jsr	RDTIM
	sty	sreg
       	rts

.endproc
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-05-28 13:40:48 +00:00			`;`
			`; Ullrich von Bassewitz, 21.09.1998`
			`;`
			`; clock_t clock (void);`
			`;`

			`.export _clock`
Use external symbols for the CBM kernal jump table functions. This allows to emulate these functions on platforms where one or more of these functions are not available (PET, CBM-II). git-svn-id: svn://svn.cc65.org/cc65/trunk@1544 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-11-19 23:02:47 +00:00			`.import RDTIM`
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-05-28 13:40:48 +00:00			`.importzp sreg`



			`.proc _clock`

			`lda #0 ; Byte 3 is always zero`
Remove global namespace operator git-svn-id: svn://svn.cc65.org/cc65/trunk@562 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-12-06 20:08:19 +00:00			`sta sreg+1`
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-05-28 13:40:48 +00:00			`jsr RDTIM`
Remove global namespace operator git-svn-id: svn://svn.cc65.org/cc65/trunk@562 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-12-06 20:08:19 +00:00			`sty sreg`
Use external symbols for the CBM kernal jump table functions. This allows to emulate these functions on platforms where one or more of these functions are not available (PET, CBM-II). git-svn-id: svn://svn.cc65.org/cc65/trunk@1544 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-11-19 23:02:47 +00:00			`rts`
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-05-28 13:40:48 +00:00
			`.endproc`