[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[STUMP] I cannot get the output of (ext:shell "ls ~") ?
From: |
Michael Raskin |
Subject: |
[STUMP] I cannot get the output of (ext:shell "ls ~") ? |
Date: |
Tue, 16 Oct 2012 11:19:45 +0400 |
>The stumpwm is built using clisp-2.49. The stumpwm evaling can display the
>result of the following function with the help of "with-output-to-string":
>(Maybe i is better to hack stumpwm to do such a thing as clfswm does)
>
>(defun div618 (p1 p2)
> (let ((ratio '(0. 0.191 0.236 0.382 0.5 0.618 0.809 1.))
> (price #'(lambda (r) (if (<= p1 p2) (+ p1 (* (- p2 p1) r)) (- p1
>(* (- p1 p2) r))))))
> (with-output-to-string (*standard-output*)
> (if (<= p1 p2)
> (dolist (r (reverse ratio)) (format t "-------~3$
>~$-------~%" r (funcall price r)))
> (dolist (r ratio) (format t "-------~3$ ~$-------~%" r
>(funcall price r)))))))
>
>However, both slime and stumpwm evaling cannot display the result of
>(ext:shell "ls ~").
ext:shell output goes to filedescriptor 1, not even to *standard-output*
and CLisp offers no way to redirect this. There are other way to call
external programs with more freedom.