]> git.sur5r.net Git - cc65/blob - libsrc/c16/isfast.s
Merge pull request #620 from blackystardust/master
[cc65] / libsrc / c16 / isfast.s
1 ;
2 ; Marco van den Heuvel, 2018-03-20
3 ;
4 ; unsigned char isfast (void);
5 ; /* Returns 1 if the CPU is in double clock mode. */
6 ;
7
8         .export         _isfast
9
10         .include        "plus4.inc"
11
12
13 .proc   _isfast
14
15         lda     TED_CLK
16         lsr
17         and     #$01
18         ldx     #$00
19         rts
20
21 .endproc
22