===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Doc/oxasir-win.sm1,v
retrieving revision 1.8
retrieving revision 1.11
diff -u -p -r1.8 -r1.11
--- OpenXM/src/kan96xx/Doc/oxasir-win.sm1	2002/01/09 10:52:42	1.8
+++ OpenXM/src/kan96xx/Doc/oxasir-win.sm1	2002/01/13 06:55:30	1.11
@@ -1,4 +1,4 @@
-% $OpenXM: OpenXM/src/kan96xx/Doc/oxasir-win.sm1,v 1.7 2001/12/28 08:45:30 takayama Exp $
+% $OpenXM: OpenXM/src/kan96xx/Doc/oxasir-win.sm1,v 1.10 2002/01/09 11:19:25 takayama Exp $
 % It is empty for now.
 %
 /oxasir.sm1.loaded 1 def
@@ -10,10 +10,23 @@ OpenXM_HOME_WIN tag 0 eq {
   [(getenv) (OpenXM_HOME)] extension
   /OpenXM_HOME_WIN set
 } { } ifelse
+OpenXM_HOME_WIN tag 0 eq {
+  %% Hard encoding:
+  /OpenXM_HOME_WIN
+   (\OpenXM-win)
+%  (\cygwin\home\nobuki\OpenXM\misc\packages\Windows\OpenXM-win)    
+  def
+} { } ifelse
 
 
 %% Set constants for windows.
-[(getenv) (OSTYPE)] extension (cygwin) eq {
+[(getenv) (OSTYPE)] extension tag 0 eq {
+  /oxasir.ostype (native-windows) def
+}{
+  [(getenv) (OSTYPE)] extension /oxasir.ostype set
+} ifelse
+
+oxasir.ostype (cygwin) eq {
 /oxasirpath.oxasir  
   [ [(getenv) (OpenXM_HOME)] extension
     (/bin/ox_asir) ] cat