4f41215153a8

--- a/examples/terrain.lisp	Mon Mar 06 11:47:47 2017 +0000
+++ b/examples/terrain.lisp	Sat Mar 11 20:24:06 2017 +0000
@@ -1,9 +1,9 @@
-(in-package :cl-user)
-
 (ql:quickload '(:cl-blt :losh :iterate))
 
-(use-package :losh)
-(use-package :iterate)
+(defpackage :cl-blt.examples.terrain
+  (:use :cl :losh :iterate))
+
+(in-package :cl-blt.examples.terrain)
 
 ;;;; Heightmap ----------------------------------------------------------------
 (defconstant +world-exponent+ 9)

--- a/src/low-level/include/BearLibTerminal.h	Mon Mar 06 11:47:47 2017 +0000
+++ b/src/low-level/include/BearLibTerminal.h	Sat Mar 11 20:24:06 2017 +0000
@@ -345,7 +345,7 @@
 	else if (!buffer)
 		buffer = (char*)malloc(buffer_size);
 
-	while (true)
+	while (1)
 	{
 		buffer[buffer_size-1] = '\0';
 		rc = vsnprintf(buffer, buffer_size, s, args);
@@ -377,7 +377,7 @@
 	else if (!buffer)
 		buffer = (wchar_t*)malloc(buffer_size * sizeof(wchar_t));
 
-	while (true)
+	while (1)
 	{
 		buffer[buffer_size-1] = L'\0';
 #if defined(_WIN32)