[packages/epic4] more type fixes
atler
atler at pld-linux.org
Wed Aug 12 21:35:33 CEST 2026
commit 56f06d6de3e0fc0770ddfe5bbf8d072e5d59607b
Author: Jan Palus <atler at pld-linux.org>
Date: Wed Aug 12 21:34:44 2026 +0200
more type fixes
types.patch | 16 ++++++++++++++++
1 file changed, 16 insertions(+)
---
diff --git a/types.patch b/types.patch
index 4dac67e..f11f0c2 100644
--- a/types.patch
+++ b/types.patch
@@ -30,3 +30,19 @@
int
main(argc, argv)
+--- epic4-2.10.11/source/tcl.c.orig 2024-04-01 06:33:21.000000000 +0200
++++ epic4-2.10.11/source/tcl.c 2026-08-12 21:33:50.632120342 +0200
+@@ -108,10 +108,10 @@
+ ++istclrunning;
+ my_tcl = Tcl_CreateInterp();
+ Tcl_Init(my_tcl);
+- Tcl_CreateCommand (my_tcl, "echo", &Tcl_echoCmd, (ClientData)NULL, (void (*)())NULL);
+- Tcl_CreateCommand (my_tcl, "epic", &Tcl_epicCmd, (ClientData)NULL, (void (*)())NULL);
++ Tcl_CreateCommand (my_tcl, "echo", &Tcl_echoCmd, (ClientData)NULL, NULL);
++ Tcl_CreateCommand (my_tcl, "epic", &Tcl_epicCmd, (ClientData)NULL, NULL);
+ #ifdef TK
+- Tcl_CreateCommand (my_tcl, "tkon", &Tcl_tkonCmd, (ClientData)NULL, (void (*)())NULL);
++ Tcl_CreateCommand (my_tcl, "tkon", &Tcl_tkonCmd, (ClientData)NULL, NULL);
+ #endif
+ } else if (!startnotstop && istclrunning) {
+ Tcl_DeleteInterp(my_tcl);
================================================================
---- gitweb:
http://git.pld-linux.org/gitweb.cgi/packages/epic4.git/commitdiff/56f06d6de3e0fc0770ddfe5bbf8d072e5d59607b
More information about the pld-cvs-commit
mailing list