Skip to content

Instantly share code, notes, and snippets.

View sionescu's full-sized avatar

Stelian Ionescu sionescu

168 followers · 59 following
View GitHub Profile
@sionescu
sionescu / unwind-protect-case.lisp
Created January 26, 2022 18:19
Using ALEXANDRIA:UNWIND-PROTECT-CASE to detect non-local exits
(catch 'foo
(alexandria:unwind-protect-case ()
(throw 'foo 1)
(:abort (format t "ABORTED"))))
@sionescu
sionescu / case.lisp
Created January 10, 2022 07:37
Shadow CL:CASE
(defpackage :foo
(:use :cl)
(:shadow :case)
(:export :case))
(in-package :foo)
(defclass case ()
((cases :initarg :cases :initform nil)))
@sionescu
sionescu / keybase.md
Created December 13, 2021 17:07
keybase.md

Keybase proof

I hereby claim:

  • I am sionescu on github.
  • I am sionescu (https://keybase.io/sionescu) on keybase.
  • I have a public key ASANmWw06Qh6I97OhtvEmues0f5ADRGQTq-VDw-ReJGVsgo

To claim this, I am signing this object: