From 025ac4afc05331802ac9e81929eec740edabeb39 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sat, 16 Apr 2022 10:38:01 -0700
Subject: cons: fields and set_fields: document, test.

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

(limited to 'testcases-cons')

diff --git a/testcases-cons b/testcases-cons
index 10d827b..ec7e6cb 100644
--- a/testcases-cons
+++ b/testcases-cons
@@ -754,3 +754,23 @@ BEGIN {
 :
 ("a" "b" "c")
 (1 2 3)
+--
+40:
+$cppawk '
+#include <cons.h>
+
+BEGIN {
+  $0 = "the quick brown fox"
+  print sexp(fields())
+
+  set_fields(list(1, cons(1, 2), "foo", box_str("foo")))
+
+  for (i = 1; i <= NF; i++)
+    print $i
+}'
+:
+("the" "quick" "brown" "fox")
+1
+C1,1:12
+foo
+Tfoo
-- 
cgit v1.2.3