[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