diff options
Diffstat (limited to 'network/cicb')
-rw-r--r-- | network/cicb/cicb.info | 2 | ||||
-rw-r--r-- | network/cicb/tcl_continue_error.diff | 45 |
2 files changed, 1 insertions, 46 deletions
diff --git a/network/cicb/cicb.info b/network/cicb/cicb.info index fa085ab226..cfcb0af283 100644 --- a/network/cicb/cicb.info +++ b/network/cicb/cicb.info @@ -1,6 +1,6 @@ PRGNAM="cicb" VERSION="5.2.0b1+git20170501" -HOMEPAGE="http://cicb.sourceforge.net/" +HOMEPAGE="https://github.com/hoche/cicb/" DOWNLOAD="http://urchlay.naptime.net/~urchlay/src/cicb-5.2.0b1+git20170501.tar.xz" MD5SUM="ff3afbdad3f6744a154965b26c75db2e" DOWNLOAD_x86_64="" diff --git a/network/cicb/tcl_continue_error.diff b/network/cicb/tcl_continue_error.diff deleted file mode 100644 index dcba1b865c..0000000000 --- a/network/cicb/tcl_continue_error.diff +++ /dev/null @@ -1,45 +0,0 @@ -diff -wNaur -xCVS cicb-5.1.1b3/icb/parse.c cicb/icb/parse.c ---- cicb-5.1.1b3/icb/parse.c 2009-03-23 02:51:53.000000000 -0400 -+++ cicb/icb/parse.c 2013-07-05 02:16:27.000000000 -0400 -@@ -1,4 +1,4 @@ --/* $Id: parse.c,v 1.20 2009/03/23 06:51:53 hoche Exp $ */ -+/* $Id: parse.c,v 1.21 2013/07/05 06:16:27 hoche Exp $ */ - - /* parse a line from the user */ - -@@ -8,6 +8,9 @@ - - #define ARRAY_SIZE(x) (sizeof (x) / sizeof (x[0])) - -+#define TCL_CONTINUE_ERROR_MSG "invoked \"continue\" outside of a loop" -+#define TCL_IGNORE 666 -+ - - /* This is similar to Tcl_VarEval, but it treats each string as a separate - list element, rather than concat-ing the strings together and then -@@ -76,6 +79,14 @@ - if (status == TCL_CONTINUE) { - send_command (cmd, args); - status = TCL_OK; -+ } else if (status == TCL_ERROR) { -+ -+ /* handle the dreaded "invoked continue" message */ -+ char *errmsg = (char*)Tcl_GetStringResult (interp); -+ if (strcmp(errmsg, TCL_CONTINUE_ERROR_MSG) == 0) { -+ send_command (cmd, args); -+ status = TCL_IGNORE; -+ } - } - - return status; -@@ -122,7 +133,9 @@ - putl (result, PL_SL); - } - error_mode = 0; -- -+ } else if (status == TCL_IGNORE) { -+ /* do nothing */ -+ error_mode = 0; - } else { - /* Report an error. */ - char* errmsg = ""; |