Skip to content
Snippets Groups Projects
Commit 7274f62e authored by wlott's avatar wlott
Browse files

Nuked defun of structurify.

parent 394643fc
Branches
Tags
No related merge requests found
...@@ -16,13 +16,6 @@ ...@@ -16,13 +16,6 @@
(in-package 'c) (in-package 'c)
#+new-compiler
(defun structurify (vec)
"Frobs a vector to turn it into a named structure. Returns the vector."
(declare (simple-vector vec))
(structurify vec))
(defstruct (defstruct-description (defstruct (defstruct-description
(:conc-name dd-) (:conc-name dd-)
(:print-function print-defstruct-description)) (:print-function print-defstruct-description))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment