1 files changed, 24 insertions, 0 deletions
diff --git a/testcases-cons b/testcases-cons
index 6b7751d..9962970 100644
--- a/testcases-cons
+++ b/testcases-cons
@@ -649,3 +649,27 @@ nil
 3
 (1)
 nil
+--
+35:
+$cppawk '
+#include <cons.h>
+
+BEGIN {
+  print sexp(iota(1, 1))
+  print sexp(iota(1, 3))
+  print sexp(iota(1, -1))
+  print sexp(iota(1, 3, 0.25))
+  print sexp(iota(3, 1, -0.25))
+  print sexp(iota(1, 3, -1))
+  print sexp(iota(2.5, 2.5, 0))
+  print sexp(iota(2.5, 2.5, -1))
+}'
+:
+(1)
+(1 2 3)
+(1 0 -1)
+(1 1.25 1.5 1.75 2 2.25 2.5 2.75 3)
+(3 2.75 2.5 2.25 2 1.75 1.5 1.25 1)
+nil
+(2.5)
+(2.5)