X-Git-Url: http://cvs.zerfleddert.de/cgi-bin/gitweb.cgi/micropolis/blobdiff_plain/f1d92a2564f181cebcabbd0f8c04fe8966bc17ff..HEAD:/src/tcl/tclassem.c?ds=sidebyside

diff --git a/src/tcl/tclassem.c b/src/tcl/tclassem.c
index ed70991..d444abf 100644
--- a/src/tcl/tclassem.c
+++ b/src/tcl/tclassem.c
@@ -62,8 +62,8 @@ typedef struct {
  *----------------------------------------------------------------------
  */
 
-Tcl_CmdBuf
-Tcl_CreateCmdBuf()
+Tcl_CmdBuf 
+Tcl_CreateCmdBuf (void)
 {
     register CmdBuf *cbPtr;
 
@@ -92,10 +92,11 @@ Tcl_CreateCmdBuf()
  *----------------------------------------------------------------------
  */
 
-void
-Tcl_DeleteCmdBuf(buffer)
-    Tcl_CmdBuf buffer;		/* Token for command buffer (return value
+void 
+Tcl_DeleteCmdBuf (
+    Tcl_CmdBuf buffer		/* Token for command buffer (return value
 				 * from previous call to Tcl_CreateCmdBuf). */
+)
 {
     register CmdBuf *cbPtr = (CmdBuf *) buffer;
 
@@ -131,15 +132,16 @@ Tcl_DeleteCmdBuf(buffer)
  */
 
 char *
-Tcl_AssembleCmd(buffer, string)
-    Tcl_CmdBuf buffer;		/* Token for a command buffer previously
+Tcl_AssembleCmd (
+    Tcl_CmdBuf buffer,		/* Token for a command buffer previously
 				 * created by Tcl_CreateCmdBuf.  */
-    char *string;		/* Bytes to be appended to command stream.
+    char *string		/* Bytes to be appended to command stream.
 				 * Note:  if the string is zero length,
 				 * then whatever is buffered will be
 				 * considered to be a complete command
 				 * regardless of whether parentheses are
 				 * matched or not. */
+)
 {
     register CmdBuf *cbPtr = (CmdBuf *) buffer;
     int length, totalLength;