From 84e2172b7b5de4c6d484444cd1936fcadb7aca57 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Sat, 29 Sep 2007 21:52:13 -0400 Subject: [PATCH] x86 intrinsics fix --- core/cpu/x86/sse2/sse2.factor | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/core/cpu/x86/sse2/sse2.factor b/core/cpu/x86/sse2/sse2.factor index 308df43f09..397f161098 100644 --- a/core/cpu/x86/sse2/sse2.factor +++ b/core/cpu/x86/sse2/sse2.factor @@ -1,9 +1,10 @@ ! Copyright (C) 2005, 2007 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. USING: alien arrays cpu.x86.assembler cpu.x86.architecture -generic kernel kernel.private math math.private memory -namespaces sequences words generator generator.registers -cpu.architecture math.floats.private layouts quotations ; +cpu.x86.intrinsics generic kernel kernel.private math +math.private memory namespaces sequences words generator +generator.registers cpu.architecture math.floats.private layouts +quotations ; IN: cpu.x86.sse2 : define-float-op ( word op -- ) @@ -81,10 +82,10 @@ IN: cpu.x86.sse2 } ; : define-alien-float-intrinsics ( word get-quot word set-quot -- ) - [ %alien-accessor ] curry + [ small-reg %alien-accessor ] curry alien-float-set-template define-intrinsic - [ %alien-accessor ] curry + [ small-reg %alien-accessor ] curry alien-float-get-template define-intrinsic ;