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/branches/primop-branch/src/system/Basis/Implementation/Sockets/generic-sock.sig
ViewVC logotype

Diff of /sml/branches/primop-branch/src/system/Basis/Implementation/Sockets/generic-sock.sig

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

revision 1470, Mon Mar 29 22:45:55 2004 UTC revision 1471, Mon Mar 29 22:45:55 2004 UTC
# Line 7  Line 7 
7  local  local
8      structure Socket = SocketImp      structure Socket = SocketImp
9  in  in
10  signature GENERIC_SOCK =  signature GENERIC_SOCK = sig
   sig  
     val addressFamilies : unit -> Socket.AF.addr_family list  
         (* returns a list of the supported address families; this should include  
          * at least:  Socket.AF.inet.  
          *)  
   
     val socketTypes : unit -> Socket.SOCK.sock_type  
         (* returns a list of the supported socket types; this should include at  
          * least:  Socket.SOCK.stream and Socket.SOCK.dgram.  
          *)  
11    
12    (* create sockets using default protocol *)    (* create sockets using default protocol *)
13      val socket : (Socket.AF.addr_family * Socket.SOCK.sock_type)      val socket : Socket.AF.addr_family * Socket.SOCK.sock_type
14            -> ('a, 'b) Socket.sock            -> ('a, 'b) Socket.sock
15      val socketPair : (Socket.AF.addr_family * Socket.SOCK.sock_type)      val socketPair : Socket.AF.addr_family * Socket.SOCK.sock_type
16            -> (('a, 'b) Socket.sock * ('a, 'b) Socket.sock)                       -> ('a, 'b) Socket.sock * ('a, 'b) Socket.sock
17    
18    (* create sockets using the specified protocol *)    (* create sockets using the specified protocol *)
19      val socket' : (Socket.AF.addr_family * Socket.SOCK.sock_type * int)      val socket' : Socket.AF.addr_family * Socket.SOCK.sock_type * int
20            -> ('a, 'b) Socket.sock            -> ('a, 'b) Socket.sock
21      val socketPair' : (Socket.AF.addr_family * Socket.SOCK.sock_type * int)      val socketPair' : Socket.AF.addr_family * Socket.SOCK.sock_type * int
22            -> (('a, 'b) Socket.sock * ('a, 'b) Socket.sock)                        -> ('a, 'b) Socket.sock * ('a, 'b) Socket.sock
23    
24    end    end
25  end  end
   

Legend:
Removed from v.1470  
changed lines
  Added in v.1471

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