```common lisp
;;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: BIT-SMASHER; Base: 10 -*-
;;;; packages.lisp

;;;; Copyright (c) 2014 "the Phoeron" Colin J.E. Lupton <//thephoeron.com>
;;;; See LICENSE for additional information.

(in-package :cl-user)

(defpackage #:bit-smasher
  (:nicknames #:bitsmash)
  (:use :cl :cl-user :ironclad)
  (:shadowing-import-from :cl-user #:null)
  (:export #:*bit-smasher-version*
           #:hex->bits #:hex->octets #:hex->int
           #:octets->hex #:octets->bits #:octets->int
           #:int->hex #:int->octets #:int->bits
           #:bits->hex #:bits->octets #:bits->int
           #:bit-sum #:bit+
           #:bit-difference #:bit-
           #:bit-product #:bit*
           #:bit-quotient #:bit/
           #:bit-floor #:bit-ceiling
           #:<< #:lshift
           #:>> #:rshift
           #:byte-length #:wide-bit-length #:min-bit-length
           #:twos-complement-p))

(in-package :bit-smasher)

(defvar *bit-smasher-version* #.bit-smasher-asd:*bit-smasher-version*)

;; EOF
```

Add type-checking, type-casting functions to package exports
user
```common lisp
;;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: BIT-SMASHER; Base: 10 -*-
;;;; packages.lisp

;;;; Copyright (c) 2014 "the Phoeron" Colin J.E. Lupton <//thephoeron.com>
;;;; See LICENSE for additional information.

(in-package :cl-user)

(defpackage #:bit-smasher
  (:nicknames #:bitsmash)
  (:use :cl :cl-user :ironclad)
  (:shadowing-import-from :cl-user #:null)
  (:export #:*bit-smasher-version*
           #:hex<- #:hex->bits #:hex->octets #:hex->int
           #:octets<- #:octets->hex #:octets->bits #:octets->int
           #:int<- #:int->hex #:int->octets #:int->bits
           #:bits<- #:bits->hex #:bits->octets #:bits->int
           #:bit-sum #:bit+
           #:bit-difference #:bit-
           #:bit-product #:bit*
           #:bit-quotient #:bit/
           #:bit-floor #:bit-ceiling
           #:<< #:lshift
           #:>> #:rshift
           #:byte-length #:wide-bit-length #:min-bit-length
           #:twos-complement-p))

(in-package :bit-smasher)

(defvar *bit-smasher-version* #.bit-smasher-asd:*bit-smasher-version*)

;; EOF
```
assistant