From e62ef35fbfca7a59617bf123dcf5d092f1a79bdb Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Tue, 12 Nov 2013 16:58:26 +0100
Subject: [PATCH] Bugfix: some binary STL files were not correctly parsed on
 Windows. #1370 1467

---
 xs/src/admesh/stlinit.c | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/xs/src/admesh/stlinit.c b/xs/src/admesh/stlinit.c
index 1e889303..b8cb9a6f 100644
--- a/xs/src/admesh/stlinit.c
+++ b/xs/src/admesh/stlinit.c
@@ -98,6 +98,9 @@ stl_count_facets(stl_file *stl, char *file)
       if(chtest[i] > 127)
 	{
 	  stl->stats.type = binary;
+	  // close and reopen with binary flag (needed on Windows)
+	  fclose(stl->fp);
+	  stl->fp = fopen(file, "rb");
 	  break;
 	}
     }