aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/common/lib/hardware/timer-test.frt
diff options
context:
space:
mode:
Diffstat (limited to 'amforth-6.5/common/lib/hardware/timer-test.frt')
-rw-r--r--amforth-6.5/common/lib/hardware/timer-test.frt22
1 files changed, 0 insertions, 22 deletions
diff --git a/amforth-6.5/common/lib/hardware/timer-test.frt b/amforth-6.5/common/lib/hardware/timer-test.frt
deleted file mode 100644
index 7092892..0000000
--- a/amforth-6.5/common/lib/hardware/timer-test.frt
+++ /dev/null
@@ -1,22 +0,0 @@
-\ test routines for timer
-
-\ prints the tick value every second (or so)
-\ until a key is pressed. Usage:
-\ ' test-every-second every-second
-: test-every-second
- @tick u. key?
-;
-
-\ runs a single word n-times. prints the milliseconds
-\ for the whole run
-\ usage
-\ ' foo 10 benchme
-\ executes too 10 times and prints the elapsed time
-
-: benchme ( xt n -- )
- dup >r
- @tick >r
- 0 ?do dup execute loop drop
- @tick r> -
- cr r> u. ." iterations in " u. ." ms" cr
-;