Parent Directory | Revision Log | Patch
revision 1.36 by spiralvoice, Sun Aug 28 10:49:49 2005 UTC | revision 1.37 by spiralvoice, Sun Aug 28 11:09:14 2005 UTC | |
---|---|---|
# | Line 40 let rights = 0o664 | Line 40 let rights = 0o664 |
40 | let ro_flag = [Unix.O_RDONLY] | let ro_flag = [Unix.O_RDONLY] |
41 | let rw_flag = [Unix.O_CREAT; Unix.O_RDWR] | let rw_flag = [Unix.O_CREAT; Unix.O_RDWR] |
42 | ||
43 | external external_start : unit -> unit = "external_start" | external external_start : string -> unit = "external_start" |
44 | external external_exit : unit -> unit = "external_exit" | external external_exit : unit -> unit = "external_exit" |
45 | ||
46 | let really_write fd s pos len = | let really_write fd s pos len = |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |