Added some patterns, generate mes 8 after mes 2
authorceriel <none@none>
Wed, 20 May 1987 13:56:26 +0000 (13:56 +0000)
committerceriel <none@none>
Wed, 20 May 1987 13:56:26 +0000 (13:56 +0000)
util/opt/cleanup.c
util/opt/patterns

index aa5db03..dae07df 100644 (file)
@@ -38,6 +38,13 @@ cleanup() {
        if (infile == NULL)
                error("temp file disappeared");
        outshort(sp_magic);
+       /* Attempt to first output the word_size message */
+       /* commented out for the time being
+       while ((c = getc(infile)) != sp_cend && c != EOF) {
+               putc(c, outfile);
+       }
+       if (c == sp_cend) putc(c, outfile);
+       */
        outinst(ps_mes);
        outint(ms_ext);
        for (spp=symhash;spp< &symhash[NSYMHASH];spp++)
index 528c9d8..f1a4476 100644 (file)
@@ -174,6 +174,10 @@ ldc mli $1==1 && $2==2*w:
 loc mlu $1==1 && $2==w:
 ldc mlu $1==1 && $2==2*w:
 loc sbi $1==1 && $2==w: dec
+loc loe mlu $3==w:      loe $2  loc $1  mlu w
+loc lol mlu $3==w:      lol $2  loc $1  mlu w
+ldc lde mlu $3==2*w:    lde $2  ldc $1  mlu 2*w
+ldc ldl mlu $3==2*w:    ldl $2  ldc $1  mlu 2*w
 loc loe mli $3==w:      loe $2  loc $1  mli w
 loc loe adi loc $3==w: loe $2  loc $1  adi w loc $4
 loc loe adi inc $3==w: loe $2  loc $1  adi w inc