From f96659076729fa10491bc4f510749d4c845539b0 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sun, 11 Sep 2016 22:50:13 -0700 Subject: awk macro: don't use cat-str to update rec. * share/txr/stdlib/awk.tl (sys:awk-state f-to-rec): Use quasiliteral to combine fields to reconstitute rec; cat-str works only with characters and strings. --- share/txr/stdlib/awk.tl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'share') diff --git a/share/txr/stdlib/awk.tl b/share/txr/stdlib/awk.tl index 62311fe2..dabff1fc 100644 --- a/share/txr/stdlib/awk.tl +++ b/share/txr/stdlib/awk.tl @@ -67,7 +67,7 @@ self.nf (length self.fields)))))))) (defmeth sys:awk-state f-to-rec (self) - (set self.rec (cat-str self.fields self.ofs))) + (set self.rec `@{self.fields self.ofs}`)) (defmeth sys:awk-state nf-to-f (self) (set self.fields (take self.nf (append self.fields (repeat '(""))))) -- cgit v1.2.3