summaryrefslogtreecommitdiffstats
path: root/generic/tclUtil.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-08-15 08:59:09 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-08-15 08:59:09 (GMT)
commit2d85a1f9deb33cad80923f44a691189b7aefd8a5 (patch)
treee4dc525d510f8a4c829630b6636d35d3c7936061 /generic/tclUtil.c
parentbce65c12f657a40e26fc4b42de6047d98ee7e012 (diff)
parent62d4e2a24eedc77e3aff652f43cf553f8eecca3a (diff)
downloadtcl-2d85a1f9deb33cad80923f44a691189b7aefd8a5.zip
tcl-2d85a1f9deb33cad80923f44a691189b7aefd8a5.tar.gz
tcl-2d85a1f9deb33cad80923f44a691189b7aefd8a5.tar.bz2
Merge 8.7
Diffstat (limited to 'generic/tclUtil.c')
-rw-r--r--generic/tclUtil.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/generic/tclUtil.c b/generic/tclUtil.c
index 35e686f..2f5dd20 100644
--- a/generic/tclUtil.c
+++ b/generic/tclUtil.c
@@ -943,8 +943,8 @@ Tcl_SplitList(
int
Tcl_ScanElement(
- register const char *src, /* String to convert to list element. */
- register int *flagPtr) /* Where to store information to guide
+ const char *src, /* String to convert to list element. */
+ int *flagPtr) /* Where to store information to guide
* Tcl_ConvertCountedElement. */
{
return Tcl_ScanCountedElement(src, -1, flagPtr);
@@ -1323,9 +1323,9 @@ TclScanElement(
int
Tcl_ConvertElement(
- register const char *src, /* Source information for list element. */
- register char *dst, /* Place to put list-ified element. */
- register int flags) /* Flags produced by Tcl_ScanElement. */
+ const char *src, /* Source information for list element. */
+ char *dst, /* Place to put list-ified element. */
+ int flags) /* Flags produced by Tcl_ScanElement. */
{
return Tcl_ConvertCountedElement(src, -1, dst, flags);
}
@@ -1353,7 +1353,7 @@ Tcl_ConvertElement(
int
Tcl_ConvertCountedElement(
- register const char *src, /* Source information for list element. */
+ const char *src, /* Source information for list element. */
int length, /* Number of bytes in src, or -1. */
char *dst, /* Place to put list-ified element. */
int flags) /* Flags produced by Tcl_ScanElement. */
@@ -1386,7 +1386,7 @@ Tcl_ConvertCountedElement(
int
TclConvertElement(
- register const char *src, /* Source information for list element. */
+ const char *src, /* Source information for list element. */
int length, /* Number of bytes in src, or -1. */
char *dst, /* Place to put list-ified element. */
int flags) /* Flags produced by Tcl_ScanElement. */
@@ -4192,7 +4192,7 @@ TclCheckBadOctal(
* errors. */
const char *value) /* String to check. */
{
- register const char *p = value;
+ const char *p = value;
/*
* A frequent mistake is invalid octal values due to an unwanted leading