diff options
Diffstat (limited to 'stdlib/optimize.tl')
-rw-r--r-- | stdlib/optimize.tl | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/stdlib/optimize.tl b/stdlib/optimize.tl index 11b85aca..4b7b3ec5 100644 --- a/stdlib/optimize.tl +++ b/stdlib/optimize.tl @@ -345,11 +345,6 @@ ((nequal ninsn oinsn) (append (ldiff code tail) (list ninsn))) (t code)))) -(defun subst (x y list) - (mapcar (lambda (item) - (if (equal item x) y item)) - list)) - (defun subst-preserve (x y bb li list) (let ((sub (subst x y list))) (cond |