unbreak build on llvm 22

This commit is contained in:
daniel
2026-05-31 20:35:27 +00:00
parent ebef9308eb
commit 055f94fab0
2 changed files with 23 additions and 1 deletions
+1 -1
View File
@@ -1,7 +1,7 @@
COMMENT= city-building simulation
DISTNAME= micropolis-20080211
REVISION= 9
REVISION= 10
WRKDIST= ${WRKDIR}/micropolis
CATEGORIES= games
@@ -1,3 +1,7 @@
Cherry pick a fix for llvm 22 from:
http://git.zerfleddert.de/cgi-bin/gitweb.cgi/micropolis/commit/176c45720f3b9e5555fe1084d3e6ea59488c1785
Index: src/tk/tkrawtcp.c
--- src/tk/tkrawtcp.c.orig
+++ src/tk/tkrawtcp.c
@@ -9,3 +13,21 @@ Index: src/tk/tkrawtcp.c
static int inet_connect _ANSI_ARGS_((char *host, char *port,int server));
static int unix_connect _ANSI_ARGS_((char *path, int server));
@@ -205,7 +206,7 @@ Tcp_ConnectCmd(notUsed, interp, argc, argv)
Tcl_SetVar2(interp,"connect_info",interp->result,buf,TCL_GLOBAL_ONLY);
}
- Tcp_MakeOpenFile(iPtr,fd,1,1-server);
+ Tcp_MakeOpenFile(interp,fd,1,1-server);
return TCL_OK;
}
@@ -363,7 +364,7 @@ Tcp_AcceptCmd(notUsed, interp, argc, argv)
/*
* Create the FILE*
*/
- Tcp_MakeOpenFile(iPtr,fd,1,1);
+ Tcp_MakeOpenFile(interp,fd,1,1);
sprintf(interp->result, "file%d", fd);
return TCL_OK;