R-85 EDEND Force ^Z to exit wildcard filename response. */ /* 23-APR-85 EDPLCD Fix CDELETE not to overrun short lines. */ /* 23-APR-85 SCLOOK Fix REPNEXT to not skip adjacent matching pat. */ /* 09-MAY-85 EDMAIN Add call to CLOTMP() to insure temp files go */ /* 13-MAY-85 DISKIO Fix close errors on cut/paste buffers */ /* 15-MAY-85 EDINS Insert command can hose file up */ /* away. */ /* 21-MAY-85 SCUPDO Bug in reverse scrolling for VT2xx series */ /* 11-JUN-85 EDLOOK Fix TRIM command to work right */ /* 11-JUN-85 SCROOT Fix SET DELETE PREVIOUS to work correctly at */ /* end of line. */ /* 12-JUN-85 SCCMD Added definitions for f10 and f17-f20 on LK201 */ /* keyboards (vt2xx, Rainbow, Pro/3xx). F10 does */ /* a GOLD F (exit), where F17-F20 switch to the */ /* alternate edit windows */ /* 24-JUN-85 EDEND Call SAVEFILENAME() to set the saved name to be */ /* that which we wrote out always */ /* 01-JUL-85 SCINIT Don't turn a VT2xx into a VT100 at exit if VMS */ /* thinks it's a VT2xx. */ /* 08-JUL-85 SCINIT Added SET HEADER [update][fast] to control the */ /* EDSET top header line for VT/SED command. */ /* 08-JUL-85 EDSET Added SET LINE [eoln][next] to control how the */ /* SCUPDO KP2 key works. */ /* 08-JUL-85 DISKIO Leave keypad application mode on in RSTTER() if */ /* VMS thinks it's supposed to be on. */ /* 12-AUG-85 EDVMS Redo spawning to execute a command file instead */ /* and leave the spawned subprocess out there until*/ /* TED exits. The command proc and TED will switch */ /* back and forth via ATTACH and LIB$ATTACH. */ /* 12-AUG-85 DISKIO Removed DCLCOMMAND ept, now in EDVMS.C */ /* XX-AUG-85 ...... Many small mods to facilitate moving to PDP-11. */ /* Broke some larger modules up to better fit in */ /* overlays for the PDP-11. */ /* 17-SEP-85 EDIFL (1) Fix EDIFL to call PAGEOFF(window_number) and*/ /* PAGEON(...) properly. */ /* EDPAGR (2) Fix PAGEOF() to allocate no more than 61440 */ /* bytes for a page if caching is disabled for the */ /* initial file load (RAB$W_RSZ is 16 bits please) */ /* 27-SEP-85 DISKIO Look for ESC[5 or ESC[6 when checking to cancel */ /* a screen print (vt220 Prev and Next Screen) */ /* 27-SEP-85 SCINIT Added ESC(B to terinit() to turn off graphics */ /* 03-OCT-85 EDSTAR Do something reasonable if user trys to edit a */ /* DISKIO directory file, either explicity or via wild- */ /* card spec. EP added to DISKIO calling ACP to */ /* check if a file is a directory. */ /* 04-oct-85 PDPIO The PRO/350 does not do char insert like a 220 */ /* 29-oct-85 DISKIO Added QIO to ept putbin to use IO$M_NOFORMAT */ /* to increase performance on DHU11 and DMF. */ /* 29-oct-85 SCREM Fix bug in delete word at end of line. */ /* 30-oct-85 various Add intermediate terminal QIO buffering to get */ /* better silo i/o and sometimes even get into DMA */ /* I/O, also cuts number of QIO's by 60%. */ /* 30-oct-85 EDVMS F14 (on vt2xx) prints VMS stats, GOLD F14 does */ /* stats from PUTBIN qio's (used for screen editor)*/ /* 26-Nov-85 TEMPIO Add lookahead for the next bucket, saves quite */ /* a bit of cpu time for searchs. */ /* 26-Nov-85 EDFIND Use MOVTC, LOCC and MATCHC to speed up case in- */ /* sensitive matching on VAX. */ #include "sysdef.h" #define then static char inifile[_FILESIZE] ; main() { extern int indlun,cmdlun ; if ( checkterminal() == 0 ) then xprintf("Current output device is not a terminal\n") ; else { inistats() ; xinit() ; chkrmt() ; setcc() ; scdainit() ; gethomedir(inifile) ; strcpy(&inifile[strlen(inifile)],"TEDINIT.INI") ; if ( flookup(inifile) && openfi(inifile,indlun) ) then cmdlun = indlun ; if ( edstart() ) then while ( opennext() ) execommand() ; clotmp() ; delspawn() ; } } prsys_error() { char s[80] ; geterror(s) ; xprintf("%s\n",s) ; } scwarning(number) int number ; { char txt[64] ; getwarn(txt,number) ; putwarn(txt) ; } EDMAINC [.050036]EDMAIN.C [.050036]Ú   X1혀4¿|HÞï þÿÿ[ú«4ÿ;ßïöëÿÿÝûÿIßkûÿ(Ÿ«ûÿ&ûÿ'( «á«ôÑk ß«Hûÿ&ú«PïŠú«`ï‚ßï®ëÿÿŸ« ûÿüÐ\žËàïR™rP �P2PPzPP{�PPP÷PP2P~ûÿ®ñ�ÿÿÿÿ\ÐÿŸ«ûÿªŸ«$ûÿ ûÿ�Ð\Ã\T‘D«á �0D«áó \ìÎ~ûÿŠŸ« ûÿhûÿi) «ô«á+Ô\ ^( «án ^( ïëÿÿn°«pÀ\Ð^«tú«xÿYÀ\^úË€ÿÐ\ßïÎêÿÿÝûÿ!ßkûÿŸ«ûÿþûÿÿÐVÕk<Ý\ÝûÿñžFË×ï˰<�Ë´ßˬûÿÇûÿÌÖ\À�VÑVkÆ”úˤÿ—1`þ@ÐïlüÿÿP ABCDEFGHIJKLMNOPQRSTUVWXYZ$.?0123456789<@<¼SЬTЬ UÔQÕS><„PÑP�ÿùÐ�å¹P×S'{�@PRP�B¯ …×S{(PRP�B¯’…×S�@¯‰…¾@@Œ˜ ("@$$Ø#0$è#$8$%˜$%(%è$! @"FORRTLLIBRTL7-./% <=2&?'@O{[lP}M]\Nk`Kaðñòóôõö÷øùz^L~no|ÁÂÃÄÅÆÇÈÉÑÒÓÔÕÖרÙâãäåæçèéJàZ_my�‚ƒ„…†‡ˆ‰‘’“”•–—˜™¢£¤¥¦§¨©ÀjС???????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????ÿ\ \\\\ \\\\\\\\\\ \\\\\\\\\\\\\\\\ \\\\\\\\\[.<(+!&\\\\\\\\\]$*);^-/\\\\\\\\|,%_>?\\\\\\\\\`:#@'="\abcdefghi\\\\\\\jklmnopqr\\\\\\\~stuvwxyz\\\\\\\\\\\\\\\\\\\\\\{ABCDEFGHI\\\\\\}JKLMNOPQR\\\\\\\\STUVWXYZ\\\\\\0123456789\\\\\ÿ  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`ABCDEFGHIJKLMNOPQRSTUVWXYZ{|}~€�‚ƒ„…†‡ˆ‰Š‹Œ�Ž��‘’“”•–—˜™š›œ�žŸ ¡¢£¤¥¦§¨©ª«¬­®¯°±²³´µ¶·¸¹º»¼½¾¿ÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖרÙÚÛÜÝÞßÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏðÑÒÓÔÕÖרÙÚÛÜÝþÿ@ïgïgï†h<ïi|ï¿o<ïËm<ï4p<ï’p<ïêk|ïZn<ïÁl ïfr ï†rï“wïšx<ï¯x<ïµx<ï¦xïÞº<ïæºï…w@ï]¿@ï¿@ï–¿ïfÉïjÉïnÉïrÉïŠÉüïúÎüï�Ñüï]æïéï¦êïZêïæìüïîïòîïöîïïïeð@ïñ@ïÚð|ï>ñ ï†ñ|ï òüïÆò|ïÒýïÑv<ïHÿïï¢|ï€ ï‚ |ï® ï´ |ïxïz|ï ï |ïzï€ït ïf ïr ï’ ïÎ <ïò ï&ïüï^ ü@ïâ&ü@ïŽ'üï*/üïV,ï"?ïLhï:hïÒmïBmüïz|ï¼zï±{üïäxüï`yüï²~|ïf�ïN‚|@ï@ƒ|@ïÍ‚|@ï ƒüïôƒüï݃üïÆƒ<ïn�ïs