浏览代码

fixed issue #348

Nicolas Cannasse 14 年之前
父节点
当前提交
162daa6013
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      main.ml

+ 1 - 1
main.ml

@@ -428,7 +428,7 @@ try
 				Common.display_default := true;
 				Common.display_default := true;
 				Common.define com "display";
 				Common.define com "display";
 				Parser.resume_display := {
 				Parser.resume_display := {
-					Ast.pfile = Common.get_full_path file;
+					Ast.pfile = (try Common.get_full_path file with _ -> file);
 					Ast.pmin = pos;
 					Ast.pmin = pos;
 					Ast.pmax = pos;
 					Ast.pmax = pos;
 				};
 				};