aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2024-11-11 10:11:44 -08:00
parent 157b70a810
commit 8e4e15fa56
78 changed files with 2016 additions and 222 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Task/Simple-windowed-application/Forth/simple-windowed-application-4.fth
View file

@ -13,7 +13,7 @@ TextView' t
\ the running count is always on the stack
\ so a variable for that is not needed
:noname
:noname ( count -- count+1 )
1+ \ increment the count
" Number of clicks: " put: t
dup deciNumstr insert: t ; setAction: b \ update the text representation of count