xref: /netbsd-src/tests/usr.bin/xlint/lint1/d_c99_complex_num.c (revision b2baa50111d645353fa30b4deab0f79d93650c8c)
1*b2baa501Srillig /*	$NetBSD: d_c99_complex_num.c,v 1.3 2023/03/28 14:44:34 rillig Exp $	*/
2aadcb6a6Srillig # 3 "d_c99_complex_num.c"
3aadcb6a6Srillig 
4*b2baa501Srillig /* lint1-extra-flags: -X 351 */
5*b2baa501Srillig 
628604916Sjruoho double cabs(double _Complex);
728604916Sjruoho 
cabs(double _Complex foo)828604916Sjruoho double cabs(double _Complex foo)
928604916Sjruoho {
1028604916Sjruoho 	double d = __real__ foo;
1128604916Sjruoho 	return d + 0.1fi;
1228604916Sjruoho }
13