Mercurial Mercurial > repos > isabelle / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | gz | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
tuned;
authorwenzelm
Sat, 27 Nov 2010 15:36:35 +0100
changeset 40744 0e7c2957fc1d
parent 40743 b07a0dbc8a38
child 40745 1dabcda202c3
tuned;
src/Pure/General/file.ML file | annotate | diff | comparison | revisions 
--- a/src/Pure/General/file.ML	Sat Nov 27 15:28:00 2010 +0100
+++ b/src/Pure/General/file.ML	Sat Nov 27 15:36:35 2010 +0100
@@ -67,9 +67,6 @@
 
 val rm = OS.FileSys.remove o platform_path;
 
-fun is_dir path =
-  the_default false (try OS.FileSys.isDir (platform_path path));
-
 
 (* open files *)
 
@@ -127,6 +124,9 @@
     SOME ids => is_equal (OS.FileSys.compare ids)
   | NONE => false);
 
+fun is_dir path =
+  the_default false (try OS.FileSys.isDir (platform_path path));
+
 fun copy src dst =
   if eq (src, dst) then ()
   else
isabelle