Running the cairo-test example a second time causes SBCL to crash

[proehlen]

Example code from this repo that I'm trying to reuse in my app was causing SBCL to crash in my Linux distribution. I went back to the example and it's exhibiting the same behavior. It always runs the first time successfully, but any subsequent runs causes it to crash.

Example session:

~/Te/cl-sdl2❯ rlwrap sbcl --noinform --load examples/cairo-gl.lisp                                                                                                               main
WARNING: System definition file #P"/var/home/p/quicklisp/dists/ultralisp/software/hankhero-cl-json-20200326183916/cl-json.asd" contains definition for system "cl-json.test". Please only define "cl-json" and secondary systems with a name starting with "cl-json/" (e.g. "cl-json/test") in that file.
WARNING: redefining DEFPACKAGE-PLUS-1::DEFPACKAGE+-DISPATCH in DEFGENERIC
WARNING: System definition file #P"/var/home/p/quicklisp/dists/quicklisp/software/cl-colors-20180328-git/cl-colors.asd" contains definition for system "cl-colors-tests". Please only define "cl-colors" and secondary systems with a name starting with "cl-colors/" (e.g. "cl-colors/test") in that file.
* (cairo-test)
<<<<<NO OUTPUT - SUCCESSFULLY RAN AND EXITED>>>>
* (cairo-test)
<<<<<SEVERAL SECONDS ELAPSES BEFORE SBCL CRASHES TO THE COMMAND LINE WITH THE BELOW OUTPUT>>>>
X Error of failed request:  BadValue (integer parameter out of range for operation)
  Major opcode of failed request:  146 ()
  Minor opcode of failed request:  5
  Value in failed request:  0x80003b
  Serial number of failed request:  381
  Current serial number in output stream:  382
~/Te/cl-sdl2❯