<div dir="ltr"><br><div>Here it is untabified. </div><div><br></div><div>I'll have to study the test-program.script a bit before attempting a test case. </div><div><br></div><div><br></div></div><div class="gmail_extra">
<br><br><div class="gmail_quote">On Sun, Aug 10, 2014 at 7:31 PM, Faré <span dir="ltr"><<a href="mailto:fahree@gmail.com" target="_blank">fahree@gmail.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Dear Dave,<br>
<br>
your patch looks great except that it introduces tabs.<br>
Please no tabs in ASDF. At least SBCL hates them.<br>
<br>
Also, if you can contrive a test case, maybe as an add-on<br>
to the image-op test in test-program.script, that would be great.<br>
<div class=""><br>
—♯ƒ • François-René ÐVB Rideau •Reflection&Cybernethics• <a href="http://fare.tunes.org" target="_blank">http://fare.tunes.org</a><br>
</div>drug, n:<br>
        A substance that, injected into a rat, produces a scientific paper.<br>
<div class="HOEnZb"><div class="h5"><br>
<br>
On Sun, Aug 10, 2014 at 4:06 PM, Dave Cooper <<a href="mailto:david.cooper@genworks.com">david.cooper@genworks.com</a>> wrote:<br>
><br>
> On Sat, Aug 9, 2014 at 5:16 PM, Faré <<a href="mailto:fahree@gmail.com">fahree@gmail.com</a>> wrote:<br>
>><br>
>> Sorry, but doesn't it work to set *immutable-systems* AFTER you load<br>
>> everything?<br>
><br>
><br>
> No, it doesn't, because we never actually load anything via ASDF. Everything<br>
> was preloaded into the built image, using monolithic-compile-bundles, sans<br>
> actual ASDF.<br>
><br>
>><br>
>> I admit there not yet a test for this functionality in the asdf test<br>
>> suite;<br>
>> it may be that the functionality is buggy and/or its API suboptimal,<br>
>> and you're welcome to suggest patches and/or suggestions.<br>
><br>
><br>
> Ok, here is a patch (against 3.1.3.2 of master) which:<br>
><br>
>  o Makes it check for sysdef-preloaded-system-search as well as<br>
> system-registered-p, when doing sysdef-immutable-system-search and when<br>
> checking for *immutable-systems* in find-system. (previously it was only<br>
> checking system-registered-p).<br>
><br>
>  o Adds a function asdf/find-system:register-immutable-system which adds the<br>
> requested system to the *immutable-systems* as well as calls<br>
> register-preloaded-system with it.<br>
><br>
><br>
><br>
> --<br>
> My Best,<br>
><br>
> Dave Cooper, Genworks Support<br>
><br>
><br>
</div></div></blockquote></div><br><br clear="all"><div><br></div>-- <br>My Best,<br><br>Dave Cooper, Genworks Support<br><a href="mailto:david.cooper@genworks.com" target="_blank">david.cooper@genworks.com</a>, <a href="http://dave.genworks.com" target="_blank">dave.genworks.com</a>(skype)<br>
USA: 248-327-3253(o), 1-248-330-2979(mobile)<br>UK: 0191 645 1699<br>
</div>