02111-1307, USA. */
#include <config.h>
+#include "output.h"
#include <assert.h>
#include <stdlib.h>
#include <stdio.h>
#include <errno.h>
#include <ctype.h>
#include "alloc.h"
-#include "approx.h"
+#include "devind.h"
#include "error.h"
#include "filename.h"
+#include "htmlP.h"
#include "lexer.h"
#include "misc.h"
-#include "output.h"
#include "settings.h"
#include "str.h"
/* A set of OUTP_DEV_* bits indicating the devices that are
disabled. */
-int disabled_devices;
+static int disabled_devices;
static void destroy_driver (struct outp_driver *);
static void configure_driver (char *);
/* Looks for a macro with key KEY, and returns the corresponding value
if found, or NULL if not. */
-const char *
+static const char *
find_defn_value (const char *key)
{
static char buf[INT_DIGITS + 1];
return d->value;
if (!strcmp (key, "viewwidth"))
{
- sprintf (buf, "%d", set_viewwidth);
+ sprintf (buf, "%d", get_viewwidth());
return buf;
}
else if (!strcmp (key, "viewlength"))
{
- sprintf (buf, "%d", set_viewlength);
+ sprintf (buf, "%d", get_viewlength());
return buf;
}
else
extern struct outp_class postscript_class;
extern struct outp_class epsf_class;
#endif
-#if !NO_HTML
extern struct outp_class html_class;
-#endif
+ extern struct outp_class devind_class;
char def[] = "default";
add_class (&epsf_class);
add_class (&postscript_class);
#endif
+ add_class (&devind_class);
add_class (&ascii_class);
add_name (def, &def[strlen (def)], OUTP_S_INIT_FILE);
/* Destroys all the drivers in driver list *DL and sets *DL to
NULL. */
-void
+static void
destroy_list (struct outp_driver ** dl)
{
struct outp_driver *d, *next;
void
outp_list_classes (void)
{
- int width = set_viewwidth;
+ int width = get_viewwidth();
struct outp_driver_class_list *c;
printf (_("Driver classes:\n\t"));
if ((int) strlen (c->class->name) + 1 > width)
{
printf ("\n\t");
- width = set_viewwidth - 8;
+ width = get_viewwidth() - 8;
}
else
putc (' ', stdout);
break;
default:
msg (IS, _("Syntax error in string constant."));
+ continue;
}
ds_putchar (&op_tokstr, (unsigned char) c);
}
if (c <= 0.0 || ptail == s)
goto lossage;
s = ptail;
- if (approx_eq (c, 0.0))
+ if (c == 0.0)
goto lossage;
if (value > 0)
value += b / c;
double b;
s = &ptail[1];
b = strtod (s, &ptail);
- if (approx_le (b, 0.0) || ptail == s)
+ if (b <= 0.0 || ptail == s)
goto lossage;
s = ptail;
value /= b;
ptail += 2;
value *= factor;
}
- if (approx_lt (value, 0.0))
+ if (value <= 0.0)
goto lossage;
if (tail)
*tail = ptail;