lix-project/lix
20
55
Fork 31
Code Issues 344 Code Review (Gerrit) Projects 3 Releases Wiki Activity

* Evaluate argument to `import'.

Browse source
This commit is contained in:
Eelco Dolstra 2004-10-26 17:10:09 +00:00
parent 033d7c6593
commit eb8284ddaa
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/libexpr/primops.cc
View file

@ -9,7 +9,8 @@ static Expr primImport(EvalState & state, const ATermVector & args)
{ {
ATMatcher m; ATMatcher m;
string path; string path;
if (!(atMatch(m, args[0]) >> "Path" >> path)) Expr fn = evalExpr(state, args[0]);
if (!(atMatch(m, fn) >> "Path" >> path))
throw Error("path expected"); throw Error("path expected");
return evalFile(state, path); return evalFile(state, path);
} }