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 | 9e258b5d4a27fa0e2f4b4a071cdb52c1dc20b53a (patch) | |
| tree | c4ef8962f83151c0352e23f3c3780ae484b86481 | |
| parent | a9cf453d3cdba29e6d9bbaa35e71f82dde95165b (diff) | |
| download | txr-9e258b5d4a27fa0e2f4b4a071cdb52c1dc20b53a.tar.gz txr-9e258b5d4a27fa0e2f4b4a071cdb52c1dc20b53a.tar.bz2 txr-9e258b5d4a27fa0e2f4b4a071cdb52c1dc20b53a.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.
| -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 |