MicroEMACS & Terminals with "SG=..." - (nf)
res at exunido.UUCP
res at exunido.UUCP
Wed Nov 12 20:01:00 AEST 1986
MicroEMACS 3.7 and Terminal with "sg="
This is a patch for the MicroEMACS 3.7. Terminals that need one or
more character spaces for the "standout-switches" wouldn't run with
the std. sources. This patch let your ue work with this terminals if
you compile with "-DBANDO".
This was a "quick" hack, it may work incorrect sometimes. If you can
locate the problem, please report to me.
Ralf E. Stranzenbach
University of Dortmund, Western Germany
[res at unido.uucp]
-----<cut here>----------<cut here>----------<cut here>----------<cut here>-----
---> Thats for "tcap.c"
41d40
< int SG;
43d41
<
98,100d95
<
< if((SG = tgetnum("sg"))<0)
< SG = 0;
-----<cut here>----------<cut here>----------<cut here>----------<cut here>-----
---> Thats for "display.c"
13,15d12
< /* import termcap "sg" entry */
< extern int SG;
<
646,648d642
< #ifdef BANDO
< int revcor; /* Correction factor for reverse lines */
< #endif
672d665
<
674,677d666
< #ifdef BANDO
< {
< revcor = 2*SG;
< #endif
679,683d667
< #ifdef BANDO
< }
< else
< revcor = 0;
< #endif
687,689d670
< #ifdef BANDO
< cp3 = &vp1->v_text[term.t_ncol-revcor];
< #else
691d671
< #endif
756,768d735
< # ifdef BANDO
< if((vp1->v_flag & VFREV) == VFREV)
< {
< /* Terminals with sg!=0 don't need reverse switch */
< if(!SG)
< {
< revcor = 0;
< (*term.t_rev)(TRUE);
< }
< else
< revcor = 2*SG;
< }
< # else
770d736
< #endif
785,787d750
< #ifdef BANDO
< if(!SG)
< #endif
820,823d782
< #ifdef BANDO
< vtmove(n, SG);
< vscreen[n]->v_flag &= ~VFREV;
< #else
825d783
< #endif
844a803
> strcpy(tline, " MicroEMACS 3.7 ("); /* Buffer name. */
846,853d804
< #ifdef USG
< strcpy(tline, " MicroEMACS 3.7 [sys V] ("); /* Buffer name. */
< #else
< # ifdef OSK
< strcpy(tline, " MicroEMACS 3.7 [os9] ("); /* Buffer name. */
< # endif
< #endif
<
926,930c877
< #ifdef BANDO
< while (n < (term.t_ncol - 2*SG))
< #else
< while (n < term.t_ncol) /* Pad to full width. */
< #endif
---
> while (n < term.t_ncol) /* Pad to full width. */
-----<cut here>----------<cut here>----------<cut here>----------<cut here>-----
More information about the Comp.sources.unix
mailing list