Files
Arquivotheca.Solaris-2.5/lib/libplot/vt0/dot.c
seta75D 7c4988eac0 Init
2021-10-11 19:38:01 -03:00

22 lines
511 B
C
Executable File

/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/* All Rights Reserved */
/* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T */
/* The copyright notice above does not evidence any */
/* actual or intended publication of such source code. */
#ident "@(#)dot.c 1.5 92/07/14 SMI" /* SVr4.0 1.2 */
extern vti;
dot(xi,yi,dx,n,pat)
int pat[];
{
struct {char pad,c; int xi,yi,dx;} p;
p.c = 7;
p.xi = xsc(xi);
p.yi = ysc(yi);
p.dx = xsc(dx);
write(vti,&p.c,7);
write(vti,pat,n?n&0377:256);
}