(in-package #:smoke)
 
(declaim (inline id))