Created branch scriptics-sc-2-0-b2-syntheticscriptics_sc_2_0_b2scriptics_sc_2_0_b2_synthetic

4 files changed, 12 insertions, 14 deletions

diff --git a/unix/tcl.spec b/unix/tcl.spec
index dc7b148..b205733 100644
--- a/unix/tcl.spec
+++ b/unix/tcl.spec
@@ -1,4 +1,4 @@
-# $Id: tcl.spec,v 1.2 2000/03/24 23:15:29 ericm Exp $
+# $Id: tcl.spec,v 1.1 2000/02/14 22:40:56 ericm Exp $
 # This file is the basis for a binary Tcl RPM for Linux.
 
 %define version 8.3.0
@@ -43,11 +43,9 @@ rm -rf $RPM_BUILD_ROOT
 # then to create the files list for tk, uncomment tk, comment out tcl,
 # then rm -rf $RPM_BUILD_ROOT then rpm --short-circuit -bi then redo a find,
 # and remove the files in specific directories which suffice by themselves.
-%files
+%files -n tcl
 %defattr(-,root,root)
 %{directory}/lib
 %{directory}/bin
 %{directory}/include
-%{directory}/man/man1
-%{directory}/man/man3
-%{directory}/man/mann
+%{directory}/man
diff --git a/unix/tclLoadAout.c b/unix/tclLoadAout.c
index da85d16..8b6da69 100644
--- a/unix/tclLoadAout.c
+++ b/unix/tclLoadAout.c
@@ -14,7 +14,7 @@
  * and Design Engineering (MADE) Initiative through ARPA contract
  * F33615-94-C-4400.
  *
- * RCS: @(#) $Id: tclLoadAout.c,v 1.4 2000/03/27 18:34:32 ericm Exp $
+ * RCS: @(#) $Id: tclLoadAout.c,v 1.3 1999/04/16 00:48:04 stanton Exp $
  */
 
 #include "tclInt.h"
@@ -262,10 +262,10 @@ TclpLoadFile(interp, fileName, sym1, sym2, proc1Ptr, proc2Ptr, clientDataPtr)
 
 #if defined(__mips) || defined(mips)
   status = lseek (relocatedFd,
-	  (off_t) N_TXTOFF (relocatedHead.ex_f, relocatedHead.ex_o),
-	  SEEK_SET);
+		  N_TXTOFF (relocatedHead.ex_f, relocatedHead.ex_o),
+		  SEEK_SET);
 #else
-  status = lseek (relocatedFd, (off_t) N_TXTOFF (relocatedHead), SEEK_SET);
+  status = lseek (relocatedFd, N_TXTOFF (relocatedHead), SEEK_SET);
 #endif
   if (status < 0) {
     goto ioError;
diff --git a/unix/tclUnixChan.c b/unix/tclUnixChan.c
index 31204cb..06a8a42 100644
--- a/unix/tclUnixChan.c
+++ b/unix/tclUnixChan.c
@@ -10,7 +10,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclUnixChan.c,v 1.14 2000/03/27 18:34:32 ericm Exp $
+ * RCS: @(#) $Id: tclUnixChan.c,v 1.13 2000/01/26 03:38:00 hobbs Exp $
  */
 
 #include	"tclInt.h"	/* Internal definitions for Tcl. */
@@ -502,7 +502,7 @@ FileSeekProc(instanceData, offset, mode, errorCodePtr)
     FileState *fsPtr = (FileState *) instanceData;
     int newLoc;
 
-    newLoc = lseek(fsPtr->fd, (off_t) offset, mode);
+    newLoc = lseek(fsPtr->fd, offset, mode);
 
     *errorCodePtr = (newLoc == -1) ? errno : 0;
     return newLoc;
diff --git a/unix/tclUnixPipe.c b/unix/tclUnixPipe.c
index 91c497d..0e26414 100644
--- a/unix/tclUnixPipe.c
+++ b/unix/tclUnixPipe.c
@@ -10,7 +10,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclUnixPipe.c,v 1.8 2000/03/27 18:34:32 ericm Exp $
+ * RCS: @(#) $Id: tclUnixPipe.c,v 1.7 1999/12/12 02:27:20 hobbs Exp $
  */
 
 #include "tclInt.h"
@@ -147,7 +147,7 @@ TclpOpenFile(fname, mode)
 	 */
 
 	if (mode & O_WRONLY) {
-	    lseek(fd, (off_t) 0, SEEK_END);
+	    lseek(fd, 0, SEEK_END);
 	}
 
 	/*
@@ -198,7 +198,7 @@ TclpCreateTempFile(contents)
 	    close(fd);
 	    return NULL;
 	}
-	lseek(fd, (off_t) 0, SEEK_SET);
+	lseek(fd, 0, SEEK_SET);
     }
     return MakeFile(fd);
 }