no.125.mils

一个内存数据库的源代码这是服务器端还有客户端

# >Number:         125
# >Category:       Module_math
# >Synopsis:       (almost) all functions of mmath return strange results on IRIX.
# >Confidential:   no
# >Severity:       serious
# >Priority:       medium
# >Responsible:    niels
# >State:          open
# >Class:          sw-bug
# >Submitter-Id:   unknown
# >Arrival-Date:   Fri Feb 27 16:36:42 1998
# >Originator:     manegold
# >Organization:
# >Release:        
# >Environment:
# IRIX
# >Description:
# (almost) all functions of mmath return strange results on IRIX.             
# 
# test script and output for both GNU=ON & GNU=OFF follow.
# 
#         stefan
# 
# ================================================================================
# test script (also available as 'testing/plain/mmath2/script.mil')
# --------------------------------------------------------------------------------
# setoid(oid(20000000));
# module(mmath);
# sin(dbl(0)).print();
# sin(M_PI_4).print();
# sin(M_PI_2).print();
# sin(M_PI).print();
# sin(3*M_PI_2).print();
# cos(dbl(0)).print();
# cos(M_PI_4).print();
# cos(M_PI_2).print();
# cos(M_PI).print();
# cos(3*M_PI_2).print();
# tan(dbl(0)).print();
# tan(M_PI_4).print();
# tan(M_PI_2).print();
# tan(M_PI).print();
# tan(3*M_PI_2).print();
# asin(dbl(-1)).print();
# asin(dbl(-0.5)).print();
# asin(dbl(0)).print();
# asin(dbl(0.5)).print();
# asin(dbl(1)).print();
# acos(dbl(-1)).print();
# acos(dbl(-0.5)).print();
# acos(dbl(0)).print();
# acos(dbl(0.5)).print();
# acos(dbl(1)).print();
# atan(dbl(-1)).print();
# atan(dbl(-0.5)).print();
# atan(dbl(0)).print();
# atan(dbl(0.5)).print();
# atan(dbl(1)).print();
# 
# asin(sin(M_PI)).print();
# acos(cos(M_PI)).print();
# atan(tan(M_PI_2)).print();
# atan(tan(M_PI_4)).print();
# sqrt(pow(dbl(2),dbl(2))).print();
# 
# exp(dbl(10)).print(); 
# log(dbl(10)).print();
# log10(dbl(10)).print();
# 
# ceil(dbl(1.2)).print();
# fabs(dbl(1.2)).print();
# floor(dbl(1.2)).print();
# fmod(dbl(15.2),dbl(2.5)).print();
# --------------------------------------------------------------------------------
# ================================================================================
# differences between SunOS5.5 and IRIX6.2                  compiled with GNU=ON
# --------------------------------------------------------------------------------
# --- .SunOS5.5/plain/mmath2/111.out      Fri Feb 27 16:00:24 1998
# +++ .IRIX6.2/plain/mmath2/111.out       Fri Feb 27 16:00:01 1998
# @@ -1,3 +1,3 @@
#  Statistics about the output of plain/mmath2:
# -  143 lines,  385 words,  3505 chars
# +  143 lines,  385 words,  3751 chars
# 
# @@ -8,3 +8,3 @@
#  Mcreatedb -db plain
# -Mcreatedb: processing database 'plain' in /ufs/manegold/programming/Monet/testing/.SunOS5.5/dbfarm/plain.
# +Mcreatedb: processing database 'plain' in /ufs/manegold/programming/Monet/testing/.IRIX6.2/dbfarm/plain.
#  Mcreatedb: calling 'Mserver -db plain' for the first time..
# @@ -68,3 +68,3 @@
#  sin(M_PI).print();
# -[ -0.000000 ]
# +[ 0.000000 ]
#  sin(3*M_PI_2).print();
# @@ -76,3 +76,3 @@
#  cos(M_PI_2).print();
# -[ -0.000000 ]
# +[ 0.000000 ]
#  cos(M_PI).print();
# @@ -82,62 +82,62 @@
#  tan(dbl(0)).print();
# -[ 0.000000 ]
# +[ 2080315712.000000 ]
#  tan(M_PI_4).print();
# -[ 1.000000 ]
# +[ 2080315712.000000 ]
#  tan(M_PI_2).print();
# -[ -22877332.428856 ]
# +[ 2080315712.000000 ]
#  tan(M_PI).print();
# -[ 0.000000 ]
# +[ 2080315712.000000 ]
#  tan(3*M_PI_2).print();
# -[ -7625777.476285 ]
# +[ 2080315712.000000 ]
#  asin(dbl(-1)).print();
# -[ -1.570796 ]
# +[ 2080315712.000000 ]
#  asin(dbl(-0.5)).print();
# -[ -0.523599 ]
# +[ 2080315712.000000 ]
#  asin(dbl(0)).print();
# -[ 0.000000 ]
# +[ 2080315712.000000 ]
#  asin(dbl(0.5)).print();
# -[ 0.523599 ]
# +[ 2080315712.000000 ]
#  asin(dbl(1)).print();
# -[ 1.570796 ]
# +[ 2080315712.000000 ]
#  acos(dbl(-1)).print();
# -[ 3.141593 ]
# +[ 2080315712.000000 ]
#  acos(dbl(-0.5)).print();
# -[ 2.094395 ]
# +[ 2080315712.000000 ]
#  acos(dbl(0)).print();
# -[ 1.570796 ]
# +[ 2080315712.000000 ]
#  acos(dbl(0.5)).print();
# -[ 1.047198 ]
# +[ 2080315712.000000 ]
#  acos(dbl(1)).print();
# -[ 0.000000 ]
# +[ 2080315712.000000 ]
#  atan(tan(M_PI_2)).print();
# -[ -1.570796 ]
# +[ 2080315712.000000 ]
#  atan(tan(M_PI_4)).print();
# -[ 0.785398 ]
# +[ 2080315712.000000 ]
#  sqrt(pow(dbl(2),dbl(2))).print();
# -[ 2.000000 ]
# +[ 45610.384256 ]
# 
#  exp(dbl(10)).print();
# -[ 22026.465795 ]
# +[ 2080315712.000000 ]
#  log(dbl(10)).print();
# -[ 2.302585 ]
# +[ 2080315712.000000 ]
#  log10(dbl(10)).print();
# -[ 1.000000 ]
# +[ 2080315712.000000 ]
# 
#  ceil(dbl(1.2)).print();
# -[ 2.000000 ]
# +[ 2080315712.000000 ]
#  fabs(dbl(1.2)).print();
# @@ -145,4 +145,4 @@
#  floor(dbl(1.2)).print();
# -[ 1.000000 ]
# +[ 2080315712.000000 ]
#  fmod(dbl(15.2),dbl(2.5)).print();
# -[ 0.200000 ]
# +[ 2080315712.000000 ]
# --------------------------------------------------------------------------------
# ================================================================================
# differences between SunOS5.5 and IRIX6.2                  compiled with GNU=OFF
# --------------------------------------------------------------------------------
# --- plain/mmath2/stable.out     Fri Feb 27 16:11:45 1998
# +++ .IRIX6.2/plain/mmath2/1998.02.27,16:51:37.out       Fri Feb 27 17:23:28 1998
# @@ -1,3 +1,3 @@
#  Statistics about the output of plain/mmath2:
# -  143 lines,  385 words,  3505 chars
# +  138 lines,  360 words,  3229 chars
#  
# @@ -7,7 +7,2 @@
#  
# -Mcreatedb -db plain
# -Mcreatedb: processing database 'plain' in /ufs/manegold/programming/Monet/testing/.SunOS5.5/dbfarm/plain.
# -Mcreatedb: calling 'Mserver -db plain' for the first time..
# -Mcreatedb: database 'plain' has been initialized succesfully!
# -
#  Mserver -db plain  script.mil
# @@ -68,3 +63,3 @@
#  sin(M_PI).print();
# -[ -0.000000 ]
# +[ 0.000000 ]
#  sin(3*M_PI_2).print();
# @@ -76,3 +71,3 @@
#  cos(M_PI_2).print();
# -[ -0.000000 ]
# +[ 0.000000 ]
#  cos(M_PI).print();
# @@ -82,3 +77,3 @@
#  tan(dbl(0)).print();
# -[ 0.000000 ]
# +[ 1.000000 ]
#  tan(M_PI_4).print();
# @@ -86,53 +81,53 @@
#  tan(M_PI_2).print();
# -[ -22877332.428856 ]
# +[ 1.000000 ]
#  tan(M_PI).print();
# -[ 0.000000 ]
# +[ 1.000000 ]
#  tan(3*M_PI_2).print();
# -[ -7625777.476285 ]
# +[ 1.000000 ]
#  asin(dbl(-1)).print();
# -[ -1.570796 ]
# +[ 1.000000 ]
#  asin(dbl(-0.5)).print();
# -[ -0.523599 ]
# +[ 1.000000 ]
#  asin(dbl(0)).print();
# -[ 0.000000 ]
# +[ 1.000000 ]
#  asin(dbl(0.5)).print();
# -[ 0.523599 ]
# +[ 1.000000 ]
#  asin(dbl(1)).print();
# -[ 1.570796 ]
# +[ 1.000000 ]
#  acos(dbl(-1)).print();
# -[ 3.141593 ]
# +[ 1.000000 ]
#  acos(dbl(-0.5)).print();
# -[ 2.094395 ]
# +[ 1.000000 ]
#  acos(dbl(0)).print();
# -[ 1.570796 ]
# +[ 1.000000 ]
#  acos(dbl(0.5)).print();
# -[ 1.047198 ]
# +[ 1.000000 ]
#  acos(dbl(1)).print();
# -[ 0.000000 ]
# +[ 1.000000 ]
#  atan(dbl(-1)).print();
# -[ -0.785398 ]
# +[ 1.000000 ]
#  atan(dbl(-0.5)).print();
# -[ -0.463648 ]
# +[ 1.000000 ]
#  atan(dbl(0)).print();
# -[ 0.000000 ]
# +[ 1.000000 ]
#  atan(dbl(0.5)).print();
# -[ 0.463648 ]
# +[ 1.000000 ]
#  atan(dbl(1)).print();
# -[ 0.785398 ]
# +[ 1.000000 ]
#  
#  asin(sin(M_PI)).print();
# -[ -0.000000 ]
# +[ 1.000000 ]
#  acos(cos(M_PI)).print();
# -[ 3.141593 ]
# +[ 1.000000 ]
#  atan(tan(M_PI_2)).print();
# -[ -1.570796 ]
# +[ 1.000000 ]
#  atan(tan(M_PI_4)).print();
# -[ 0.785398 ]
# +[ 1.000000 ]
#  sqrt(pow(dbl(2),dbl(2))).print();
# -[ 2.000000 ]
# +[ 1.000000 ]
#  
#  exp(dbl(10)).print();
# -[ 22026.465795 ]
# +[ 1.000000 ]
#  log(dbl(10)).print();
# -[ 2.302585 ]
# +[ 1.000000 ]
#  log10(dbl(10)).print();
# @@ -141,3 +136,3 @@
#  ceil(dbl(1.2)).print();
# -[ 2.000000 ]
# +[ 1.000000 ]
#  fabs(dbl(1.2)).print();
# @@ -147,2 +142,2 @@
#  fmod(dbl(15.2),dbl(2.5)).print();
# -[ 0.200000 ]
# +[ 1.000000 ]
# ================================================================================>How-To-Repeat:

