diff --git a/basis/cpu/x86/assembler/assembler.factor b/basis/cpu/x86/assembler/assembler.factor
index b2de0cc6e4..ba729f3db5 100644
--- a/basis/cpu/x86/assembler/assembler.factor
+++ b/basis/cpu/x86/assembler/assembler.factor
@@ -420,16 +420,14 @@ PRIVATE>
 : MOVUPD     ( dest src -- ) HEX: 10 HEX: 66 2-operand-sse ;
 : MOVSD      ( dest src -- ) HEX: 10 HEX: f2 2-operand-sse ;
 : MOVSS      ( dest src -- ) HEX: 10 HEX: f3 2-operand-sse ;
-: MOVLPS     ( dest src -- ) HEX: 12 f       2-operand-sse ;
-: MOVLPD     ( dest src -- ) HEX: 12 HEX: 66 2-operand-sse ;
+: MOVHLPS    ( dest src -- ) HEX: 12 f       2-operand-sse ;
 : MOVDDUP    ( dest src -- ) HEX: 12 HEX: f2 2-operand-rm-sse ;
 : MOVSLDUP   ( dest src -- ) HEX: 12 HEX: f3 2-operand-rm-sse ;
 : UNPCKLPS   ( dest src -- ) HEX: 14 f       2-operand-rm-sse ;
 : UNPCKLPD   ( dest src -- ) HEX: 14 HEX: 66 2-operand-rm-sse ;
 : UNPCKHPS   ( dest src -- ) HEX: 15 f       2-operand-rm-sse ;
 : UNPCKHPD   ( dest src -- ) HEX: 15 HEX: 66 2-operand-rm-sse ;
-: MOVHPS     ( dest src -- ) HEX: 16 f       2-operand-sse ;
-: MOVHPD     ( dest src -- ) HEX: 16 HEX: 66 2-operand-sse ;
+: MOVLHPS    ( dest src -- ) HEX: 16 f       2-operand-sse ;
 : MOVSHDUP   ( dest src -- ) HEX: 16 HEX: f3 2-operand-rm-sse ;
 
 : PREFETCHNTA ( mem -- )  { BIN: 000 f { HEX: 0f HEX: 18 } } 1-operand ;
diff --git a/basis/tools/deploy/shaker/strip-struct-arrays.factor b/basis/tools/deploy/shaker/strip-struct-arrays.factor
index 55b6630082..022b5f1de9 100644
--- a/basis/tools/deploy/shaker/strip-struct-arrays.factor
+++ b/basis/tools/deploy/shaker/strip-struct-arrays.factor
@@ -1,5 +1,5 @@
 USING: kernel stack-checker.transforms ;
-IN: struct-arrays
+IN: struct-arrays.private
 
 : struct-element-constructor ( c-type -- word )
     "Struct array usages must be compiled" throw ;