defconst, defvar: proclaim special at compile-time
[bpt/guile.git] / lib / itold.c
1 /* Replacement for 'int' to 'long double' conversion routine.
2 Copyright (C) 2011-2014 Free Software Foundation, Inc.
3 Written by Bruno Haible <bruno@clisp.org>, 2011.
4
5 This program is free software: you can redistribute it and/or modify
6 it under the terms of the GNU Lesser General Public License as published by
7 the Free Software Foundation; either version 3 of the License, or
8 (at your option) any later version.
9
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public License
16 along with this program. If not, see <http://www.gnu.org/licenses/>. */
17
18 #include <config.h>
19
20 /* Specification. */
21 #include <float.h>
22
23 void
24 _Qp_itoq (long double *result, int a)
25 {
26 /* Convert from 'int' to 'double', then from 'double' to 'long double'. */
27 *result = (double) a;
28 }