(in-package #:user-side-compiler) ;;; STUB, TODO (defclass asm-function () ((%name :accessor name :initarg :name))) (define-transformation (token (token-name asm-function)) ;; TODO: Choose from a list, don't just create like this (make-instance 'asm-function :name (name token)))