~ chicken-core (master) 9f090434b76af8428ab732b36b142ddf052e2c47
commit 9f090434b76af8428ab732b36b142ddf052e2c47
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Jul 3 16:59:26 2025 +0200
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Thu Jul 3 16:59:26 2025 +0200
remove stale code lines from chicken-do.c
(reported by "jrapdx")
diff --git a/chicken-do.c b/chicken-do.c
index 5ea28d8b..2361c922 100644
--- a/chicken-do.c
+++ b/chicken-do.c
@@ -103,8 +103,6 @@ static int execute(char **argv)
}
WaitForSingleObject(process_info.hProcess, INFINITE);
- CloseHandle(process_info.hThread);
- CloseHandle(process_info.hProcess);
DWORD code;
if(!GetExitCodeProcess(process_info.hProcess, &code)) {
@@ -155,7 +153,7 @@ static int execute(char **argv)
}
-int main(int argc, char *argv[])
+int main(int argc, char *argv[])
{
int i, a = 0;
struct stat *st, sd;
@@ -219,7 +217,7 @@ int main(int argc, char *argv[])
if(stat(*d, &sd) == -1) {
fprintf(stderr, "%s: %s\n", *d, strerror(errno));
exit(1);
- }
+ }
st = tstats;
Trap