diff --git a/basis/cpu/x86/sse/sse.factor b/basis/cpu/x86/sse/sse.factor index e8c67ad8c8..d977e07f0c 100644 --- a/basis/cpu/x86/sse/sse.factor +++ b/basis/cpu/x86/sse/sse.factor @@ -1,11 +1,9 @@ ! Copyright (C) 2009, 2010 Joe Groff, Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: alien.data arrays assocs combinators fry kernel locals -macros math math.vectors namespaces quotations sequences system -compiler.cfg.comparisons compiler.cfg.intrinsics -compiler.codegen.labels compiler.codegen.relocation -cpu.architecture cpu.x86 cpu.x86.assembler -cpu.x86.assembler.operands cpu.x86.features ; +USING: alien.data arrays assocs combinators compiler.cfg.comparisons +compiler.cfg.intrinsics cpu.architecture cpu.x86 cpu.x86.assembler +cpu.x86.assembler.operands cpu.x86.features fry kernel locals macros +math math.vectors quotations sequences system ; QUALIFIED-WITH: alien.c-types c IN: cpu.x86.sse @@ -875,9 +873,6 @@ M: x86 %shl-vector-imm-reps %shl-vector-reps ; M: x86 %shr-vector-imm %shr-vector ; M: x86 %shr-vector-imm-reps %shr-vector-reps ; -: scalar-sized-reg ( reg rep -- reg' ) - rep-size 8 * n-bit-version-of ; - M: x86 %integer>scalar drop MOVD ; :: %scalar>integer-32 ( dst src rep -- )