- (djm) [regress/krl.sh] replacement for jot; most platforms lack it

2 files changed, 5 insertions, 0 deletions

diff --git a/ChangeLog b/ChangeLog
index 7bc6b451c..0e55ed4c3 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -26,6 +26,7 @@
      RB_INSERT does not remove existing elments; ok djm@
  - (djm) [openbsd-compat/sys-tree.h] Sync with OpenBSD. krl.c needs newer
    version.
+ - (djm) [regress/krl.sh] replacement for jot; most platforms lack it
 
 20130118
  - (djm) OpenBSD CVS Sync
diff --git a/regress/krl.sh b/regress/krl.sh
index 3ee5a9060..46a2ad3f9 100644
--- a/regress/krl.sh
+++ b/regress/krl.sh
@@ -33,6 +33,10 @@ serial: 799
 serial: 599-701
 EOF
 
+jot() {
+        awk "BEGIN { for (i = $2; i < $2 + $1; i++) { printf \"%d\n\", i } }"
+}
+
 # A specification that revokes some certificated by key ID.
 touch $OBJ/revoked-keyid
 for n in 1 2 3 4 10 15 30 50 `jot 500 300` 999 1000 1001 1002; do