> From: Joe Marshall <[email protected]>
> Date: Mon, 10 May 2010 16:59:53 -0700
>
> The reason I want to intern is to have EQ-ness.
My definition of intern refers specifically to eq?. If
(not (eq? (thing.unique t1) (thing.unique t2)))
then the re-intern-unique function needs some work.
> The wrapper trick you suggest won't quite do it.
What are you dumping? It is one object -- a "wrapper" object?
Whether an rb-tree or just a list of data, you must provide a working
re-intern-datum function, and run it over the fasloaded copy, no?
How about using the existing fasl hook, i.e. the load function? Dump
code.
(map re-intern-datum '(#[datum 1] #[datum 2] #[datum 3]))
That gets the work done at load time.
Warmer? Can I get a usage case? Someone is flying blind here. :-}
_______________________________________________
MIT-Scheme-devel mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/mit-scheme-devel