```common lisp
;;;; package.lisp

(defpackage #:sdl2
  (:use #:cl #:alexandria #:cffi)
  (:export :sys-video
           :sys-audio
           :sys-timer
           :sys-joystick
           :sys-gamecontroller ; implies joystick
           :noparachute
           :everything
           :init
           :quit
           :create-window
           :destroy-window))

(defpackage #:sdl2-ffi)
```

Remove some now-spurious exports, export conditions, use uninterned symbols
user
```common lisp
;;;; package.lisp

(defpackage #:sdl2
  (:use #:cl #:alexandria #:cffi)
  (:export ;; API
           #:init
           #:quit
           #:create-window
           #:destroy-window

           ;; Conditions
           #:sdl-error))

(defpackage #:sdl2-ffi)
```
assistant