(root)/
tar-1.35/
gnu/
itold.c
       1  /* Replacement for 'int' to 'long double' conversion routine.
       2     Copyright (C) 2011-2023 Free Software Foundation, Inc.
       3     Written by Bruno Haible <bruno@clisp.org>, 2011.
       4  
       5     This file is free software: you can redistribute it and/or modify
       6     it under the terms of the GNU Lesser General Public License as
       7     published by the Free Software Foundation; either version 2.1 of the
       8     License, or (at your option) any later version.
       9  
      10     This file 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 <https://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  }