Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/src/compiler/PervEnv/Win32/os-filesys.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/PervEnv/Win32/os-filesys.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 113, Fri Jun 5 19:41:21 1998 UTC revision 143, Mon Sep 7 21:46:44 1998 UTC
# Line 105  Line 105 
105    
106          fun realPath p =          fun realPath p =
107              if OSPath.isAbsolute p then fullPath p              if OSPath.isAbsolute p then fullPath p
108              else OSPath.mkRelative (fullPath p, fullPath (getDir()))              else OSPath.mkRelative {path=fullPath p, relativeTo=fullPath (getDir())}
109    
110          fun fileSize s =          fun fileSize s =
111              case W32FS.getLowFileSizeByName s of              case W32FS.getLowFileSizeByName s of
# Line 252  Line 252 
252      end      end
253    
254    
 (*  
  * $Log$  
  *)  

Legend:
Removed from v.113  
changed lines
  Added in v.143

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0