Window just hangs when I close it about cl-glfw3 HOT 3 OPEN

% sbcl --version
SBCL 1.5.7

% sbcl
:
* (ql:quickload :cl-glfw3-examples)
* (cl-glfw3-examples:basic-window-example)

debugger invoked on a FLOATING-POINT-INVALID-OPERATION in thread
#<THREAD "main thread" RUNNING {10005084C3}>:
  arithmetic error FLOATING-POINT-INVALID-OPERATION signalled
:

0] backtrace
Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {10005084C3}>
0: ("bogus stack frame")
1: ("foreign function: InstallEventLoopTimerInternal")
2: ("foreign function: InstallActivateTSMDocument_Timer")
3: ("foreign function: MyDeactivateTSMDocument")
4: ("foreign function: DeactivateTSMDocument")
5: ("foreign function: -[NSTextInputContext deactivate]")
6: ("foreign function: +[NSTextInputContext currentInputContext_withFirstResponderSync:]")
7: ("foreign function: -[NSView _setWindow:]")
8: ("foreign function: __21-[NSView _setWindow:]_block_invoke_2")
9: ("foreign function: -[NSView _setWindow:]")
10: ("foreign function: -[NSWindow dealloc]")
11: ("foreign function: -[NSWindow _dealloc]")
12: ("foreign function: _ZN19AutoreleasePoolPage12releaseUntilEPP11objc_object")
13: ("foreign function: objc_autoreleasePoolPop")
14: ("foreign function: glfwDestroyWindow")
15: (%CL-GLFW3:DESTROY-WINDOW :INVALID-VALUE-FOR-UNESCAPED-REGISTER-STORAGE)
16: (CL-GLFW3:DESTROY-WINDOW #.(SB-SYS:INT-SAP #X00352490))
:

% brew info glfw
glfw: stable 3.3 (bottled), HEAD
:

0] backtrace

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {10005084C3}>
0: ("bogus stack frame")
1: ("foreign function: hashProbe")
2: ("foreign function: -[NSConcreteHashTable addObject:]")
3: ("foreign function: -[NSCGLSurface flushRect:]")
4: ("foreign function: NSCGLSurfaceFlush")
5: ("foreign function: glSwap_Exec")
6: ("foreign function: CGLFlushDrawable")
7: ("foreign function: -[NSOpenGLContext flushBuffer]")
8: ("foreign function: swapBuffersNSGL")
9: (%CL-GLFW3:SWAP-BUFFERS :INVALID-VALUE-FOR-UNESCAPED-REGISTER-STORAGE)
10: ((LAMBDA NIL :IN CL-GLFW3-EXAMPLES:BASIC-WINDOW-EXAMPLE))
:

(trivial-main-thread:call-in-main-thread  
 (lambda ()  
   (sb-int:set-floating-point-modes :traps nil)  
   (cl-glfw3-examples:basic-window-example)))