Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Handle-a-signal/Clojure/handle-a-signal.clj
+++ b/Task/Handle-a-signal/Clojure/handle-a-signal.clj
@ -0,0 +1,15 @@
+(require 'clojure.repl)
+
+(def start (System/nanoTime))
+
+(defn shutdown [_]
+  (println "Received INT after"
+           (/ (- (System/nanoTime) start) 1e9)
+           "seconds.")
+  (System/exit 0))
+
+(clojure.repl/set-break-handler! shutdown)
+
+(doseq [i (range)]
+  (prn i)
+  (Thread/sleep 500))