Successful first run of B interpreter!

I hand compiled hello.b into hello.s and assembled with the interpreter
and runtime library:
perl as7 --out a.out bl.s hello.s bi.s

src/cmd/bi.s

@@ -11,7 +11,7 @@ fetch:
    lmq
    and o17777
    dac addr
-   ecla lls 4
+   cla; lls 4    " XXX  replaced for now:  ecla lls 4
    tad .+3
    dac .+1
    jmp .. i

src/cmd/bl.s

@@ -11,7 +11,7 @@ jmp start
    cma
    tad lastv
    dac lastv
-   imq
+   lmq
    lac sp
    tad d1
    dac sp i
@@ -82,10 +82,10 @@ getc: 0
    jmp getc i
 
 putc: 0
-   and 0777
+   and o777
    sna
    jmp putc i
-   imq
+   lmq
    lac oflg
    sza
    jmp 1f
@@ -115,7 +115,7 @@ stop:
    jms flush
    las
    sma
-   sys save
+   sys exit     " XXX replaced for now:   sys save
    sys exit
 
 flush: 0
@@ -132,7 +132,7 @@ flush: 0
    lac obufp
    dac 1f
    lac .fout
-   sys write; 1: :.; ..
+   sys write; 1: ..; ..
    lac obufp
    dac cobufp
    dzm oflg