usa	2008-02-07 11:14:54 +0900 (Thu, 07 Feb 2008)

  New Revision: 15390

  Modified files:
    trunk/ChangeLog
    trunk/bcc32/Makefile.sub
    trunk/missing/lgamma_r.c
    trunk/win32/Makefile.sub
    trunk/wince/Makefile.sub

  Log:
    * missing/lgamma_r.c (lgamma_r): some compilers don't permit dividing
      by literal 0.0. use const variable instead.
    
    * {bcc32,win32,wince}/Makefile.sub (MISSING): add lgamma_r.obj and
      tgamma.obj.
    


  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/missing/lgamma_r.c?r1=15390&r2=15389&diff_format=u
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/wince/Makefile.sub?r1=15390&r2=15389&diff_format=u
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/ChangeLog?r1=15390&r2=15389&diff_format=u
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/win32/Makefile.sub?r1=15390&r2=15389&diff_format=u
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/bcc32/Makefile.sub?r1=15390&r2=15389&diff_format=u

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 15389)
+++ ChangeLog	(revision 15390)
@@ -1,3 +1,11 @@
+Thu Feb  7 11:11:02 2008  NAKAMURA Usaku  <usa@r...>
+
+	* missing/lgamma_r.c (lgamma_r): some compilers don't permit dividing
+	  by literal 0.0. use const variable instead.
+
+	* {bcc32,win32,wince}/Makefile.sub (MISSING): add lgamma_r.obj and
+	  tgamma.obj.
+
 Thu Feb  7 10:39:21 2008  Tanaka Akira  <akr@f...>
 
 	* math.c (math_gamma): new method Math.gamma.
Index: win32/Makefile.sub
===================================================================
--- win32/Makefile.sub	(revision 15389)
+++ win32/Makefile.sub	(revision 15390)
@@ -172,7 +172,7 @@
 LIBS = oldnames.lib user32.lib advapi32.lib shell32.lib ws2_32.lib $(EXTLIBS)
 !endif
 !if !defined(MISSING)
-MISSING = acosh.obj crypt.obj erf.obj strlcpy.obj strlcat.obj win32.obj
+MISSING = acosh.obj crypt.obj erf.obj lgamma_r.obj strlcpy.obj strlcat.obj tgamma.obj win32.obj
 !endif
 
 ARFLAGS = -machine:$(MACHINE) -out:
@@ -251,7 +251,7 @@
 WINMAINOBJ    = winmain.$(OBJEXT)
 !endif
 MINIOBJS      = dmydln.$(OBJEXT) dmyencoding.$(OBJEXT) dmytranscode.$(OBJEXT) miniprelude.$(OBJEXT)
-LIBOBJS       = acosh.obj crypt.obj erf.obj strlcpy.obj strlcat.obj win32.obj $(LIBOBJS)
+LIBOBJS       = $(MISSING) $(LIBOBJS)
 
 !ifndef COMMON_LIBS
 COMMON_LIBS  = m
Index: bcc32/Makefile.sub
===================================================================
--- bcc32/Makefile.sub	(revision 15389)
+++ bcc32/Makefile.sub	(revision 15390)
@@ -156,7 +156,7 @@
 MEMLIB =
 !endif
 LIBS = $(MEMLIB) cw32i.lib import32.lib ws2_32.lib $(EXTLIBS)
-MISSING = acosh.obj crypt.obj erf.obj strlcat.obj strlcpy.obj win32.obj
+MISSING = acosh.obj crypt.obj erf.obj lgamma_r.obj strlcat.obj strlcpy.obj tgamma.obj win32.obj
 
 !ifndef STACK
 STACK = 0x2000000
@@ -393,7 +393,7 @@
 s,@SET_MAKE@,MFLAGS = -$$(MAKEFLAGS),;t t
 s,@RM@,$$(top_srcdir:/=\)\win32\rm.bat,;t t
 s,@CP@,copy > nul,;t t
-s,@LIBOBJS@, acosh.obj crypt.obj erf.obj strlcat.obj strlcpy.obj win32.obj,;t t
+s,@LIBOBJS@, $(MISSING),;t t
 s,@ALLOCA@,$(ALLOCA),;t t
 s,@DEFAULT_KCODE@,$(DEFAULT_KCODE),;t t
 s,@EXEEXT@,.exe,;t t
Index: wince/Makefile.sub
===================================================================
--- wince/Makefile.sub	(revision 15389)
+++ wince/Makefile.sub	(revision 15390)
@@ -26,7 +26,8 @@
 !endif
 LIBS = coredll.lib ceshell.lib winsock.lib  $(EXTLIBS)
 MISSING = acosh.obj crypt.obj dup2.obj erf.obj hypot.obj \
-          isinf.obj isnan.obj strftime.obj strlcat.obj strlcpy.obj win32.obj \
+          isinf.obj isnan.obj lgamma.obj strftime.obj strlcat.obj strlcpy.obj
+          tgamma.obj win32.obj \
           assert.obj direct.obj errno.obj io_wce.obj process_wce.obj \
           signal_wce.obj stdio.obj stdlib.obj string_wce.obj \
           time_wce.obj wince.obj winsock2.obj \
Index: missing/lgamma_r.c
===================================================================
--- missing/lgamma_r.c	(revision 15389)
+++ missing/lgamma_r.c	(revision 15390)
@@ -51,8 +51,9 @@
         double i, f, s;
         f = modf(-x, &i);
         if (f == 0.0) {
+            static const double zero = 0.0;
             *signp = 1;
-            return 1.0/0.0;
+            return 1.0/zero;
         }
         *signp = (fmod(i, 2.0) != 0.0) ? 1 : -1;
         s = sin(PI * x);

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/