From e5392461315b7ca216627b5336c2f33b33119f28 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Thu, 20 Mar 2008 15:11:27 -0500
Subject: [PATCH] fix stat on openbsd32

---
 extra/unix/stat/openbsd/32/32.factor | 8 ++++----
 extra/unix/stat/openbsd/64/64.factor | 2 +-
 extra/unix/stat/stat.factor          | 3 ++-
 extra/unix/types/types.factor        | 1 -
 4 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/extra/unix/stat/openbsd/32/32.factor b/extra/unix/stat/openbsd/32/32.factor
index e4357ba70b..521735c9b4 100644
--- a/extra/unix/stat/openbsd/32/32.factor
+++ b/extra/unix/stat/openbsd/32/32.factor
@@ -12,9 +12,9 @@ C-STRUCT: stat
     { "gid_t" "st_gid" }
     { "dev_t" "st_rdev" }
     { "int32_t" "st_lspare0" }
-    { "timespec*" "st_atimespec" }
-    { "timespec*" "st_mtimespec" }
-    { "timespec*" "st_ctimespec" }
+    { "timespec*" "st_atim" }
+    { "timespec*" "st_mtim" }
+    { "timespec*" "st_ctim" }
     { "off_t" "st_size" }
     { "int64_t" "st_blocks" }
     { "u_int32_t" "st_blksize" }
@@ -25,5 +25,5 @@ C-STRUCT: stat
     { "int64_t" "st_qspare1" }
     { "int64_t" "st_qspare2" } ;
 
-! FUNCTION: int stat  ( char* pathname, stat* buf ) ;
+FUNCTION: int stat  ( char* pathname, stat* buf ) ;
 FUNCTION: int lstat ( char* pathname, stat* buf ) ;
diff --git a/extra/unix/stat/openbsd/64/64.factor b/extra/unix/stat/openbsd/64/64.factor
index e4357ba70b..752574a43a 100644
--- a/extra/unix/stat/openbsd/64/64.factor
+++ b/extra/unix/stat/openbsd/64/64.factor
@@ -25,5 +25,5 @@ C-STRUCT: stat
     { "int64_t" "st_qspare1" }
     { "int64_t" "st_qspare2" } ;
 
-! FUNCTION: int stat  ( char* pathname, stat* buf ) ;
+FUNCTION: int stat  ( char* pathname, stat* buf ) ;
 FUNCTION: int lstat ( char* pathname, stat* buf ) ;
diff --git a/extra/unix/stat/stat.factor b/extra/unix/stat/stat.factor
index e0a6a9fb76..f7432332b9 100644
--- a/extra/unix/stat/stat.factor
+++ b/extra/unix/stat/stat.factor
@@ -63,7 +63,8 @@ FUNCTION: int mkdir ( char* path, mode_t mode ) ;
     { "linux"   [ "unix.stat.linux"   require ] }
     { "macosx"  [ "unix.stat.macosx"  require ] }
     { "freebsd" [ "unix.stat.freebsd" require ] }
-    [ drop ]
+    { "netbsd"  [ "unix.stat.netbsd" require ] }
+    { "openbsd" [ "unix.stat.openbsd" require ] }
   }
   case
 >>
diff --git a/extra/unix/types/types.factor b/extra/unix/types/types.factor
index 59d0c05a87..ed2dbd5ba8 100644
--- a/extra/unix/types/types.factor
+++ b/extra/unix/types/types.factor
@@ -12,6 +12,5 @@ os
     { "freebsd" [ "unix.types.freebsd" require ] }
     { "openbsd" [ "unix.types.openbsd" require ] }
     { "netbsd"  [ "unix.types.netbsd"  require ] }
-    [ drop ]
   }
 case