diff --git a/src/cmd/as.s b/src/cmd/as.s
index 50a46ec..e36ea9e 100644
--- a/src/cmd/as.s
+++ b/src/cmd/as.s
@@ -324,7 +324,8 @@ putsc: 0
    dac i sctalp			" save pointer
    sma cla			" skip if minus & clear AC
    jmp 1f			"  AC positive
-   llss 27			" get char in high 9 bits, zero in low
+   lacq
+   als 9			" get char in high 9 bits, zero in low
    dac i sctal			" store word
    lrss 9			" shift char back down
    jmp i putsc			" return
diff --git a/src/other/wktopr.s b/src/other/wktopr.s
index 7b87b7d..a918f61 100644
--- a/src/other/wktopr.s
+++ b/src/other/wktopr.s
@@ -1,5 +1,5 @@
-. = 01000000
-.. = 4096
+" . = 01000000
+" .. = 4096
 save = 1
 getuid = 2
 open = 3