1 /* numconst.h                                      -*- mode:c; coding:utf-8; -*-
2  *
3  *   Copyright (c) 2010-2021  Takashi Kato <ktakashi@ymail.com>
4  *
5  *   Redistribution and use in source and binary forms, with or without
6  *   modification, are permitted provided that the following conditions
7  *   are met:
8  *
9  *   1. Redistributions of source code must retain the above copyright
10  *      notice, this list of conditions and the following disclaimer.
11  *
12  *   2. Redistributions in binary form must reproduce the above copyright
13  *      notice, this list of conditions and the following disclaimer in the
14  *      documentation and/or other materials provided with the distribution.
15  *
16  *   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
17  *   "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
18  *   LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
19  *   A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
20  *   OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
21  *   SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
22  *   TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
23  *   PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
24  *   LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
25  *   NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
26  *   SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27  *
28  *  $Id: $
29  */
30 #ifndef SAGITTARIUS_PRIVATE_NUMCONST_H_
31 #define SAGITTARIUS_PRIVATE_NUMCONST_H_
32 
33 #include "sagittariusdefs.h"
34 
35 SG_CDECL_BEGIN
36 SG_EXTERN SgObject Sg__ConstObjes[]; /* initialized in number.c */
37 SG_CDECL_END
38 
39 #define SG_2_52               (Sg__ConstObjes[0]) /* 2^52 */
40 #define SG_2_53               (Sg__ConstObjes[1]) /* 2^53 */
41 #define SG_POSITIVE_INFINITY  (Sg__ConstObjes[2]) /* #i1/0 */
42 #define SG_NEGATIVE_INFINITY  (Sg__ConstObjes[3]) /* #i-1/0 */
43 #define SG_NAN                (Sg__ConstObjes[4]) /* #<nan> */
44 #define SG_FL_POSITIVE_ZERO   (Sg__ConstObjes[5]) /* 0.0 */
45 #define SG_FL_NEGATIVE_ZERO   (Sg__ConstObjes[6]) /* -0.0 */
46 #define SG_FL_POSITIVE_ONE    (Sg__ConstObjes[7]) /* 1.0 */
47 #define SG_FL_NEGATIVE_ONE    (Sg__ConstObjes[8]) /* -1.0 */
48 #define SG_NUM_CONST_OBJS 9
49 
50 #endif /* SAGITTARIUS_NUMCONST_H_ */
51 
52 /*
53   end of file
54   Local Variables:
55   coding: utf-8-unix
56   End
57 */
58