git-subtree-dir: users/wpcarro git-subtree-mainline:464bbcb15cgit-subtree-split:24f5a642afChange-Id: I6105b3762b79126b3488359c95978cadb3efa789
		
			
				
	
	
		
			14 lines
		
	
	
	
		
			369 B
		
	
	
	
		
			Common Lisp
		
	
	
	
	
	
			
		
		
	
	
			14 lines
		
	
	
	
		
			369 B
		
	
	
	
		
			Common Lisp
		
	
	
	
	
	
(in-package #:cl-user)
 | 
						|
(defpackage #:prelude
 | 
						|
  (:documentation "Supporting miscellaneous utility functions and macros.")
 | 
						|
  (:use #:cl)
 | 
						|
  (:shadow #:type)
 | 
						|
  (:export #:type #:comment))
 | 
						|
(in-package #:prelude)
 | 
						|
 | 
						|
;; TODO: Add documentation to these macros.
 | 
						|
 | 
						|
(defmacro type (name in out)
 | 
						|
  `(declaim (ftype (function ,in ,out) ,name)))
 | 
						|
 | 
						|
(defmacro comment (&rest _forms) nil)
 |