scratch.lisp @ 614ad4a1d44e

(in-package :dark)

(ql:quickload :bordeaux-threads)

(bt:interrupt-thread
  (first (remove "main thread" (bt:all-threads) :key #'bt:thread-name :test-not #'string=))
  (lambda () (error "stop")))

(ql:quickload :boots)


(boots%::print-attr
  (boots:attr :fg (boots:rgb 1 2 3)))








abc
len = 3
wid = 10
10 - 3 = 7

0123456789