;; ;; ;; macOS as of 11.5.1 still is broken and makes my (sleep .1) last ;; 10s. This applies to all waiting, even the SIGINT took so long to ;; deliver. ;; ;; This happens once the process is made a "foreground application", ;; that is one that uses the GUI. ;; ;; 2021-08-12 --GB Clozure Common Lisp Version 1.12 (v1.12) DarwinX8664 For more information about CCL, please see http://ccl.clozure.com. CCL is free software. It is distributed under the terms of the Apache Licence, Version 2.0. ? (clim:find-port) #.(CLIM:FIND-PORT :SERVER-PATH '(:COCOA)) ? (loop do (sleep 10) (time (sleep .1))) (SLEEP 0.1) took 100,754 microseconds (0.100754 seconds) to run. During that period, and with 2 available CPU cores, 1,046 microseconds (0.001046 seconds) were spent in user mode 559 microseconds (0.000559 seconds) were spent in system mode 0 minor page faults, 1 major page faults, 0 swaps. (SLEEP 0.1) took 105,645 microseconds (0.105645 seconds) to run. During that period, and with 2 available CPU cores, 1,216 microseconds (0.001216 seconds) were spent in user mode 492 microseconds (0.000492 seconds) were spent in system mode (SLEEP 0.1) took 10,101,152 microseconds (10.101152 seconds) to run. During that period, and with 2 available CPU cores, 497 microseconds ( 0.000497 seconds) were spent in user mode 308 microseconds ( 0.000308 seconds) were spent in system mode (SLEEP 0.1) took 10,101,284 microseconds (10.101284 seconds) to run. During that period, and with 2 available CPU cores, 535 microseconds ( 0.000535 seconds) were spent in user mode 259 microseconds ( 0.000259 seconds) were spent in system mode (SLEEP 0.1) took 10,101,564 microseconds (10.101564 seconds) to run. During that period, and with 2 available CPU cores, 426 microseconds ( 0.000426 seconds) were spent in user mode 308 microseconds ( 0.000308 seconds) were spent in system mode ^C> Break: interrupt signal > While executing: CCL::%NANOSLEEP, in process listener(1). > Type :GO to continue, :POP to abort, :R for a list of available restarts. > If continued: Return from BREAK. > Type :? for other options. 1 > ^D ? _