aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorEelco Dolstra <e.dolstra@tudelft.nl>2006-07-28 14:01:29 +0000
committerEelco Dolstra <e.dolstra@tudelft.nl>2006-07-28 14:01:29 +0000
commitc11839d7b24993f9639d59f9fa3420e8ccc22e02 (patch)
tree624ef0a1ceb8fc9946da438e4899a5cfe1f3c818 /src
parentca2238cf818e27ebb663c83a9fe9ae7f58eb830f (diff)
* `nix-instantiate --print-args': print out the valid values for
functions arguments that have a domain.
Diffstat (limited to 'src')
-rw-r--r--src/libexpr/nixexpr.cc24
-rw-r--r--src/libexpr/nixexpr.hh2
-rw-r--r--src/nix-instantiate/main.cc14
3 files changed, 37 insertions, 3 deletions
diff --git a/src/libexpr/nixexpr.cc b/src/libexpr/nixexpr.cc
index 56b23cc62..06ca8c928 100644
--- a/src/libexpr/nixexpr.cc
+++ b/src/libexpr/nixexpr.cc
@@ -308,3 +308,27 @@ string showType(Expr e)
return "an unknown type";
}
+
+string showValue(Expr e)
+{
+ ATerm s;
+ int i;
+ if (matchStr(e, s)) {
+ string t = aterm2String(s), u;
+ for (string::iterator i = t.begin(); i != t.end(); ++i)
+ if (*i == '\"' || *i == '\\') u += "\\" + *i;
+ else if (*i == '\n') u += "\\n";
+ else if (*i == '\r') u += "\\r";
+ else if (*i == '\t') u += "\\t";
+ else u += *i;
+ return "\"" + u + "\"";
+ }
+ if (matchPath(e, s)) return aterm2String(s);
+ if (matchUri(e, s)) return aterm2String(s);
+ if (matchNull(e)) return "null";
+ if (matchInt(e, i)) return (format("%1%") % i).str();
+ if (e == eTrue) return "true";
+ if (e == eFalse) return "false";
+ /* !!! incomplete */
+ return "<unknown>";
+}
diff --git a/src/libexpr/nixexpr.hh b/src/libexpr/nixexpr.hh
index 6e67e5ebd..3fd22ecfe 100644
--- a/src/libexpr/nixexpr.hh
+++ b/src/libexpr/nixexpr.hh
@@ -92,5 +92,7 @@ Expr makeBool(bool b);
string showType(Expr e);
+string showValue(Expr e);
+
#endif /* !__NIXEXPR_H */
diff --git a/src/nix-instantiate/main.cc b/src/nix-instantiate/main.cc
index 963e81bac..857aeaa24 100644
--- a/src/nix-instantiate/main.cc
+++ b/src/nix-instantiate/main.cc
@@ -44,9 +44,17 @@ static void printResult(EvalState & state, Expr e,
ATerm body, pos;
if (matchFunction(e, formals, body, pos)) {
for (ATermIterator i(formals); i; ++i) {
- Expr name; ATerm d1, d2;
- if (!matchFormal(*i, name, d1, d2)) abort();
- cout << format("%1%\n") % aterm2String(name);
+ Expr name; ValidValues valids; ATerm dummy;
+ if (!matchFormal(*i, name, valids, dummy)) abort();
+ cout << format("%1%: ") % aterm2String(name);
+ ATermList valids2;
+ if (matchValidValues(valids, valids2)) {
+ for (ATermIterator j(valids2); j; ++j) {
+ Expr e = evalExpr(state, *j);
+ cout << format("%1% ") % showValue(e);
+ }
+ }
+ cout << format("\n");
}
} else
printMsg(lvlError, "warning: expression does not evaluate to a function");