Home | History | Annotate | Line # | Download | only in lint1
d_c99_complex_split.c revision 1.4
      1  1.4    rillig /*	$NetBSD: d_c99_complex_split.c,v 1.4 2021/01/31 14:57:28 rillig Exp $	*/
      2  1.3    rillig # 3 "d_c99_complex_split.c"
      3  1.3    rillig 
      4  1.4    rillig int
      5  1.4    rillig b(double a)
      6  1.4    rillig {
      7  1.2  christos 	return a == 0;
      8  1.2  christos }
      9  1.4    rillig 
     10  1.4    rillig void
     11  1.4    rillig a(void)
     12  1.4    rillig {
     13  1.4    rillig 	double _Complex z = 0;
     14  1.4    rillig 	if (b(__real__ z) && b(__imag__ z))
     15  1.4    rillig 		return;
     16  1.1  christos }
     17