/*

 This code was written as part of the CMU Common Lisp project at
 Carnegie Mellon University, and has been placed in the public domain.

*/

#ifndef _PURIFY_H_
#define _PURIFY_H_

extern int purify(lispobj static_roots, lispobj read_only_roots);

#endif /* _PURIFY_H_ */
