diff options
Diffstat (limited to 'src/libexpr/primops.cc')
-rw-r--r-- | src/libexpr/primops.cc | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/libexpr/primops.cc b/src/libexpr/primops.cc index 883e99ad0d..864292d4a4 100644 --- a/src/libexpr/primops.cc +++ b/src/libexpr/primops.cc @@ -6,6 +6,7 @@ #include "archive.hh" #include "expr-to-xml.hh" #include "nixexpr-ast.hh" +#include "parser.hh" #include <sys/types.h> #include <sys/stat.h> @@ -949,6 +950,8 @@ static Expr prim_unsafeDiscardStringContext(EvalState & state, const ATermVector return makeStr(s, PathSet()); } +/* Expression serialization/deserialization */ + static Expr prim_ExprToString ( EvalState & state, const ATermVector & args) { return makeStr ( atPrint ( evalExpr ( state, args [ 0 ] ) ) ); @@ -961,7 +964,7 @@ static Expr prim_StringToExpr ( EvalState & state, const ATermVector & args) if (! matchStr ( evalExpr ( state, args[0] ), s, l )) { throw EvalError("__stringToExpr needs string argument!"); } - return toATerm ( s ); + return ATreadFromString(s.c_str()); } /************************************************************* |