forked from lix-project/lix
* builtins.trace: in the common case that the value is a string, then
show the string, not the ATerm, so we get `trace: bla' instead of `trace: Str("bla",[])'.
This commit is contained in:
parent
437077c39d
commit
deb342fb08
|
@ -256,7 +256,12 @@ static Expr prim_getEnv(EvalState & state, const ATermVector & args)
|
||||||
static Expr prim_trace(EvalState & state, const ATermVector & args)
|
static Expr prim_trace(EvalState & state, const ATermVector & args)
|
||||||
{
|
{
|
||||||
Expr e = evalExpr(state, args[0]);
|
Expr e = evalExpr(state, args[0]);
|
||||||
printMsg(lvlError, format("trace: %1%") % e);
|
string s;
|
||||||
|
PathSet context;
|
||||||
|
if (matchStr(e, s, context))
|
||||||
|
printMsg(lvlError, format("trace: %1%") % s);
|
||||||
|
else
|
||||||
|
printMsg(lvlError, format("trace: %1%") % e);
|
||||||
return evalExpr(state, args[1]);
|
return evalExpr(state, args[1]);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue