uudeview: fix build

This commit is contained in:
Silvan Mosberger 2018-08-09 20:32:30 +02:00
parent f0dba3f598
commit 14fc982e0c
No known key found for this signature in database
GPG key ID: 9424360B4B85C9E7
2 changed files with 22 additions and 0 deletions

View file

@ -10,6 +10,9 @@ stdenv.mkDerivation rec {
buildInputs = [ tcl tk ];
hardeningDisable = [ "format" ];
configureFlags = [ "--enable-tk=${tk.dev}" "--enable-tcl=${tcl}" ];
# https://wiki.tcl.tk/3577
patches = [ ./matherr.patch ];
postPatch = ''
substituteInPlace tcl/xdeview --replace "exec uuwish" "exec $out/bin/uuwish"
'';

View file

@ -0,0 +1,19 @@
diff --git a/tcl/uutcl.c b/tcl/uutcl.c
index f101f2ce52b..71c24688dc4 100644
--- a/tcl/uutcl.c
+++ b/tcl/uutcl.c
@@ -48,14 +48,6 @@
#include <tcl.h>
#endif
-/*
- * The following variable is a special hack that is needed in order for
- * Sun shared libraries to be used for Tcl.
- */
-
-extern int matherr();
-int *tclDummyMathPtr = (int *) matherr;
-
#include <uudeview.h>
#include <uuint.h>
#include <fptools.h>