Simon Brooke
f36436a9e1
I'm now of the opinion that this is done at the wrong level in the stack and needs to be redone later; but it works for now. There's a regression in `open`, but I can't see why.
13 lines
258 B
Bash
Executable file
13 lines
258 B
Bash
Executable file
#!/bin/bash
|
|
|
|
expected='<Special form: ((:primitive . t) (:name . cond))>'
|
|
actual=`echo "(eval 'cond)" | target/psse | tail -1`
|
|
|
|
if [ "${expected}" = "${actual}" ]
|
|
then
|
|
echo "OK"
|
|
else
|
|
echo "Fail: expected '${expected}', got '${actual}'"
|
|
exit 1
|
|
fi
|