v08i032: JetRoff DWB troff to HP postprocessor - Patch03

[Brandon S. Allbery - comp.sources.misc]

Posting-number: Volume 8, Issue 32
Submitted-by: jetroff at pcrat.UUCP (JetRoff Mail)
Archive-name: jetroff/patch03

JetRoff Usenet version 1.1 Patch 03. 03/08/89.

This patch fixes a small problem with the XENIX/286 compiler.
It also deletes the changes for decipoint positioning,
which aren't needed for the 'Plus.

Apply this patch this way:

	cd root_of_JetRoff_source
	patch -p <Patch03

Here are the diffs:

*** ../1.1.2/djet/out.c	Wed Mar  8 20:56:38 1989
--- djet/out.c	Wed Mar  8 21:01:26 1989
***************
*** 50,56
   *	hp_pos(x, y)
   *
   *		HP movement.
!  *		If -DSERIES=1, use decipoint positioning, else use dots.
   */
  static int hpx;
  static int hpy;

--- 50,56 -----
   *	hp_pos(x, y)
   *
   *		HP movement.
!  *		If -DDECIPOINT, use decipoint positioning, else use dots.
   */
  static int hpx;
  static int hpy;
***************
*** 72,78
  	register int	delta;
  	register int	deltalen;
  
! #	if SERIES == 1
  		here *= 12; here /= 5;
  		there *= 12; there /= 5;
  #	endif

--- 72,78 -----
  	register int	delta;
  	register int	deltalen;
  
! #	ifdef DECIPOINT	/* not a series II or a plus */
  		here *= 12; here /= 5;
  		there *= 12; there /= 5;
  #	endif
***************
*** 112,118
  	if (x == hpx)
  	{
  		if (y == hpy) return;
! #		if SERIES == 1
  			Printf("\033&a%sV", best_way_there(bufy, hpy, y));
  #		else
  			Printf("\033*p%sY", best_way_there(bufy, hpy, y));

--- 112,118 -----
  	if (x == hpx)
  	{
  		if (y == hpy) return;
! #		ifdef DECIPOINT	/* not a series II or a plus */
  			Printf("\033&a%sV", best_way_there(bufy, hpy, y));
  #		else
  			Printf("\033*p%sY", best_way_there(bufy, hpy, y));
***************
*** 120,126
  	}
  	else if (y == hpy)
  	{
! #		if SERIES == 1
  			Printf("\033&a%sH", best_way_there(bufx, hpx, x));
  #		else
  			Printf("\033*p%sX", best_way_there(bufx, hpx, x));

--- 120,126 -----
  	}
  	else if (y == hpy)
  	{
! #		ifdef DECIPOINT	/* not a series II or a plus */
  			Printf("\033&a%sH", best_way_there(bufx, hpx, x));
  #		else
  			Printf("\033*p%sX", best_way_there(bufx, hpx, x));
***************
*** 128,134
  	}
  	else
  	{
! #		if SERIES == 1
  			Printf("\033&a%sh%sV",
  				best_way_there(bufx, hpx, x),
  				best_way_there(bufy, hpy, y));

--- 128,134 -----
  	}
  	else
  	{
! #		ifdef DECIPOINT	/* not a series II or a plus */
  			Printf("\033&a%sh%sV",
  				best_way_there(bufx, hpx, x),
  				best_way_there(bufy, hpy, y));
*** ../1.1.2/djet/pk16.c	Wed Mar  8 20:56:41 1989
--- djet/pk16.c	Wed Mar  8 21:01:51 1989
***************
*** 508,514
  	ljbyte(fp, SPACING_PROPORTIONAL);
  	ljshort(fp, SYMBOLSET_HP_ROMAN8);
  	ljshort(fp, p->cellwidth * 4);	/* default pitch??? */
! 	height = ((p->design_size/(1<<18))*p->vppp*4)/(1<<18);
  	ljshort(fp, (short) height);
  	ljshort(fp, 0);
  	ljbyte(fp, WIDTH_NORMAL);

--- 508,514 -----
  	ljbyte(fp, SPACING_PROPORTIONAL);
  	ljshort(fp, SYMBOLSET_HP_ROMAN8);
  	ljshort(fp, p->cellwidth * 4);	/* default pitch??? */
! 	height = ((p->design_size/(1L<<18L))*p->vppp*4)/(1L<<18L);
  	ljshort(fp, (short) height);
  	ljshort(fp, 0);
  	ljbyte(fp, WIDTH_NORMAL);
-- 
Rick Richardson | JetRoff "di"-troff to LaserJet Postprocessor|uunet!pcrat!dry2
PC Research,Inc.| Mail: uunet!pcrat!jetroff; For anon uucp do:|for Dhrystone 2
uunet!pcrat!rick| uucp jetroff!~jetuucp/file_list ~nuucp/.    |submission forms.
jetroff Wk2200-0300,Sa,Su ACU {2400,PEP} 12013898963 "" \d\r\d ogin: jetuucp