From 55b5d810b568aa4aa7d24becc0723b6003963b94 Mon Sep 17 00:00:00 2001
From: Dialga <Dialga@users.noreply.github.com>
Date: Sat, 4 Jun 2022 08:29:37 +1200
Subject: [PATCH] fix ftruncate for tcc on Windows (#260)

* fix ftruncate for tcc on Windows

* Update zip.c
---
 src/zip.c | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/src/zip.c b/src/zip.c
index abb2d14..6adf5bd 100644
--- a/src/zip.c
+++ b/src/zip.c
@@ -46,6 +46,13 @@
 #define fileno _fileno
 #endif
 
+#if defined(__TINYC__) && (defined(_WIN32) || defined(_WIN64))
+#include <io.h>
+
+#define ftruncate(fd, sz) (-(_chsize_s((fd), (sz)) != 0))
+#define fileno _fileno
+#endif
+
 #ifndef HAS_DEVICE
 #define HAS_DEVICE(P) 0
 #endif