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/smlnj-lib/Unix/unix-path-sig.sml
ViewVC logotype

Annotation of /sml/trunk/src/smlnj-lib/Unix/unix-path-sig.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2 - (view) (download)

1 : monnier 2 (* unix-path-sig.sml
2 :     *
3 :     * COPYRIGHT (c) 1993 by AT&T Bell Laboratories. See COPYRIGHT file for details.
4 :     *
5 :     * AUTHOR: John Reppy and Emden Gansner
6 :     * AT&T Bell Laboratories
7 :     * Murray Hill, NJ 07974
8 :     * jhr@research.att.com
9 :     * erg@research.att.com
10 :     *)
11 :    
12 :     signature UNIX_PATH =
13 :     sig
14 :    
15 :     type path_list
16 :    
17 :     val getPath : unit -> path_list
18 :     (* get the user's PATH environment variable. *)
19 :    
20 :     datatype access_mode = A_READ | A_WRITE | A_EXEC
21 :     sharing type OS.FileSys.access_mode = access_mode
22 :     datatype file_type = F_REGULAR | F_DIR | F_SYMLINK | F_SOCK | F_CHR | F_BLK
23 :     (** what is the type in POSIX??? **)
24 :    
25 :     exception NoSuchFile
26 :    
27 :     val findFile : (path_list * access_mode list) -> string -> string
28 :     val findFiles : (path_list * access_mode list) -> string -> string list
29 :    
30 :     val findFileOfType : (path_list * file_type * access_mode list) -> string -> string
31 :     val findFilesOfType : (path_list * file_type * access_mode list) -> string -> string list
32 :    
33 :     end (* UNIX_PATH *)

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