File r36/cslsrc/mkpatch1.red from the latest check-in

lisp <<
    delete!-module 'patches;
    copy!-module 'patches >>;

end;