33 lines
497 B
V
33 lines
497 B
V
|
module os2
|
||
|
|
|
||
|
|
#include <fcntl.h>
|
||
|
|
|
||
|
|
struct File {
|
||
|
|
fd int
|
||
|
|
}
|
||
|
|
|
||
|
|
fn C.open(byteptr, int, int) int
|
||
|
|
fn C.write(voidptr, byteptr, int) int
|
||
|
|
|
||
|
|
pub fn create(path string) ?File {
|
||
|
|
fd := C.creat(path.str, 0644)//511)
|
||
|
|
if fd == -1 {
|
||
|
|
return error('failed to create "$path":')
|
||
|
|
//os.print_c_errno()
|
||
|
|
}
|
||
|
|
return File{fd}
|
||
|
|
}
|
||
|
|
|
||
|
|
pub fn (f File) writeln(s string) {
|
||
|
|
ss := s + '\n'
|
||
|
|
ret := C.write(f.fd, ss.str, s.len + 1)
|
||
|
|
if ret == -1 {
|
||
|
|
C.perror('failed to write')
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
pub fn (f File) close() {
|
||
|
|
C.close(f.fd)
|
||
|
|
}
|
||
|
|
|