From c11839d7b24993f9639d59f9fa3420e8ccc22e02 Mon Sep 17 00:00:00 2001
From: Eelco Dolstra <e.dolstra@tudelft.nl>
Date: Fri, 28 Jul 2006 14:01:29 +0000
Subject: * `nix-instantiate --print-args': print out the valid values for  
 functions arguments that have a domain.

---
 src/libexpr/nixexpr.cc | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

(limited to 'src/libexpr/nixexpr.cc')

diff --git a/src/libexpr/nixexpr.cc b/src/libexpr/nixexpr.cc
index 56b23cc62211..06ca8c928ea3 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>";
+}
-- 
cgit 1.4.1