forked from Imagelibrary/rtems
9b4422a251
Script does what is expected and tries to do it as smartly as possible. + remove occurrences of two blank comment lines next to each other after Id string line removed. + remove entire comment blocks which only exited to contain CVS Ids + If the processing left a blank line at the top of a file, it was removed.
57 lines
1008 B
C
57 lines
1008 B
C
/*
|
|
* COPYRIGHT (c) 2009.
|
|
* On-Line Applications Research Corporation (OAR).
|
|
*
|
|
* Copyright (c) 2011 Ralf Corsépius, Ulm, Germany.
|
|
*
|
|
* The license and distribution terms for this file may be
|
|
* found in the file LICENSE in this distribution or at
|
|
* http://www.rtems.com/license/LICENSE.
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include <errno.h>
|
|
#include <stdlib.h>
|
|
#include <math.h>
|
|
|
|
#include <rtems/stringto.h>
|
|
|
|
/*
|
|
* Instantiate an error checking wrapper for strtof (float)
|
|
*/
|
|
|
|
rtems_status_code rtems_string_to_float (
|
|
const char *s,
|
|
float *n,
|
|
char **endptr
|
|
)
|
|
{
|
|
float result;
|
|
char *end;
|
|
|
|
if ( !n )
|
|
return RTEMS_INVALID_ADDRESS;
|
|
|
|
errno = 0;
|
|
*n = 0;
|
|
|
|
result = strtof( s, &end );
|
|
|
|
if ( endptr )
|
|
*endptr = end;
|
|
|
|
if ( end == s )
|
|
return RTEMS_NOT_DEFINED;
|
|
|
|
if ( ( errno == ERANGE ) &&
|
|
(( result == 0 ) || ( result == HUGE_VALF ) || ( result == -HUGE_VALF )))
|
|
return RTEMS_INVALID_NUMBER;
|
|
|
|
*n = result;
|
|
|
|
return RTEMS_SUCCESSFUL;
|
|
}
|