Article View: gnu.gcc.bug
Article #6253Resubmission of Bug Report
From: John R. Anderson
Date: Wed, 27 Dec 1995 00:00
Date: Wed, 27 Dec 1995 00:00
4943 lines
64225 bytes
64225 bytes
I have run into an apparent bug in gcc. I am running Linux 2.2
(That's what the box says, though Linux itself claims 1.2.8) on a
Packard Bell machine with a 75Mhz pentium processor and gcc version 2.6.3.
Here is what happened:
gcc -O2 -I''../h -DBSD=44 -c ../libplot3/plot3.c
gcc: Internal compiler error: program cc1 got fatal signal 11
*** Error code 1
I did get a clean compilation by removing the optimization
option, and also by specifying -O3. If you need any further info,
feel free to call me at (410)278-7267 or email me.
Here is the preprocessed code produced with "gcc -E -O2 -I''../h
-DBSD=44 -c ../libplot3/plot3.c":
# 1 "../libplot3/plot3.c"
static char RCSid[] = "@(#)$Header: /m/cad/libplot3/RCS/plot3.c,v 11.1 95/01/04 09:51:18 mike Rel4_4 $ (BRL)";
# 1 "../h/conf.h" 1
# 84 "../h/conf.h"
# 97 "../h/conf.h"
# 149 "../h/conf.h"
# 169 "../h/conf.h"
# 314 "../h/conf.h"
# 1 "/usr/include/sys/types.h" 1 3
# 1 "/usr/include/linux/types.h" 1 3
# 1 "/usr/include/asm/types.h" 1 3
typedef unsigned int size_t;
typedef int ssize_t;
typedef int ptrdiff_t;
typedef __signed__ char __s8;
typedef unsigned char __u8;
typedef __signed__ short __s16;
typedef unsigned short __u16;
typedef __signed__ long __s32;
typedef unsigned long __u32;
typedef __signed__ long long __s64;
typedef unsigned long long __u64;
# 55 "/usr/include/asm/types.h" 3
# 4 "/usr/include/linux/types.h" 2 3
typedef long time_t;
typedef long clock_t;
typedef int pid_t;
typedef unsigned short uid_t;
typedef unsigned short gid_t;
typedef unsigned short dev_t;
typedef unsigned long ino_t;
typedef unsigned short mode_t;
typedef unsigned short umode_t;
typedef unsigned short nlink_t;
typedef int daddr_t;
typedef long off_t;
typedef long long loff_t;
typedef unsigned char u_char;
typedef unsigned short u_short;
typedef unsigned int u_int;
typedef unsigned long u_long;
typedef unsigned char unchar;
typedef unsigned short ushort;
typedef unsigned int uint;
typedef unsigned long ulong;
typedef char *caddr_t;
typedef unsigned char cc_t;
typedef unsigned int speed_t;
typedef unsigned long tcflag_t;
typedef struct fd_set {
unsigned long fds_bits [8 ];
} fd_set;
struct ustat {
daddr_t f_tfree;
ino_t f_tinode;
char f_fname[6];
char f_fpack[6];
};
# 4 "/usr/include/sys/types.h" 2 3
typedef unsigned long fd_mask;
# 347 "../h/conf.h" 2
# 35 "../libplot3/plot3.c" 2
# 1 "/usr/include/stdio.h" 1 3
# 1 "/usr/include/features.h" 1 3
# 1 "/usr/include/sys/cdefs.h" 1 3
# 1 "/usr/include/features.h" 1 3
# 136 "/usr/include/features.h" 3
# 24 "/usr/include/sys/cdefs.h" 2 3
# 50 "/usr/include/sys/cdefs.h" 3
# 100 "/usr/include/sys/cdefs.h" 3
typedef long double __long_double_t;
# 128 "/usr/include/sys/cdefs.h" 3
# 134 "/usr/include/features.h" 2 3
# 31 "/usr/include/stdio.h" 2 3
# 1 "/usr/include/libio.h" 1 3
# 1 "/usr/include/_G_config.h" 1 3
typedef long _G_clock_t;
typedef unsigned short _G_dev_t;
typedef long int _G_fpos_t;
typedef unsigned short _G_gid_t;
typedef unsigned long _G_ino_t;
typedef unsigned short _G_mode_t;
typedef unsigned short _G_nlink_t;
typedef long _G_off_t;
typedef int _G_pid_t;
typedef int _G_ptrdiff_t;
typedef unsigned int _G_sigset_t;
typedef unsigned int _G_size_t;
typedef long _G_time_t;
typedef unsigned short _G_uid_t;
typedef long int _G_wchar_t;
typedef int _G_ssize_t;
typedef int _G_wint_t;
typedef void * _G_va_list;
typedef __signed char _G_int8_t;
typedef unsigned char _G_uint8_t;
typedef short _G_int16_t;
typedef unsigned short _G_uint16_t;
typedef long _G_int32_t;
typedef unsigned long _G_uint32_t;
typedef long long _G_int64_t;
typedef unsigned long long _G_uint64_t;
# 32 "/usr/include/libio.h" 2 3
# 53 "/usr/include/libio.h" 3
struct _IO_jump_t; struct _IO_FILE;
struct _IO_marker {
struct _IO_marker *_next;
struct _IO_FILE *_sbuf;
int _pos;
# 167 "/usr/include/libio.h" 3
};
struct _IO_FILE {
int _flags;
char* _IO_read_ptr;
char* _IO_read_end;
char* _IO_read_base;
char* _IO_write_base;
char* _IO_write_ptr;
char* _IO_write_end;
char* _IO_buf_base;
char* _IO_buf_end;
char *_IO_save_base;
char *_IO_backup_base;
char *_IO_save_end;
struct _IO_marker *_markers;
struct _IO_FILE *_chain;
struct _IO_jump_t *_jumps;
int _fileno;
int _blksize;
_G_off_t _offset;
unsigned short _cur_column;
char _unused;
char _shortbuf[1];
};
typedef struct _IO_FILE _IO_FILE;
struct _IO_FILE_plus;
extern struct _IO_FILE_plus _IO_stdin_, _IO_stdout_, _IO_stderr_;
extern int __underflow (_IO_FILE*) ;
extern int __uflow (_IO_FILE*) ;
extern int __overflow (_IO_FILE*, int) ;
extern unsigned __adjust_column (unsigned start, const char *line, int count) ;
extern int _IO_vfscanf (_IO_FILE*, const char*, _G_va_list , int*) ;
extern int _IO_vfprintf (_IO_FILE*, const char*, _G_va_list ) ;
extern _G_ssize_t _IO_padn (_IO_FILE *, int, _G_ssize_t ) ;
extern _G_size_t _IO_sgetn (_IO_FILE *, void*, _G_size_t ) ;
extern void _IO_free_backup_area (_IO_FILE*) ;
# 34 "/usr/include/stdio.h" 2 3
# 74 "/usr/include/stdio.h" 3
typedef struct _IO_FILE FILE;
typedef _G_fpos_t fpos_t;
extern FILE *stdin, *stdout, *stderr;
extern void clearerr (FILE*) ;
extern int fclose (FILE*) ;
extern int feof (FILE*) ;
extern int ferror (FILE*) ;
extern int fflush (FILE*) ;
extern int fgetc (FILE *) ;
extern int fgetpos (FILE* fp, fpos_t *pos) ;
extern char* fgets (char*, int, FILE*) ;
extern FILE* fopen (__const char*, __const char*) ;
extern int fprintf (FILE*, __const char* format, ...) ;
extern int fputc (int, FILE*) ;
extern int fputs (__const char *str, FILE *fp) ;
extern size_t fread (void*, size_t, size_t, FILE*) ;
extern FILE* freopen (__const char*, __const char*, FILE*) ;
extern int fscanf (FILE *fp, __const char* format, ...) ;
extern int fseek (FILE* fp, long int offset, int whence) ;
extern int fsetpos (FILE* fp, __const fpos_t *pos) ;
extern long int ftell (FILE* fp) ;
extern size_t fwrite (__const void*, size_t, size_t, FILE*) ;
extern int getc (FILE *) ;
extern int getchar (void) ;
extern char* gets (char*) ;
extern void perror (__const char *) ;
extern int printf (__const char* format, ...) ;
extern int putc (int, FILE *) ;
extern int putchar (int) ;
extern int puts (__const char *str) ;
extern int remove (__const char*) ;
extern int rename (__const char* _old, __const char* _new) ;
extern void rewind (FILE*) ;
extern int scanf (__const char* format, ...) ;
extern void setbuf (FILE*, char*) ;
extern void setlinebuf (FILE*) ;
extern void setbuffer (FILE*, char*, int) ;
extern int setvbuf (FILE*, char*, int mode, size_t size) ;
extern int sprintf (char*, __const char* format, ...) ;
extern int sscanf (__const char* string, __const char* format, ...) ;
extern FILE* tmpfile (void) ;
extern char* tmpnam (char*) ;
extern int ungetc (int c, FILE* fp) ;
extern int vfprintf (FILE *fp, char __const *fmt0, _G_va_list) ;
extern int vprintf (char __const *fmt, _G_va_list) ;
extern int vsprintf (char* string, __const char* format, _G_va_list) ;
extern int vfscanf (FILE*, __const char *, _G_va_list) ;
extern int vscanf (__const char *, _G_va_list) ;
extern int vsscanf (__const char *, __const char *, _G_va_list) ;
extern int getw (FILE*) ;
extern int putw (int, FILE*) ;
extern char* tempnam (__const char *__dir, __const char *__pfx) ;
extern int sys_nerr;
extern char *sys_errlist[];
extern int _sys_nerr;
extern char *_sys_errlist[];
extern void psignal (int __sig, __const char *__s) ;
extern _G_ssize_t getdelim (char **, size_t *, int, FILE*) ;
extern int snprintf (char *, size_t, const char *, ...) ;
extern int vsnprintf (char *, size_t, const char *, _G_va_list) ;
extern FILE *fdopen (int, __const char *) ;
extern int fileno (FILE*) ;
extern FILE* popen (__const char*, __const char*) ;
extern int pclose (FILE*) ;
extern int __underflow (struct _IO_FILE*) ;
extern int __overflow (struct _IO_FILE*, int) ;
# 37 "../libplot3/plot3.c" 2
# 1 "../h/machine.h" 1
# 252 "../h/machine.h"
# 277 "../h/machine.h"
# 302 "../h/machine.h"
# 326 "../h/machine.h"
# 349 "../h/machine.h"
# 376 "../h/machine.h"
# 395 "../h/machine.h"
# 417 "../h/machine.h"
# 443 "../h/machine.h"
# 469 "../h/machine.h"
# 488 "../h/machine.h"
# 499 "../h/machine.h"
# 521 "../h/machine.h"
# 547 "../h/machine.h"
typedef double fastf_t;
typedef long bitv_t;
typedef void *genptr_t;
# 39 "../libplot3/plot3.c" 2
# 1 "../h/vmath.h" 1
extern double sqrt(double);
typedef fastf_t mat_t[(4*4) ];
typedef fastf_t *matp_t;
typedef fastf_t vect_t[3 ];
typedef fastf_t *vectp_t;
typedef fastf_t point_t[3 ];
typedef fastf_t *pointp_t;
typedef fastf_t hvect_t[4 ];
typedef fastf_t hpoint_t[4 ];
typedef fastf_t plane_t[4 ];
# 366 "../h/vmath.h"
# 618 "../h/vmath.h"
# 628 "../h/vmath.h"
# 644 "../h/vmath.h"
# 698 "../h/vmath.h"
# 725 "../h/vmath.h"
# 748 "../h/vmath.h"
# 40 "../libplot3/plot3.c" 2
# 1 "../h/externs.h" 1
# 1 "/usr/include/sys/time.h" 1 3
# 1 "/usr/include/linux/time.h" 1 3
struct timeval {
long tv_sec;
long tv_usec;
};
struct timezone {
int tz_minuteswest;
int tz_dsttime;
};
# 25 "/usr/include/linux/time.h" 3
struct itimerval {
struct timeval it_interval;
struct timeval it_value;
};
# 6 "/usr/include/sys/time.h" 2 3
# 1 "/usr/include/time.h" 1 3
struct tm {
int tm_sec;
int tm_min;
int tm_hour;
int tm_mday;
int tm_mon;
int tm_year;
int tm_wday;
int tm_yday;
int tm_isdst;
};
extern char *tzname[2];
extern int daylight;
extern long int timezone;
extern int stime (time_t* __tptr) ;
extern clock_t clock (void) ;
extern time_t time (time_t * __tp) ;
extern double difftime (time_t __time2,
time_t __time1) __attribute__ ((const)) ;
extern time_t mktime (struct tm * __tp) ;
extern char * asctime (__const struct tm * __tp) ;
extern char * ctime (__const time_t * __tp) ;
extern size_t strftime (char * __s, size_t __smax,
__const char * __fmt, __const struct tm * __tp) ;
extern char * strptime (char * __s, __const char * __fmt,
struct tm * __tm) ;
extern void tzset (void) ;
extern struct tm* gmtime (__const time_t *__tp) ;
extern struct tm* localtime (__const time_t * __tp) ;
extern time_t timegm (struct tm *__tp) ;
extern time_t timelocal (struct tm *__tp) ;
# 32 "/usr/include/sys/time.h" 2 3
extern int __gettimeofday (struct timeval * __tp,
struct timezone * __tz) ;
extern int gettimeofday (struct timeval * __tp,
struct timezone * __tz) ;
extern int __settimeofday (__const struct timeval *__tv,
__const struct timezone *__tz) ;
extern int settimeofday (__const struct timeval *__tv,
__const struct timezone *__tz) ;
extern int __select (int __width, fd_set * __readfds,
fd_set * __writefds, fd_set * __exceptfds,
struct timeval * __timeout) ;
extern int select (int __width, fd_set * __readfds,
fd_set * __writefds, fd_set * __exceptfds,
struct timeval * __timeout) ;
extern int __getitimer (int __which,
struct itimerval *__value) ;
extern int getitimer (int __which,
struct itimerval *__value) ;
extern int __setitimer (int __which,
__const struct itimerval *__value,
struct itimerval *__ovalue) ;
extern int setitimer (int __which,
__const struct itimerval *__value,
struct itimerval *__ovalue) ;
extern int __adjtime (struct timeval * __itv,
struct timeval * __otv) ;
extern int adjtime (struct timeval * __itv,
struct timeval * __otv) ;
extern int __utimes (char *__path, struct timeval *tvp) ;
extern int utimes (char *__path, struct timeval *tvp) ;
# 34 "../h/externs.h" 2
# 1 "/usr/include/stdlib.h" 1 3
# 1 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 1 3
# 17 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 3
# 58 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 3
# 109 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 3
# 157 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 3
typedef long int wchar_t;
# 257 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 3
# 32 "/usr/include/stdlib.h" 2 3
# 1 "/usr/include/errno.h" 1 3
# 1 "/usr/include/linux/errno.h" 1 3
# 27 "/usr/include/errno.h" 2 3
extern int sys_nerr;
extern char *sys_errlist[];
extern int _sys_nerr;
extern char *_sys_errlist[];
extern int errno;
extern void perror (__const char* __s) ;
extern char* strerror (int __errno) ;
# 35 "/usr/include/stdlib.h" 2 3
# 1 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/float.h" 1 3
union __convert_long_double {
unsigned __convert_long_double_i[4];
long double __convert_long_double_d;
};
# 39 "/usr/include/stdlib.h" 2 3
typedef struct
{
int quot;
int rem;
} div_t;
typedef struct
{
long quot;
long rem;
} ldiv_t;
extern double atof (__const char *__nptr) ;
extern int atoi (__const char *__nptr) ;
extern long int atol (__const char *__nptr) ;
extern double strtod (__const char *__nptr, char **__endptr) ;
extern long int strtol (__const char *__nptr, char **__endptr,
int __base) ;
extern unsigned long int strtoul (__const char *__nptr,
char **__endptr, int __base) ;
extern __inline double atof (__const char *__nptr)
{ return strtod(__nptr, (char **) ((void *)0) ); }
extern __inline int atoi (__const char *__nptr)
{ return (int) strtol(__nptr, (char **) ((void *)0) , 10); }
extern __inline long int atol (__const char *__nptr)
{ return strtol(__nptr, (char **) ((void *)0) , 10); }
extern int rand (void) ;
extern void srand (unsigned int __seed) ;
extern long int __random (void) ;
extern void __srandom (unsigned int __seed) ;
extern void * __initstate (unsigned int __seed, void * __statebuf,
size_t __statelen) ;
extern void * __setstate (void * __statebuf) ;
extern long int random (void) ;
extern void srandom (unsigned int __seed) ;
extern void * initstate (unsigned int __seed, void * __statebuf,
size_t __statelen) ;
extern void * setstate (void * __statebuf) ;
extern __inline long int random()
{ return __random(); }
extern __inline void srandom(unsigned int __seed)
{ __srandom(__seed); }
extern __inline void * initstate (unsigned int __seed,
void * __statebuf, size_t __statelen)
{ return __initstate (__seed, __statebuf, __statelen); }
extern __inline void * setstate (void * __statebuf)
{ return __setstate (__statebuf); }
extern __inline int rand ()
{ return (int) __random(); }
extern __inline void srand(unsigned int __seed)
{ __srandom(__seed); }
extern void * malloc (size_t __size) ;
extern void * realloc (void * __ptr, size_t __size) ;
extern void * calloc (size_t __nmemb, size_t __size) ;
extern void free (void * __ptr) ;
extern void cfree (void * __ptr) ;
extern __inline void cfree (void * __ptr)
{ free (__ptr); }
static __inline void* __gnu_calloc (size_t __nmemb, size_t __n)
{
return calloc (__nmemb ? __nmemb : 1, __n ? __n : 1);
}
static __inline void* __gnu_malloc (size_t __n)
{
return malloc (__n ? __n : 1);
}
# 1 "/usr/include/alloca.h" 1 3
# 1 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 1 3
# 17 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 3
# 58 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 3
# 109 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 3
# 157 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 3
# 228 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 3
# 257 "/usr/lib/gcc-lib/i486-linux/2.6.3/include/stddef.h" 3
# 24 "/usr/include/alloca.h" 2 3
extern void * __alloca (size_t __size) ;
extern void * alloca (size_t __size) ;
# 236 "/usr/include/stdlib.h" 2 3
extern void * valloc(size_t __size);
extern void abort (void) __attribute__ ((noreturn)) ;
extern int atexit (void (*__func)(void)) ;
extern int on_exit (void (*__func)(int __status, void * __arg),
void * __arg) ;
extern void exit (int __status) __attribute__ ((noreturn)) ;
extern char *getenv (__const char *__name) ;
extern int putenv (__const char *__string) ;
extern int system (__const char *__command) ;
typedef int (*__compar_fn_t) (__const void *, __const void *) ;
extern void * bsearch (__const void * __key, __const void * __base,
size_t __nmemb, size_t __size,
__compar_fn_t __compar) ;
extern void qsort (void * __base, size_t __nmemb, size_t __size,
__compar_fn_t __compar) ;
extern int abs (int __x) __attribute__ ((const)) ;
extern long int labs (long int __x) __attribute__ ((const)) ;
extern div_t div(int __numer, int __denom) __attribute__ ((const)) ;
extern ldiv_t ldiv(long int __numer,
long int __denom) __attribute__ ((const)) ;
extern int mblen (__const char *__s, size_t __n) ;
extern int mbtowc (wchar_t *__pwc, __const char *__s, size_t __n) ;
extern int wctomb (char *__s, wchar_t __wchar) ;
extern __inline int mblen (__const char *__s, size_t __n)
{ return mbtowc((wchar_t *) ((void *)0) , __s, __n); }
extern size_t mbstowcs (wchar_t *__pwcs, __const char *__s, size_t __n) ;
extern size_t wcstombs (char *__s, __const wchar_t *__pwcs, size_t __n) ;
extern char **environ;
extern char **__environ;
extern void* memalign (size_t __alignment, size_t __size) ;
extern void* valloc (size_t __size) ;
extern char* ecvt (double __value, size_t __ndigit, int *__decpt,
int *__sign) ;
extern char* fcvt (double __value, size_t __ndigit, int *__decpt,
int *__sign) ;
extern char* gcvt (double __value, size_t __ndigit, char *__buf) ;
extern char* dtoa (double __d, int __mode, int __ndigits,
int *__decpt, int *__sign, char **__rve) ;
extern double drand48 (void) ;
extern double erand48 (unsigned short int __xsubi[3]) ;
extern long int lrand48 (void) ;
extern long int nrand48 (unsigned short int __xsubi[3]) ;
extern long int mrand48 (void) ;
extern long int jrand48 (unsigned short int __xsubi[3]) ;
extern void srand48 (long int __seedval) ;
extern unsigned short int
*seed48 (unsigned short int __seed16v[3]) ;
extern void lcong48 (unsigned short int __param[7]) ;
extern int setenv (__const char *__name, __const char *__value,
int __overwrite) ;
extern void unsetenv (__const char *__name) ;
struct qelem {
struct qelem *q_forw;
struct qelem *q_back;
char q_data[1];
};
extern void insque (struct qelem *__elem, struct qelem *__prev) ;
extern void remque (struct qelem *__elem) ;
# 80 "../h/externs.h" 2
# 159 "../h/externs.h"
extern void port_setlinebuf( FILE *fp );
# 1 "/usr/include/getopt.h" 1 3
extern char *optarg;
extern int optind;
extern int opterr;
extern int optopt;
struct option
{
const char *name;
int has_arg;
int *flag;
int val;
};
extern int getopt (int argc, char *const *argv, const char *shortopts);
extern int getopt_long (int argc, char *const *argv, const char *shortopts,
const struct option *longopts, int *longind);
extern int getopt_long_only (int argc, char *const *argv,
const char *shortopts,
const struct option *longopts, int *longind);
extern int _getopt_internal (int argc, char *const *argv,
const char *shortopts,
const struct option *longopts, int *longind,
int long_only);
# 173 "../h/externs.h" 2
extern char *re_comp( char *s );
extern int re_exec( char *s );
# 199 "../h/externs.h"
extern char *optarg;
extern int optind;
extern int opterr;
extern int errno;
extern int sys_nerr;
extern char * sys_errlist[];
extern char * sbrk();
extern int brk();
extern FILE *fdopen( int filedes, const char *type );
extern FILE *popen( const char *command, const char *type );
extern char *strdup(const char *s);
# 41 "../libplot3/plot3.c" 2
# 1 "../h/plot3.h" 1
extern void pl_point (FILE *plotfp, int x, int y) ;
extern void pl_line (FILE *plotfp, int fx, int fy, int tx, int ty) ;
extern void pl_linmod (FILE *plotfp, char *s) ;
extern void pl_move (FILE *plotfp, int x, int y) ;
extern void pl_cont (FILE *plotfp, int x, int y) ;
extern void pl_label (FILE *plotfp, char *s) ;
extern void pl_space (FILE *plotfp, int x1, int y1, int x2, int y2) ;
extern void pl_erase (FILE *plotfp) ;
extern void pl_circle (FILE *plotfp, int x, int y, int r) ;
extern void pl_arc (FILE *plotfp, int xc, int yc, int x1, int y1, int x2, int y2) ;
extern void pl_box (FILE *plotfp, int x1, int y1, int x2, int y2) ;
extern void pl_color (FILE *plotfp, int r, int g, int b) ;
extern void pl_flush (FILE *plotfp) ;
extern void pl_3space (FILE *plotfp, int x1, int y1, int z1, int x2, int y2, int z2) ;
extern void pl_3point (FILE *plotfp, int x, int y, int z) ;
extern void pl_3move (FILE *plotfp, int x, int y, int z) ;
extern void pl_3cont (FILE *plotfp, int x, int y, int z) ;
extern void pl_3line (FILE *plotfp, int x1, int y1, int z1, int x2, int y2, int z2) ;
extern void pl_3box (FILE *plotfp, int x1, int y1, int z1, int x2, int y2, int z2) ;
extern void pd_point (FILE *plotfp, double x, double y) ;
extern void pd_line (FILE *plotfp, double fx, double fy, double tx, double ty) ;
extern void pd_move (FILE *plotfp, double x, double y) ;
extern void pd_cont (FILE *plotfp, double x, double y) ;
extern void pd_space (FILE *plotfp, double x1, double y1, double x2, double y2) ;
extern void pd_circle (FILE *plotfp, double x, double y, double r) ;
extern void pd_arc (FILE *plotfp, double xc, double yc, double x1, double y1, double x2, double y2) ;
extern void pd_box (FILE *plotfp, double x1, double y1, double x2, double y2) ;
extern void pdv_3space (FILE *plotfp, vect_t min, vect_t max) ;
extern void pdv_3point (FILE *plotfp, vect_t pt) ;
extern void pdv_3move (FILE *plotfp, vect_t pt) ;
extern void pdv_3cont (FILE *plotfp, vect_t pt) ;
extern void pdv_3line (FILE *plotfp, vect_t a, vect_t b) ;
extern void pdv_3box (FILE *plotfp, vect_t a, vect_t b) ;
extern void pd_3space (FILE *plotfp, double x1, double y1, double z1, double x2, double y2, double z2) ;
extern void pd_3point (FILE *plotfp, double x, double y, double z) ;
extern void pd_3move (FILE *plotfp, double x, double y, double z) ;
extern void pd_3cont (FILE *plotfp, double x, double y, double z) ;
extern void pd_3line (FILE *plotfp, double x1, double y1, double z1, double x2, double y2, double z2) ;
extern void pd_3box (FILE *plotfp, double x1, double y1, double z1, double x2, double y2, double z2) ;
extern void tp_i2list (FILE *fp, int *x, int *y, int npoints) ;
extern void tp_2list (FILE *fp, double *x, double *y, int npoints) ;
extern void f2list (FILE **fpp, float *x, float *y,
int *n) ;
extern void tp_3list (FILE *fp, double *x, double *y, double *z,
int npoints) ;
extern void f3list (FILE **fpp, float *x, float *y,
float *z, int *n) ;
extern void tp_2mlist (FILE *fp, double *x, double *y, int npoints,
int flag, int mark, int interval, double size) ;
extern void f2mlst (FILE **fp, float *x, float *y,
int *np, int *flag, int *mark, int *interval,
float *size) ;
extern void tp_2marker (FILE *fp, int c, double x, double y, double scale) ;
extern void f2mark (FILE **fp, int *c, float *x,
float *y, float *scale) ;
extern void tp_3marker (FILE *fp, int c, double x, double y, double z,
double scale) ;
extern void f3mark (FILE **fp, int *c, float *x,
float *y, float *z, float *scale) ;
extern void tp_2number (FILE *fp, double input, int x, int y, int cscale,
double theta, int digits) ;
extern void f2numb (FILE **fp, float *input,
int *x, int *y, float *cscale, float *theta, int *digits) ;
extern void tp_scale (int idata[], int elements, int mode, int length,
int odata[], double *min, double *dx) ;
extern void fscale (int idata[], int *elements,
char *mode, int *length, int odata[], double *min,
double *dx) ;
extern void tp_2symbol (FILE *fp, char *string, double x, double y,
double scale, double theta) ;
extern void f2symb (FILE **fp, char *string,
float *x, float *y, float *scale, float *theta) ;
extern void tp_plot (FILE *fp, int xp, int yp, int xl, int yl,
char xtitle[], char ytitle[], float x[], float y[],
int n, double cscale) ;
extern void fplot (FILE **fp, int *xp, int *yp,
int *xl, int *yl, char *xtitle, char *ytitle,
float *x, float *y, int *n, float *cscale) ;
extern void tp_3axis (FILE *fp, char *string, point_t origin,
mat_t rot, double length, int ccw, int ndigits,
double label_start, double label_incr,
double tick_separation, double char_width) ;
extern void f3axis (FILE **fp, char *string,
float *x, float *y, float *z,
float *length, float *theta,
int *ccw, int *ndigits,
float *label_start, float *label_incr,
float *tick_separation, float *char_width) ;
extern void tp_3symbol (FILE *fp, char *string, point_t origin,
mat_t rot, double scale) ;
extern void tp_3vector (FILE *plotfp, point_t from, point_t to,
double fromheadfract, double toheadfract) ;
extern void f3vect (FILE **fp,
float *fx, float *fy, float *fz,
float *tx, float *ty, float *tz,
float *fl, float *tl) ;
# 42 "../libplot3/plot3.c" 2
void
pl_point( plotfp, x, y )
register FILE *plotfp;
int x, y;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'p' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'p' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y >>8) ))) ;
}
void
pl_line( plotfp, x1, y1, x2, y2 )
register FILE *plotfp;
int x1, y1, x2, y2;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'l' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'l' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x1 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x1 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x1 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x1 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y1 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y1 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y1 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y1 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x2 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x2 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x2 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x2 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y2 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y2 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y2 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y2 >>8) ))) ;
}
void
pl_linmod( plotfp, s )
register FILE *plotfp;
register char *s;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'f' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'f' ))) ;
while( *s )
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( *s++ )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( *s++ ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( '\n' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( '\n' ))) ;
}
void
pl_move( plotfp, x, y )
register FILE *plotfp;
int x, y;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'm' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'm' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y >>8) ))) ;
}
void
pl_cont( plotfp, x, y )
register FILE *plotfp;
int x, y;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'n' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'n' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y >>8) ))) ;
}
void
pl_label( plotfp, s )
register FILE *plotfp;
register char *s;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 't' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 't' ))) ;
while( *s )
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( *s++ )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( *s++ ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( '\n' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( '\n' ))) ;
}
void
pl_space( plotfp, x1, y1, x2, y2 )
register FILE *plotfp;
int x1, y1, x2, y2;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 's' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 's' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x1 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x1 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x1 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x1 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y1 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y1 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y1 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y1 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x2 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x2 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x2 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x2 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y2 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y2 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y2 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y2 >>8) ))) ;
}
void
pl_erase( plotfp )
register FILE *plotfp;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'e' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'e' ))) ;
}
void
pl_circle( plotfp, x, y, r )
register FILE *plotfp;
int x, y, r;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'c' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'c' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( r )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( r ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( r >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( r >>8) ))) ;
}
void
pl_arc( plotfp, xc, yc, x1, y1, x2, y2 )
register FILE *plotfp;
int xc, yc, x1, y1, x2, y2;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'a' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'a' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( xc )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( xc ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( xc >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( xc >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( yc )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( yc ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( yc >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( yc >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x1 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x1 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x1 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x1 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y1 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y1 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y1 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y1 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x2 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x2 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x2 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x2 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y2 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y2 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y2 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y2 >>8) ))) ;
}
void
pl_box( plotfp, x1, y1, x2, y2 )
register FILE *plotfp;
int x1, y1, x2, y2;
{
pl_move( plotfp, x1, y1 );
pl_cont( plotfp, x1, y2 );
pl_cont( plotfp, x2, y2 );
pl_cont( plotfp, x2, y1 );
pl_cont( plotfp, x1, y1 );
pl_move( plotfp, x2, y2 );
}
void
pl_color( plotfp, r, g, b )
register FILE *plotfp;
int r, g, b;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'C' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'C' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( r )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( r ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( g )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( g ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( b )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( b ))) ;
}
void
pl_flush( plotfp )
register FILE *plotfp;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'F' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'F' ))) ;
fflush( plotfp );
}
void
pl_3space( plotfp, x1, y1, z1, x2, y2, z2 )
register FILE *plotfp;
int x1, y1, z1, x2, y2, z2;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'S' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'S' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x1 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x1 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x1 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x1 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y1 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y1 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y1 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y1 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( z1 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( z1 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( z1 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( z1 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x2 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x2 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x2 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x2 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y2 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y2 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y2 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y2 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( z2 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( z2 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( z2 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( z2 >>8) ))) ;
}
void
pl_3point( plotfp, x, y, z )
register FILE *plotfp;
int x, y, z;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'P' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'P' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( z )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( z ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( z >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( z >>8) ))) ;
}
void
pl_3move( plotfp, x, y, z )
register FILE *plotfp;
int x, y, z;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'M' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'M' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( z )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( z ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( z >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( z >>8) ))) ;
}
void
pl_3cont( plotfp, x, y, z )
register FILE *plotfp;
int x, y, z;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'N' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'N' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( z )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( z ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( z >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( z >>8) ))) ;
}
void
pl_3line( plotfp, x1, y1, z1, x2, y2, z2 )
register FILE *plotfp;
int x1, y1, z1, x2, y2, z2;
{
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( 'L' )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( 'L' ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x1 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x1 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x1 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x1 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y1 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y1 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y1 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y1 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( z1 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( z1 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( z1 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( z1 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( x2 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( x2 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( x2 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( x2 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( y2 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( y2 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( y2 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( y2 >>8) ))) ;
((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( z2 )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( z2 ))) ; ((( plotfp )->_IO_write_ptr >= ( plotfp )->_IO_write_end) ? __overflow( plotfp , (unsigned char)( ( z2 >>8) )) : (unsigned char)(*( plotfp )->_IO_write_ptr++ = ( ( z2 >>8) ))) ;
}
void
pl_3box( plotfp, x1, y1, z1, x2, y2, z2 )
register FILE *plotfp;
int x1, y1, z1, x2, y2, z2;
{
pl_3move( plotfp, x1, y1, z1 );
pl_3cont( plotfp, x1, y2, z1 );
pl_3cont( plotfp, x1, y2, z2 );
pl_3cont( plotfp, x1, y1, z2 );
pl_3cont( plotfp, x1, y1, z1 );
pl_3cont( plotfp, x2, y1, z1 );
pl_3cont( plotfp, x2, y2, z1 );
pl_3cont( plotfp, x2, y2, z2 );
pl_3cont( plotfp, x2, y1, z2 );
pl_3cont( plotfp, x2, y1, z1 );
pl_3move( plotfp, x1, y2, z1 );
pl_3cont( plotfp, x2, y2, z1 );
pl_3move( plotfp, x1, y1, z2 );
pl_3cont( plotfp, x2, y1, z2 );
pl_3move( plotfp, x1, y2, z2 );
pl_3cont( plotfp, x2, y2, z2 );
}
void
pd_point( plotfp, x, y )
register FILE *plotfp;
double x, y;
{
double in[2];
char out[2*8+1];
in[0] = x;
in[1] = y;
htond( &out[1], in, 2 );
out[0] = 'x';
fwrite( out, 1, 2*8+1, plotfp );
}
void
pd_line( plotfp, x1, y1, x2, y2 )
register FILE *plotfp;
double x1, y1, x2, y2;
{
double in[4];
char out[4*8+1];
in[0] = x1;
in[1] = y1;
in[2] = x2;
in[3] = y2;
htond( &out[1], in, 4 );
out[0] = 'v';
fwrite( out, 1, 4*8+1, plotfp );
}
void
pd_move( plotfp, x, y )
register FILE *plotfp;
double x, y;
{
double in[2];
char out[2*8+1];
in[0] = x;
in[1] = y;
htond( &out[1], in, 2 );
out[0] = 'o';
fwrite( out, 1, 2*8+1, plotfp );
}
void
pd_cont( plotfp, x, y )
register FILE *plotfp;
double x, y;
{
double in[2];
char out[2*8+1];
in[0] = x;
in[1] = y;
htond( &out[1], in, 2 );
out[0] = 'q';
fwrite( out, 1, 2*8+1, plotfp );
}
void
pd_space( plotfp, x1, y1, x2, y2 )
register FILE *plotfp;
double x1, y1, x2, y2;
{
double in[4];
char out[4*8+1];
in[0] = x1;
in[1] = y1;
in[2] = x2;
in[3] = y2;
htond( &out[1], in, 4 );
out[0] = 'w';
fwrite( out, 1, 4*8+1, plotfp );
}
void
pd_circle( plotfp, x, y, r )
register FILE *plotfp;
double x, y, r;
{
double in[3];
char out[3*8+1];
in[0] = x;
in[1] = y;
in[2] = r;
htond( &out[1], in, 3 );
out[0] = 'i';
fwrite( out, 1, 3*8+1, plotfp );
}
void
pd_arc( plotfp, xc, yc, x1, y1, x2, y2 )
register FILE *plotfp;
double xc, yc, x1, y1, x2, y2;
{
double in[6];
char out[6*8+1];
in[0] = xc;
in[1] = yc;
in[2] = x1;
in[3] = y1;
in[4] = x2;
in[5] = y2;
htond( &out[1], in, 6 );
out[0] = 'r';
fwrite( out, 1, 6*8+1, plotfp );
}
void
pd_box( plotfp, x1, y1, x2, y2 )
register FILE *plotfp;
double x1, y1, x2, y2;
{
pd_move( plotfp, x1, y1 );
pd_cont( plotfp, x1, y2 );
pd_cont( plotfp, x2, y2 );
pd_cont( plotfp, x2, y1 );
pd_cont( plotfp, x1, y1 );
pd_move( plotfp, x2, y2 );
}
void
pdv_3space( plotfp, min, max )
register FILE *plotfp;
vect_t min;
vect_t max;
{
char out[6*8+1];
htond( &out[1], min, 3 );
htond( &out[3*8+1], max, 3 );
out[0] = 'W';
fwrite( out, 1, 6*8+1, plotfp );
}
void
pd_3space( plotfp, x1, y1, z1, x2, y2, z2 )
register FILE *plotfp;
double x1, y1, z1, x2, y2, z2;
{
double in[6];
char out[6*8+1];
in[0] = x1;
in[1] = y1;
in[2] = z1;
in[3] = x2;
in[4] = y2;
in[5] = z2;
htond( &out[1], in, 6 );
out[0] = 'W';
fwrite( out, 1, 6*8+1, plotfp );
}
void
pdv_3point( plotfp, pt )
register FILE *plotfp;
vect_t pt;
{
char out[3*8+1];
htond( &out[1], pt, 3 );
out[0] = 'X';
fwrite( out, 1, 3*8+1, plotfp );
}
void
pd_3point( plotfp, x, y, z )
register FILE *plotfp;
double x, y, z;
{
double in[3];
char out[3*8+1];
in[0] = x;
in[1] = y;
in[2] = z;
htond( &out[1], in, 3 );
out[0] = 'X';
fwrite( out, 1, 3*8+1, plotfp );
}
void
pdv_3move( plotfp, pt )
register FILE *plotfp;
vect_t pt;
{
char out[3*8+1];
htond( &out[1], pt, 3 );
out[0] = 'O';
fwrite( out, 1, 3*8+1, plotfp );
}
void
pd_3move( plotfp, x, y, z )
register FILE *plotfp;
double x, y, z;
{
double in[3];
char out[3*8+1];
in[0] = x;
in[1] = y;
in[2] = z;
htond( &out[1], in, 3 );
out[0] = 'O';
fwrite( out, 1, 3*8+1, plotfp );
}
void
pdv_3cont( plotfp, pt )
register FILE *plotfp;
vect_t pt;
{
char out[3*8+1];
htond( &out[1], pt, 3 );
out[0] = 'Q';
fwrite( out, 1, 3*8+1, plotfp );
}
void
pd_3cont( plotfp, x, y, z )
register FILE *plotfp;
double x, y, z;
{
double in[3];
char out[3*8+1];
in[0] = x;
in[1] = y;
in[2] = z;
htond( &out[1], in, 3 );
out[0] = 'Q';
fwrite( out, 1, 3*8+1, plotfp );
}
void
pdv_3line( plotfp, a, b )
register FILE *plotfp;
vect_t a, b;
{
char out[6*8+1];
htond( &out[1], a, 3 );
htond( &out[3*8+1], b, 3 );
out[0] = 'V';
fwrite( out, 1, 6*8+1, plotfp );
}
void
pd_3line( plotfp, x1, y1, z1, x2, y2, z2 )
register FILE *plotfp;
double x1, y1, z1, x2, y2, z2;
{
double in[6];
char out[6*8+1];
in[0] = x1;
in[1] = y1;
in[2] = z1;
in[3] = x2;
in[4] = y2;
in[5] = z2;
htond( &out[1], in, 6 );
out[0] = 'V';
fwrite( out, 1, 6*8+1, plotfp );
}
void
pdv_3box( plotfp, a, b )
register FILE *plotfp;
vect_t a, b;
{
pd_3move( plotfp, a[0 ], a[1 ], a[2 ] );
pd_3cont( plotfp, a[0 ], b[1 ], a[2 ] );
pd_3cont( plotfp, a[0 ], b[1 ], b[2 ] );
pd_3cont( plotfp, a[0 ], a[1 ], b[2 ] );
pd_3cont( plotfp, a[0 ], a[1 ], a[2 ] );
pd_3cont( plotfp, b[0 ], a[1 ], a[2 ] );
pd_3cont( plotfp, b[0 ], b[1 ], a[2 ] );
pd_3cont( plotfp, b[0 ], b[1 ], b[2 ] );
pd_3cont( plotfp, b[0 ], a[1 ], b[2 ] );
pd_3cont( plotfp, b[0 ], a[1 ], a[2 ] );
pd_3move( plotfp, a[0 ], b[1 ], a[2 ] );
pd_3cont( plotfp, b[0 ], b[1 ], a[2 ] );
pd_3move( plotfp, a[0 ], a[1 ], b[2 ] );
pd_3cont( plotfp, b[0 ], a[1 ], b[2 ] );
pd_3move( plotfp, a[0 ], b[1 ], b[2 ] );
pd_3cont( plotfp, b[0 ], b[1 ], b[2 ] );
}
void
pd_3box( plotfp, x1, y1, z1, x2, y2, z2 )
register FILE *plotfp;
double x1, y1, z1, x2, y2, z2;
{
pd_3move( plotfp, x1, y1, z1 );
pd_3cont( plotfp, x1, y2, z1 );
pd_3cont( plotfp, x1, y2, z2 );
pd_3cont( plotfp, x1, y1, z2 );
pd_3cont( plotfp, x1, y1, z1 );
pd_3cont( plotfp, x2, y1, z1 );
pd_3cont( plotfp, x2, y2, z1 );
pd_3cont( plotfp, x2, y2, z2 );
pd_3cont( plotfp, x2, y1, z2 );
pd_3cont( plotfp, x2, y1, z1 );
pd_3move( plotfp, x1, y2, z1 );
pd_3cont( plotfp, x2, y2, z1 );
pd_3move( plotfp, x1, y1, z2 );
pd_3cont( plotfp, x2, y1, z2 );
pd_3move( plotfp, x1, y2, z2 );
pd_3cont( plotfp, x2, y2, z2 );
}
Technical Details
Message-ID:
<9512270816.aa11702@wolf.arl.mil>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailShow Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 113d02,c249033dc6b021bc,start X-Google-Attributes: gid113d02,public From: jra@arl.mil (John R. Anderson) Subject: Resubmission of Bug Report Date: 1995/12/27 Message-ID: <9512270816.aa11702@wolf.arl.mil> X-Deja-AN: 122960375 distribution: gnu sender: daemon@cis.ohio-state.edu organization: GNUs Not Usenet newsgroups: gnu.gcc.bug