Add some builtins
This commit is contained in:
parent
4730dabc79
commit
31ce3096fd
|
@ -1,4 +1,4 @@
|
||||||
/* $NetBSD: main1.c,v 1.21 2013/04/19 17:43:05 christos Exp $ */
|
/* $NetBSD: main1.c,v 1.22 2014/04/18 01:15:07 christos Exp $ */
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Copyright (c) 1994, 1995 Jochen Pohl
|
* Copyright (c) 1994, 1995 Jochen Pohl
|
||||||
|
@ -37,7 +37,7 @@
|
||||||
|
|
||||||
#include <sys/cdefs.h>
|
#include <sys/cdefs.h>
|
||||||
#if defined(__RCSID) && !defined(lint)
|
#if defined(__RCSID) && !defined(lint)
|
||||||
__RCSID("$NetBSD: main1.c,v 1.21 2013/04/19 17:43:05 christos Exp $");
|
__RCSID("$NetBSD: main1.c,v 1.22 2014/04/18 01:15:07 christos Exp $");
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#include <sys/types.h>
|
#include <sys/types.h>
|
||||||
|
@ -128,7 +128,11 @@ sig_atomic_t fpe;
|
||||||
|
|
||||||
static void usage(void);
|
static void usage(void);
|
||||||
|
|
||||||
int main(int, char *[]);
|
static const char builtins[] =
|
||||||
|
"int __builtin_isinf(long double);\n"
|
||||||
|
"int __builtin_isnan(long double);\n"
|
||||||
|
"int __builtin_copysign(long double, long double);\n"
|
||||||
|
;
|
||||||
|
|
||||||
/*ARGSUSED*/
|
/*ARGSUSED*/
|
||||||
static void
|
static void
|
||||||
|
@ -203,9 +207,6 @@ main(int argc, char *argv[])
|
||||||
if (argc != 2)
|
if (argc != 2)
|
||||||
usage();
|
usage();
|
||||||
|
|
||||||
/* open the input file */
|
|
||||||
if ((yyin = fopen(argv[0], "r")) == NULL)
|
|
||||||
err(1, "cannot open '%s'", argv[0]);
|
|
||||||
|
|
||||||
/* initialize output */
|
/* initialize output */
|
||||||
outopen(argv[1]);
|
outopen(argv[1]);
|
||||||
|
@ -219,6 +220,13 @@ main(int argc, char *argv[])
|
||||||
initscan();
|
initscan();
|
||||||
initmtab();
|
initmtab();
|
||||||
|
|
||||||
|
if ((yyin = fmemopen(__UNCONST(builtins), sizeof(builtins) - 1, "r"))
|
||||||
|
== NULL)
|
||||||
|
err(1, "cannot open builtins");
|
||||||
|
yyparse();
|
||||||
|
/* open the input file */
|
||||||
|
if ((yyin = fopen(argv[0], "r")) == NULL)
|
||||||
|
err(1, "cannot open '%s'", argv[0]);
|
||||||
yyparse();
|
yyparse();
|
||||||
|
|
||||||
/* Following warnings cannot be suppressed by LINTED */
|
/* Following warnings cannot be suppressed by LINTED */
|
||||||
|
|
Loading…
Reference in New Issue