Check-in [3bd068a425]
Overview
SHA1:3bd068a4255779d58de01e0ab81504430fdeedc0
Date: 2013-09-30 06:08:33
User: rkeene
Comment:Fixed Mk4tcl compiling issue
Timelines: family | ancestors | descendants | both | trunk
Downloads: Tarball | ZIP archive
Other Links: files | file ages | folders | manifest
Tags And Properties
Context
2013-09-30
06:24
[9ef1199acb] Added initial support for Win64-amd64 nightly builds (user: rkeene, tags: trunk)
06:08
[3bd068a425] Fixed Mk4tcl compiling issue (user: rkeene, tags: trunk)
2013-09-29
23:17
[079f112af3] Added file "tclkit.ico" to VFS (user: rkeene, tags: trunk)
Changes

Added mk4tcl/patches/all/metakit-2.4.9.7-fix64bitfilespace.diff version [f7a1c0ce58].































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
diff -uNr metakit-2.4.9.7.orig/tcl/mk4tcl.cpp metakit-2.4.9.71fix64bitfilespace/tcl/mk4tcl.cpp
--- metakit-2.4.9.7.orig/tcl/mk4tcl.cpp	2007-06-18 16:05:24.000000000 -0500
+++ metakit-2.4.9.7-fix64bitfilespace/tcl/mk4tcl.cpp	2013-09-30 01:02:52.745003499 -0500
@@ -1911,7 +1911,11 @@
         // now return the values as a list
         Tcl_Obj *r = tcl_GetObjResult();
         for (int i = 1; i < a->GetSize() - 1 && !_error; ++i)
+#ifdef TCL_WIDE_INT_TYPE
+          tcl_ListObjAppendElement(r, Tcl_NewWideIntObj((Tcl_WideInt)a->GetAt(i)));
+#else
           tcl_ListObjAppendElement(r, Tcl_NewLongObj((long)a->GetAt(i)));
+#endif  
         return _error;
       }
   }