eval: Use 'identity' instead of 'values'.
* gash/eval.scm (exps->thunk): Use 'identity' instead of 'values'.
This commit is contained in:
parent
864e51250b
commit
3b14c5cb2d
|
@ -163,7 +163,7 @@ and arithmetic substitions."
|
||||||
;; XXX: It probably makes more sense to exclude '#f' expressions at
|
;; XXX: It probably makes more sense to exclude '#f' expressions at
|
||||||
;; the syntax level. For now, we filter them out here.
|
;; the syntax level. For now, we filter them out here.
|
||||||
(if exps
|
(if exps
|
||||||
(match (filter values exps)
|
(match (filter identity exps)
|
||||||
(() noop)
|
(() noop)
|
||||||
(exps (lambda () (eval-sh `(<sh-begin> ,@exps)))))
|
(exps (lambda () (eval-sh `(<sh-begin> ,@exps)))))
|
||||||
(lambda () (set-status! 0))))
|
(lambda () (set-status! 0))))
|
||||||
|
|
Loading…
Reference in New Issue