Subject: Tcl7.4 and Tk4.0
To: None <netbsd-help@NetBSD.ORG>
From: Matt Jackson <matt@jackson.apana.org.au.acis.com.au>
List: netbsd-help
Date: 02/17/1996 19:07:16
Hi,
   Has anyone managed to get a fully functioning set of Tcl7.4 and 
Tk4.0 running on NetBSD1.1 ??

I am using an Amiga 3000 running NetBSD1.1 with gcc2.7.2 and can 
get both packages to compile but I get errors running the test 
programs.

The Tk4.0 test programs give a large number of errors, none of 
which seem to be fatal. The Tcl7.4 test programs come up with the
following errors which cause problems later when trying to run the
TclX7.4a extensions.

file.test

==== file-11.1 mtime and atime and size options
==== Contents of test case:

    catch {unset stat}
    file stat gorp.file stat
    list [expr {[file mtime gorp.file] == $stat(mtime)}]  [expr {[file atime gorp.file] == $stat(atime)}]  [file size gorp.file]

==== Result was:
1 1 0
---- Result should have been:
1 1 11
---- file-11.1 FAILED

==== file-11.3 size option
==== Contents of test case:

    set oldsize [file size gorp.file]
    set f [open gorp.file a]
    puts $f "More text"
    close $f
    expr {[file size gorp.file] - $oldsize}

==== Result was:
0
---- Result should have been:
10
---- file-11.3 FAILED


I am not sure where to look in the source to fix this.

Any suggestions ??