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

SCM Repository

[smlnj] Annotation of /sml/trunk/src/compiler/PervEnv/Unix/os.sml
ViewVC logotype

Annotation of /sml/trunk/src/compiler/PervEnv/Unix/os.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 114 - (view) (download)

1 : monnier 16 (* os.sml
2 :     *
3 :     * COPYRIGHT (c) 1995 AT&T Bell Laboratories.
4 :     *
5 :     * Generic OS interface (NEW BASIS)
6 :     *
7 :     *)
8 :    
9 :     structure OS : OS =
10 :     struct
11 :    
12 :     open OS (* open type-only structure to get types *)
13 :    
14 :     exception SysErr = Assembly.SysErr
15 :    
16 :     val errorMsg = Posix.Error.errorMsg
17 :     val errorName = Posix.Error.errorName
18 :     val syserror = Posix.Error.syserror
19 :    
20 :     structure FileSys = OS_FileSys
21 :     structure Path = OS_Path
22 :     structure Process = OS_Process
23 :     structure IO = OS_IO
24 :    
25 :     end (* OS *)
26 :    
27 :     (*
28 : monnier 113 * $Log$
29 : monnier 16 *)

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