alx/ueforth
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fixing TIMG constant.

Browse Source 
Thanks for catching mpetremann!
This commit is contained in:
Brad Nelson
2023-04-08 07:22:13 -07:00
parent fb3db70da6
commit c7dcbbef36
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
esp32/timers.fs
View File

@ -25,7 +25,7 @@ transfer timers-builtins
$3ff5f000 constant TIMG_BASE $3ff5f000 constant TIMG_BASE
( group n = 0/1, timer x = 0/1, watchdog m = 0-5 ) ( group n = 0/1, timer x = 0/1, watchdog m = 0-5 )
: TIMGn ( n -- a ) $10000 * TIMG_BASE + ; : TIMGn ( n -- a ) $1000 * TIMG_BASE + ;
: TIMGn_Tx ( n x -- a ) $24 * swap TIMGn + ; : TIMGn_Tx ( n x -- a ) $24 * swap TIMGn + ;
: TIMGn_TxCONFIG_REG ( n x -- a ) TIMGn_Tx 0 cells + ; : TIMGn_TxCONFIG_REG ( n x -- a ) TIMGn_Tx 0 cells + ;
: TIMGn_TxLOHI_REG ( n x -- a ) TIMGn_Tx 1 cells + ; : TIMGn_TxLOHI_REG ( n x -- a ) TIMGn_Tx 1 cells + ;