From 57f4e4ed68140a9f20cb59c45c79214cfa552970 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sat, 23 Apr 2022 16:31:41 -0700
Subject: set_fields: document/test the start index param.

---
 testcases-cons | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

(limited to 'testcases-cons')

diff --git a/testcases-cons b/testcases-cons
index e5342c0..ebf9241 100644
--- a/testcases-cons
+++ b/testcases-cons
@@ -937,3 +937,30 @@ nil
 ("brown" "fox")
 ("fox")
 nil
+--
+47:
+$cppawk '
+#include <cons.h>
+
+BEGIN {
+  $0 = "the quick brown fox"
+  print sexp(fields())
+
+  set_fields(list(1, cons(1, 2), "foo", box_str("foo")), 3)
+
+  for (i = 1; i <= NF; i++)
+    print $i
+
+  set_fields(list("fast", "fox"), 2)
+  print sexp(fields())
+}'
+:
+("the" "quick" "brown" "fox")
+the
+quick
+1
+C1,1:12
+foo
+Tfoo
+("the" "fast" "fox")
+--
-- 
cgit v1.2.3