tcc doesn't like

git-svn-id: svn://katsu.triplehelix.org/dgamelaunch/trunk@310 db0b04b0-f4d1-0310-9a6d-de3e77497b0e
This commit is contained in:
Joshua Kwan 2004-06-18 21:37:06 +00:00
parent aa1a46543b
commit ce1bcadf26
1 changed files with 50 additions and 49 deletions

99
virus.c
View File

@ -21,7 +21,9 @@
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/ */
char *vi_Version = "0.0.2+dgamelaunch " VERSION; #include "config.h"
char *vi_Version = "0.0.2+dgamelaunch " PACKAGE_VERSION;
/* /*
* To compile: * To compile:
@ -855,36 +857,36 @@ do_cmd (Byte c)
crashme = (crashme == 0) ? 1 : 0; crashme = (crashme == 0) ? 1 : 0;
break; break;
#endif /* BB_FEATURE_VI_CRASHME */ #endif /* BB_FEATURE_VI_CRASHME */
//case 0x16: // syn /*case 0x16: // syn
//case 0x17: // etb case 0x17: // etb
//case 0x18: // can case 0x18: // can
//case 0x1c: // fs case 0x1c: // fs
//case 0x1d: // gs case 0x1d: // gs
//case 0x1e: // rs case 0x1e: // rs
//case 0x1f: // us case 0x1f: // us
//case '!': // !- case '!': // !-
//case '#': // #- case '#': // #-
//case '&': // &- case '&': // &-
//case '(': // (- case '(': // (-
//case ')': // )- case ')': // )-
//case '*': // *- case '*': // *-
//case ',': // ,- case ',': // ,-
//case '=': // =- case '=': // =-
//case '@': // @- case '@': // @-
//case 'F': // F- case 'F': // F-
//case 'K': // K- case 'K': // K-
//case 'Q': // Q- case 'Q': // Q-
//case 'S': // S- case 'S': // S-
//case 'T': // T- case 'T': // T-
//case 'V': // V- case 'V': // V-
//case '[': // [- case '[': // [-
//case '\\': // \- case '\\': // \-
//case ']': // ]- case ']': // ]-
//case '_': // _- case '_': // _-
//case '`': // `- case '`': // `-
//case 'g': // g- case 'g': // g-
//case 'u': // u- FIXME- there is no undo case 'u': // u- FIXME- there is no undo
//case 'v': // v- case 'v': // v- */
default: // unrecognised command default: // unrecognised command
buf[0] = c; buf[0] = c;
buf[1] = '\0'; buf[1] = '\0';
@ -1622,8 +1624,7 @@ do_cmd (Byte c)
} }
else else
{ {
// could not recognize object c = c1 = 27;
c = c1 = 27; // error-
indicate_error (c); indicate_error (c);
} }
if (c1 != 27) if (c1 != 27)
@ -1897,20 +1898,20 @@ colon (Byte * buf)
int useforce, forced; int useforce, forced;
struct stat st_buf; struct stat st_buf;
// :3154 // if (-e line 3154) goto it else stay put /* :3154 // if (-e line 3154) goto it else stay put
// :4,33w! foo // write a portion of buffer to file "foo" :4,33w! foo // write a portion of buffer to file "foo"
// :w // write all of buffer to current file :w // write all of buffer to current file
// :q // quit :q // quit
// :q! // quit- dont care about modified file :q! // quit- dont care about modified file
// :'a,'z!sort -u // filter block through sort :'a,'z!sort -u // filter block through sort
// :'f // goto mark "f" :'f // goto mark "f"
// :'fl // list literal the mark "f" line :'fl // list literal the mark "f" line
// :.r bar // read file "bar" into buffer before dot :.r bar // read file "bar" into buffer before dot
// :/123/,/abc/d // delete lines from "123" line to "abc" line :/123/,/abc/d // delete lines from "123" line to "abc" line
// :/xyz/ // goto the "xyz" line :/xyz/ // goto the "xyz" line
// :s/find/replace/ // substitute pattern "find" with "replace" :s/find/replace/ // substitute pattern "find" with "replace"
// :!<cmd> // run <cmd> then return :!<cmd> // run <cmd> then return
// */
if (strlen ((char *) buf) <= 0) if (strlen ((char *) buf) <= 0)
goto vc1; goto vc1;
if (*buf == ':') if (*buf == ':')
@ -4349,8 +4350,8 @@ format_line (Byte * dest, Byte * src, int li)
c &= 0x7f; // get rid of hi bit c &= 0x7f; // get rid of hi bit
} }
} }
// the co++ is done here so that the column will /* the co++ is done here so that the column will
// not be overwritten when we blank-out the rest of line not be overwritten when we blank-out the rest of line */
dest[co] = c; dest[co] = c;
if (src >= end) if (src >= end)
break; break;