diff -ur handypak.orig/Imakefile.def handypak/Imakefile.def
--- handypak.orig/Imakefile.def	2007-12-07 20:11:29.000000000 +0900
+++ handypak/Imakefile.def	2008-09-02 14:19:37.000000000 +0900
@@ -6,6 +6,7 @@
 /* #define SunArchitecture */
 /* #define DigitalArchitecture */
 /* #define AIXArchitecture */
+/* #define DarwinArchtecture */
 
 /* Uncomment following line for use of Shared-Memory */
  SHARED = -D__SHARED
@@ -54,6 +55,17 @@
 RANCMD  =
 #endif
 
+#if defined(DarwinArchitecture)
+ARCH    = __Darwin $(SHARED)
+FC      = g95
+FFLAGS  = -O2 -fno-backslash -fsloppy-char -fstatic -fzero
+CC      = cc
+CFLAGS  = -O2
+AR      = ar
+ARFLAGS = rsv
+RANCMD  =
+#endif
+
 /*--------------------- General Rules ------------------------*/
 
 .f.o:;\
diff -ur handypak.orig/src.shm/dgset.F handypak/src.shm/dgset.F
--- handypak.orig/src.shm/dgset.F	2006-05-19 20:44:58.000000000 +0900
+++ handypak/src.shm/dgset.F	2008-09-02 11:55:40.000000000 +0900
@@ -147,7 +147,7 @@
 C
       ENTRY DGBUF(BUF,N)
 C  THIS ENTRY SUPPLIES THE ADDRESS OF THE ELEMENT BUFFER
-#     if defined(__AIX)
+#     if ( defined(__AIX) || defined(__Darwin) )
       L= LOC(BUF)                                                       VAX780
 #     else
       L=%LOC(BUF)                                                       VAX780
@@ -341,7 +341,7 @@
       DATA NBUF/0/
 C
       NBUF=IBUF
-#     if defined(__AIX)
+#     if ( defined(__AIX) || defined(__Darwin) )
       L= LOC(BUF)                                                       VAX780
 #     else
       L=%LOC(BUF)                                                       VAX780
diff -ur handypak.orig/src.shm/duf1a.F handypak/src.shm/duf1a.F
--- handypak.orig/src.shm/duf1a.F	2006-05-19 20:45:52.000000000 +0900
+++ handypak/src.shm/duf1a.F	2008-09-02 11:56:16.000000000 +0900
@@ -19,7 +19,7 @@
 #endif
       SAVE LX,LY,LE		! for g77
 C
-#     if defined(__AIX)
+#     if ( defined(__AIX) || defined(__Darwin) )
       LX= LOC(AX)
       LY= LOC(AY)
       LE= LOC(AYE)
diff -ur handypak.orig/src.shm/duf2a.F handypak/src.shm/duf2a.F
--- handypak.orig/src.shm/duf2a.F	2006-05-19 20:46:17.000000000 +0900
+++ handypak/src.shm/duf2a.F	2008-09-02 11:56:43.000000000 +0900
@@ -15,7 +15,7 @@
       SAVE LX,LY,LZ,LE		! for g77
       EXTERNAL DUFAI
       DATA NI,NJ/0,0/
-#     if defined(__AIX)
+#     if ( defined(__AIX) || defined(__Darwin) )
       LX= LOC(AX)
       LY= LOC(AY)
       LZ= LOC(AZ)
diff -ur handypak.orig/src.shm/dut1.F handypak/src.shm/dut1.F
--- handypak.orig/src.shm/dut1.F	2006-05-19 20:49:40.000000000 +0900
+++ handypak/src.shm/dut1.F	2008-09-02 11:57:07.000000000 +0900
@@ -55,7 +55,7 @@
       KF=1
       IF(NARG.GE.8) KF=NF
 C..#IFDEF VAX_VMS
-#     if defined(__AIX)
+#     if ( defined(__AIX) || defined(__Darwin) )
       JF= LOC(F)
 #     else
       JF=%LOC(F)
diff -ur handypak.orig/src.shm/dut2.F handypak/src.shm/dut2.F
--- handypak.orig/src.shm/dut2.F	2006-05-19 20:50:36.000000000 +0900
+++ handypak/src.shm/dut2.F	2008-09-02 11:57:33.000000000 +0900
@@ -51,7 +51,7 @@
       IF(NARG.LE.8) GO TO 8
       KF=NF
 C..#IFDEF VAX_VMS
-#     if defined(__AIX)
+#     if ( defined(__AIX) || defined(__Darwin) )
       JF= LOC(F)
 #     else
       JF=%LOC(F)
@@ -63,7 +63,7 @@
       IF(NARG.LE.10) GO TO 8
       KC=NC
 C..#IFDEF VAX_VMS
-#     if defined(__AIX)
+#     if ( defined(__AIX) || defined(__Darwin) )
       JC= LOC(C)
 #     else
       JC=%LOC(C)
diff -ur handypak.orig/src.shm/hinit.F handypak/src.shm/hinit.F
--- handypak.orig/src.shm/hinit.F	2006-05-19 20:46:47.000000000 +0900
+++ handypak/src.shm/hinit.F	2008-09-02 12:46:16.000000000 +0900
@@ -13,7 +13,11 @@
 C
       INTEGER HPAK,DPAK,HSHMAT,GETUID
       LOGICAL HSCUNI
+#if   defined(__Darwin)
+      DATA HPAK/4HHPAK/, DPAK/4HDPAK/, KEY/4HHPAK/, IFLAG/o'0644'/
+#else
       DATA HPAK/4HHPAK/, DPAK/4HDPAK/, KEY/4HHPAK/, IFLAG/'0644'o/
+#endif
 C
       NARG=NARGS()
       IF(NARG.LT.0) NARG=1
diff -ur handypak.orig/src.shm/hoptc.F handypak/src.shm/hoptc.F
--- handypak.orig/src.shm/hoptc.F	2006-05-19 20:47:36.000000000 +0900
+++ handypak/src.shm/hoptc.F	2008-09-02 12:47:31.000000000 +0900
@@ -341,7 +341,7 @@
 C
 C       'CONTOUR'
 C..#IFDEF VAX_VMS
-#     if defined(__AIX)
+#     if ( defined(__AIX) || defined(__Darwin) )
   260 M(MPARM+16)= LOC(IVAL(1))
 #     else
   260 M(MPARM+16)=%LOC(IVAL(1))
@@ -364,7 +364,7 @@
 C
 C       'FUNCTION'
 C..#IFDEF VAX_VMS
-#     if defined(__AIX)
+#     if ( defined(__AIX) || defined(__Darwin) )
   280 M(MDISP+3)= LOC(IVAL(1))
 #     else
   280 M(MDISP+3)=%LOC(IVAL(1))
diff -ur handypak.orig/src.shm/hshmat-dummy.F handypak/src.shm/hshmat-dummy.F
--- handypak.orig/src.shm/hshmat-dummy.F	2006-05-19 20:52:59.000000000 +0900
+++ handypak/src.shm/hshmat-dummy.F	2008-09-02 12:47:57.000000000 +0900
@@ -3,7 +3,7 @@
 C     Dummy Routine for NON-Shared Memory Operation
 C
       COMMON /HCOM/M(1)
-#     if defined(__AIX)
+#     if ( defined(__AIX) || defined(__Darwin) )
       HSHMAT= LOC(M(1))
 #     else
       HSHMAT=%LOC(M(1))