steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix TYPEDEF: issue

db4
sheeple 2008-02-04 12:03:48 -06:00
parent f2af000ed0
commit 53cb45c9ff
3 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/unix/linux/linux.factor
View File

@ -1,10 +1,8 @@
! Copyright (C) 2005 Slava Pestov. ! Copyright (C) 2005, 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
IN: unix IN: unix
USING: alien.syntax ; USING: alien.syntax ;
TYPEDEF: ulong off_t
! Linux. ! Linux.
: O_RDONLY HEX: 0000 ; inline : O_RDONLY HEX: 0000 ; inline

2
extra/unix/solaris/solaris.factor
View File

@ -3,8 +3,6 @@
IN: unix IN: unix
USING: alien.syntax system kernel ; USING: alien.syntax system kernel ;
TYPEDEF: ulong off_t
! Solaris. ! Solaris.
: O_RDONLY HEX: 0000 ; inline : O_RDONLY HEX: 0000 ; inline

4
extra/unix/unix.factor
View File

@ -19,11 +19,13 @@ TYPEDEF: uint time_t
TYPEDEF: uint uid_t TYPEDEF: uint uid_t
TYPEDEF: ulong size_t TYPEDEF: ulong size_t
TYPEDEF: ulong u_long TYPEDEF: ulong u_long
TYPEDEF: ulonglong off_t
TYPEDEF: ushort mode_t TYPEDEF: ushort mode_t
TYPEDEF: ushort nlink_t TYPEDEF: ushort nlink_t
TYPEDEF: void* caddr_t TYPEDEF: void* caddr_t
TYPEDEF: ulong off_t
TYPEDEF-IF: bsd? ulonglong off_t
C-STRUCT: tm C-STRUCT: tm
{ "int" "sec" } ! Seconds: 0-59 (K&R says 0-61?) { "int" "sec" } ! Seconds: 0-59 (K&R says 0-61?)
{ "int" "min" } ! Minutes: 0-59 { "int" "min" } ! Minutes: 0-59