File: cgen-fpu.c

package info (click to toggle)
gnat-gdb 5.3.gnat.0.0.20030225-8
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 75,144 kB
  • ctags: 101,348
  • sloc: ansic: 873,511; exp: 46,950; sh: 16,123; makefile: 11,757; yacc: 6,092; asm: 5,027; cpp: 4,044; perl: 2,624; lex: 877; sed: 550; lisp: 394; awk: 170; pascal: 57; java: 7; fortran: 5
file content (32 lines) | stat: -rw-r--r-- 491 bytes parent folder | download | duplicates (36) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
 
/* CGEN fpu support
   Copyright (C) 1999 Cygnus Solutions.  */

#include "sim-main.h"
#include "sim-fpu.h"

/* Return boolean indicating if X is an snan.  */

BI
cgen_sf_snan_p (CGEN_FPU* fpu, SF x)
{
  sim_fpu op1;

  sim_fpu_32to (&op1, x);
  return sim_fpu_is_nan (&op1);
}

BI
cgen_df_snan_p (CGEN_FPU* fpu, DF x)
{
  sim_fpu op1;

  sim_fpu_64to (&op1, x);
  return sim_fpu_is_nan (&op1);
}

/* No-op fpu error handler.  */

void
cgen_fpu_ignore_errors (CGEN_FPU* fpu, int status)
{
}