anchor.diff:    (symbolicate var "-PTR"))
   
   
  -;;; module-info
  +;;;
  +;;; Definition of Kernel Manager
  +;;;
  +
  +;;; module info
  +;;; <module-info> ::= (<module-handle> <module-path> <module-compilation-needed)
   
   (defun make-module-info ()
     (list nil nil t))
  
positive.code:   (when *show-messages*
      (format t "~A succeeded.~%" name))
    (values))
  
  (defmacro with-cuda-context (args &body body)
    (destructuring-bind (dev-id) args
  
negative.code:          (cffi:defcfun ,name-and-options% ,return-type ,@args))))
  
  
  ;;;
  ;;; Definition of defcuenum macro
  ;;;
  
  (eval-when (:compile-toplevel :load-toplevel)
    (defun enum-keyword (enum-elem)
  