1
0
Fork 0
mirror of https://github.com/NixOS/nix synced 2025-06-26 20:01:15 +02:00

* Make printing an expression as XML interruptible.

This commit is contained in:
Eelco Dolstra 2007-01-13 14:48:41 +00:00
parent 11158028be
commit 792878af91
2 changed files with 7 additions and 0 deletions

View file

@ -684,6 +684,9 @@ Expr strictEvalExpr(EvalState & state, Expr e, bool canonicalise)
if (!matchBind(*i, name, e, pos)) abort(); /* can't happen */
as2 = ATinsert(as2, makeBind(name, strictEvalExpr(state, e, canonicalise),
canonicalise ? makeNoPos() : pos));
}
if (canonicalise) {
}
/* !!! sort attributes if canonicalise == true */
return makeAttrs(ATreverse(as2));
@ -716,6 +719,7 @@ Expr strictEvalExpr(EvalState & state, Expr e, bool canonicalise)
formals2 = ATinsert(formals2, makeFormal(name, valids, dummy));
}
return makeFunction(ATreverse(formals2), body,
canonicalise ? makeNoPos() : pos);
}