mirrors/lqml
1
Fork 0
mirror of https://gitlab.com/eql/lqml.git synced 2025-12-06 18:40:56 -08:00
Code Issues Projects Releases Packages Wiki Activity

revision of example 'debug-ui'

Browse source
This commit is contained in:
pls.153 2025-10-18 16:51:19 +02:00
parent 3b1934f3bf
commit 933f36fa9f
2 changed files with 14 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

6
examples/debug-ui/lisp/main.lisp
View file

@ -1,4 +1,6 @@
(in-package :app)
;; intentional division by zero after 5 seconds
(qsingle-shot 5000 (lambda () (dotimes (i 1) (/ 1 i))))
(defun crash? ()
(funcall 'no-such-function))
(qsingle-shot 10000 'crash?)