From patchwork Mon Mar 5 20:39:03 2018 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Laurent Vivier X-Patchwork-Id: 881682 Return-Path: X-Original-To: incoming@patchwork.ozlabs.org Delivered-To: patchwork-incoming@bilbo.ozlabs.org Authentication-Results: ozlabs.org; spf=pass (mailfrom) smtp.mailfrom=nongnu.org (client-ip=2001:4830:134:3::11; helo=lists.gnu.org; envelope-from=qemu-devel-bounces+incoming=patchwork.ozlabs.org@nongnu.org; receiver=) Authentication-Results: ozlabs.org; dmarc=none (p=none dis=none) header.from=vivier.eu Received: from lists.gnu.org (lists.gnu.org [IPv6:2001:4830:134:3::11]) (using TLSv1 with cipher AES256-SHA (256/256 bits)) (No client certificate requested) by ozlabs.org (Postfix) with ESMTPS id 3zwBj55FxWz9sgM for ; Tue, 6 Mar 2018 07:44:25 +1100 (AEDT) Received: from localhost ([::1]:51465 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1eswy7-0001in-MF for incoming@patchwork.ozlabs.org; Mon, 05 Mar 2018 15:44:23 -0500 Received: from eggs.gnu.org ([2001:4830:134:3::10]:39312) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1eswvH-00085o-R9 for qemu-devel@nongnu.org; Mon, 05 Mar 2018 15:41:29 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1eswvE-0000YY-Nj for qemu-devel@nongnu.org; Mon, 05 Mar 2018 15:41:27 -0500 Received: from mout.kundenserver.de ([212.227.126.130]:45277) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1eswvE-0000Xk-9J for qemu-devel@nongnu.org; Mon, 05 Mar 2018 15:41:24 -0500 Received: from localhost.localdomain ([78.238.229.36]) by mrelayeu.kundenserver.de (mreue006 [212.227.15.167]) with ESMTPSA (Nemesis) id 0Mcctw-1fAcIz3iZk-00Hhcp; Mon, 05 Mar 2018 21:39:46 +0100 From: Laurent Vivier To: qemu-devel@nongnu.org Date: Mon, 5 Mar 2018 21:39:03 +0100 Message-Id: <20180305203910.10391-2-laurent@vivier.eu> X-Mailer: git-send-email 2.14.3 In-Reply-To: <20180305203910.10391-1-laurent@vivier.eu> References: <20180305203910.10391-1-laurent@vivier.eu> X-Provags-ID: V03:K0:D7fYY5jddwgCr09ZYgBljcroGMloidh1nQUAdo148nvnnzm14EG ltryk7tB3tZ/cBa0rqsOEx+Z+2xqUyCcKcQijaLq5ua7gbQNCtf3Aerb3F0Ywclp35B4+Eb 6A5H6FqFhUIJpgWK/OSWFMmfrvfmJw92CVtcJqT3DE8g4ZmEvORPzk8K1Wl0+HOnLuIOr0P hg5gZGaATAvRn7k3l74Ww== X-UI-Out-Filterresults: notjunk:1; V01:K0:6ePnr0kdwWI=:yk91jMLjPm12NL5ETZxBxC bA14ThCyKdn0mM8iVv59k447ypVUmK7qSE9IrCnTBWaqKgVNPJXTaxUurTFk0F4QQX5BukRGr L5CLy58zIY2Of0D7KR4znsEUj2gQHrTeIZ7PU1AQGWDWWVp9es8UQop7L9HU3lxOTdwCaRn7+ TLrVbAiCsu3hZctQg5sxj/Cd9sSoPiMgVKazH6e0aWjaOALilZMvUOcCh6IUtjmnYYTCCo+0e 5NQzkEk+GfOE3I/VsVLUC/1hiiaY+VV1aCDVX/3L3BZ6RGhqS9S5gpdqBIBY6clGeZoQ7Th8c 7FF4HZgENblWSeb5NRd7I9Rs5LXy5ZeXk7wBNYFQljmT6ai4+Z93Nez1LMNGVQm0MdbcYWEu+ np75uXIGB/PGNBtU7b2CEFO+9wMN7dXM/cIW8HcB7Zd5LhdPj02IWzqQ1yrlf2vVgq3aVHJqe B7U0rmpQ90wIKgJuXdYoJPAfi/puwSH+DV7CSvTQOpT2EYGjFg1zK9BD3/O4s/l2Ms/ycHBCX 35PfUNnsRyztZNiuuzFqhsXMdXdRb9UqIZejmRJZ6sBpuoGYzydDn/s2uZdipYq2aJSgj/+H3 be0T+X5Ydk8EAxlb69HiLA/s3SNlitzFDViwD6RLWadmIrJNyJmOGT08fo4Pm7q6bIuOVlat/ x0EpF6qHd582Lc326XZ56oK4elWltXbtBNAXR7e/nuEuyD7suua4CfsAnSuuKaadDAw56pA8D H1vHSXJQvXtx7qcl60B3XVmf1oI0rDl41oHWkA== X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] [fuzzy] X-Received-From: 212.227.126.130 Subject: [Qemu-devel] [PATCH 1/8] target/m68k: define floatx80_move() X-BeenThere: qemu-devel@nongnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Cc: Thomas Huth , Laurent Vivier , Richard Henderson Errors-To: qemu-devel-bounces+incoming=patchwork.ozlabs.org@nongnu.org Sender: "Qemu-devel" This functions is needed by upcoming m68k softfloat functions. Source code copied for WinUAE (tag 3500) (The WinUAE file has been copied from QEMU and has the QEMU licensing notice) Signed-off-by: Laurent Vivier --- target/m68k/softfloat.c | 27 +++++++++++++++++++++++++++ target/m68k/softfloat.h | 1 + 2 files changed, 28 insertions(+) diff --git a/target/m68k/softfloat.c b/target/m68k/softfloat.c index 9cb141900c..55eb7a260a 100644 --- a/target/m68k/softfloat.c +++ b/target/m68k/softfloat.c @@ -247,3 +247,30 @@ floatx80 floatx80_scale(floatx80 a, floatx80 b, float_status *status) return roundAndPackFloatx80(status->floatx80_rounding_precision, aSign, aExp, aSig, 0, status); } + +floatx80 floatx80_move(floatx80 a, float_status *status) +{ + flag aSign; + int32_t aExp; + uint64_t aSig; + + aSig = extractFloatx80Frac(a); + aExp = extractFloatx80Exp(a); + aSign = extractFloatx80Sign(a); + + if (aExp == 0x7FFF) { + if ((uint64_t)(aSig << 1)) { + return propagateFloatx80NaNOneArg(a, status); + } + return a; + } + if (aExp == 0) { + if (aSig == 0) { + return a; + } + normalizeRoundAndPackFloatx80(status->floatx80_rounding_precision, + aSign, aExp, aSig, 0, status); + } + return roundAndPackFloatx80(status->floatx80_rounding_precision, aSign, + aExp, aSig, 0, status); +} diff --git a/target/m68k/softfloat.h b/target/m68k/softfloat.h index 78fbc0cd0c..18561b870d 100644 --- a/target/m68k/softfloat.h +++ b/target/m68k/softfloat.h @@ -26,4 +26,5 @@ floatx80 floatx80_mod(floatx80 a, floatx80 b, float_status *status); floatx80 floatx80_getman(floatx80 a, float_status *status); floatx80 floatx80_getexp(floatx80 a, float_status *status); floatx80 floatx80_scale(floatx80 a, floatx80 b, float_status *status); +floatx80 floatx80_move(floatx80 a, float_status *status); #endif