From 8461a04f7e03b25724852d6349f909be5e2cdf0b Mon Sep 17 00:00:00 2001
From: Gavin Howard <yzena.tech@gmail.com>
Date: Fri, 12 Oct 2018 17:00:11 -0600
Subject: [PATCH] Attempt to get rid of a warning on mingw

---
 src/program.c | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/program.c b/src/program.c
index 28a73b7b8..8ab2c1288 100644
--- a/src/program.c
+++ b/src/program.c
@@ -302,8 +302,7 @@ char* bc_program_name(char *code, size_t *bgn) {
 	size_t len, i;
 	char byte, *s, *string = (char*) (code + *bgn), *ptr;
 
-	ptr = strchr(string, BC_PARSE_STREND);
-	if (ptr) len = ((unsigned long long) ptr) - ((unsigned long long) string);
+	if ((ptr = strchr(string, BC_PARSE_STREND))) len = ptr - string;
 	else len = strlen(string);
 
 	if (!(s = malloc(len + 1))) return NULL;