tadd undocumented Abort builtin - plan9port - [fork] Plan 9 from user space
HTML git clone git://src.adamsgaard.dk/plan9port
DIR Log
DIR Files
DIR Refs
DIR README
DIR LICENSE
---
DIR commit 6dd68c9ad7f3bdad8714b8d4f09679b850d14e69
DIR parent a05c312b479191ab72baaf24743d985a4bcc9c2b
HTML Author: rsc <devnull@localhost>
Date: Sun, 23 Jan 2005 22:57:06 +0000
add undocumented Abort builtin
Diffstat:
M src/cmd/acme/exec.c | 32 ++++++++++++++++++++++++++-----
1 file changed, 27 insertions(+), 5 deletions(-)
---
DIR diff --git a/src/cmd/acme/exec.c b/src/cmd/acme/exec.c
t@@ -14,6 +14,7 @@
Buffer snarfbuf;
+void doabort(Text*, Text*, Text*, int, int, Rune*, int);
void del(Text*, Text*, Text*, int, int, Rune*, int);
void delcol(Text*, Text*, Text*, int, int, Rune*, int);
void dotfiles(Text*, Text*, Text*, int, int, Rune*, int);
t@@ -47,6 +48,7 @@ struct Exectab
int flag2;
};
+static Rune LAbort[] = { 'A', 'b', 'o', 'r', 't', 0 };
static Rune LCut[] = { 'C', 'u', 't', 0 };
static Rune LDel[] = { 'D', 'e', 'l', 0 };
static Rune LDelcol[] = { 'D', 'e', 'l', 'c', 'o', 'l', 0 };
t@@ -77,13 +79,14 @@ static Rune LUndo[] = { 'U', 'n', 'd', 'o', 0 };
static Rune LZerox[] = { 'Z', 'e', 'r', 'o', 'x', 0 };
Exectab exectab[] = {
+ { LAbort, doabort, FALSE, XXX, XXX, },
{ LCut, cut, TRUE, TRUE, TRUE },
{ LDel, del, FALSE, FALSE, XXX },
- { LDelcol, delcol, FALSE, XXX, XXX },
- { LDelete, del, FALSE, TRUE, XXX },
- { LDump, dump, FALSE, TRUE, XXX },
+ { LDelcol, delcol, FALSE, XXX, XXX },
+ { LDelete, del, FALSE, TRUE, XXX },
+ { LDump, dump, FALSE, TRUE, XXX },
{ LEdit, edit, FALSE, XXX, XXX },
- { LExit, xexit, FALSE, XXX, XXX },
+ { LExit, xexit, FALSE, XXX, XXX },
{ LFont, fontx, FALSE, XXX, XXX },
{ LGet, get, FALSE, TRUE, XXX },
{ LID, id, FALSE, XXX, XXX },
t@@ -104,7 +107,7 @@ Exectab exectab[] = {
{ LSort, sort, FALSE, XXX, XXX },
{ LTab, tab, FALSE, XXX, XXX },
{ LUndo, undo, FALSE, TRUE, XXX },
- { LZerox, zeroxx, FALSE, XXX, XXX },
+ { LZerox, zeroxx, FALSE, XXX, XXX },
{ nil, 0, 0, 0, 0 },
};
t@@ -305,6 +308,25 @@ getbytearg(Text *argt, int doaddr, int dofile, char **bp)
}
void
+doabort(Text *__0, Text *_0, Text *_1, int _2, int _3, Rune *_4, int _5)
+{
+ static int n;
+
+ USED(__0);
+ USED(_0);
+ USED(_1);
+ USED(_2);
+ USED(_3);
+ USED(_4);
+ USED(_5);
+
+ if(n++ == 0)
+ warning(nil, "executing Abort again will call abort()\n");
+ else
+ abort();
+}
+
+void
newcol(Text *et, Text *_0, Text *_1, int _2, int _3, Rune *_4, int _5)
{
Column *c;