setoid(oid(20000000));
module(mmath);
sin(dbl(0)).print();
sin(M_PI_4).print();
sin(M_PI_2).print();
sin(M_PI).print();
sin(3*M_PI_2).print();
cos(dbl(0)).print();
cos(M_PI_4).print();
cos(M_PI_2).print();
cos(M_PI).print();
cos(3*M_PI_2).print();
tan(dbl(0)).print();
tan(M_PI_4).print();
tan(M_PI_2).print();
tan(M_PI).print();
tan(3*M_PI_2).print();
asin(dbl(-1)).print();
asin(dbl(-0.5)).print();
asin(dbl(0)).print();
asin(dbl(0.5)).print();
asin(dbl(1)).print();
acos(dbl(-1)).print();
acos(dbl(-0.5)).print();
acos(dbl(0)).print();
acos(dbl(0.5)).print();
acos(dbl(1)).print();
atan(dbl(-1)).print();
atan(dbl(-0.5)).print();
atan(dbl(0)).print();
atan(dbl(0.5)).print();
atan(dbl(1)).print();

asin(sin(M_PI)).print();
acos(cos(M_PI)).print();
atan(tan(M_PI_2)).print();
atan(tan(M_PI_4)).print();
sqrt(pow(dbl(2),dbl(2))).print();

exp(dbl(10)).print();
log(dbl(10)).print();
log10(dbl(10)).print();

ceil(dbl(1.2)).print();
fabs(dbl(1.2)).print();
floor(dbl(1.2)).print();
fmod(dbl(15.2),dbl(2.5)).print();
quit();