diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2017-11-01 06:23:42 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2017-11-01 06:23:42 -0700 |
commit | 4830d994659340c795685e8f1df647468420150c (patch) | |
tree | c4ef8962f83151c0352e23f3c3780ae484b86481 /share | |
parent | a5ef87836c9dba23c187e361a70dddef87c03746 (diff) | |
download | txr-4830d994659340c795685e8f1df647468420150c.tar.gz txr-4830d994659340c795685e8f1df647468420150c.tar.bz2 txr-4830d994659340c795685e8f1df647468420150c.zip |
awk: replace set-diff uses with diff.
* share/txr/stdlib/awk.tl (sys:awk-mac-let): A few occurrences
of the deprecated set-diff function are replaced with diff.
Diffstat (limited to 'share')
-rw-r--r-- | share/txr/stdlib/awk.tl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/share/txr/stdlib/awk.tl b/share/txr/stdlib/awk.tl index 2d8c4bc6..5e658fd2 100644 --- a/share/txr/stdlib/awk.tl +++ b/share/txr/stdlib/awk.tl @@ -399,19 +399,19 @@ (list (cadr form) (caddr form))) (sys:awk-code-move-check ,awc ',aws-sym form from-expr-orig - (set-diff fe-ev fe-fv) + (diff fe-ev fe-fv) 'variables) (sys:awk-code-move-check ,awc ',aws-sym form from-expr-orig - (set-diff fe-ef fe-ff) + (diff fe-ef fe-ff) 'functions) (sys:awk-code-move-check ,awc ',aws-sym form to-expr-orig - (set-diff te-ev te-fv) + (diff te-ev te-fv) 'variables) (sys:awk-code-move-check ,awc ',aws-sym form to-expr-orig - (set-diff te-ef te-ff) + (diff te-ef te-ff) 'functions) (push rng-temp (qref ,awc rng-expr-temps)) (caseq style |