implemented s_normSubnormalF64Sig in assembly to save 78 bytes and inlined functions only used by f64_to_f32 saving an additional 118 bytes

Author: ZERICO2005

src/softfloat/include/specialize.h

@@ -145,7 +145,15 @@ void softfloat_f32UIToCommonNaN( uint_fast32_t uiA, struct commonNaN *zPtr );
 | Converts the common NaN pointed to by 'aPtr' into a 32-bit floating-point
 | NaN, and returns the bit pattern of this value as an unsigned integer.
 *----------------------------------------------------------------------------*/
+#if 0
 uint_fast32_t softfloat_commonNaNToF32UI( const struct commonNaN *aPtr );
+#else
+/** only used by f64_to_f32 currently */
+static inline uint_fast32_t softfloat_commonNaNToF32UI( const struct commonNaN *aPtr )
+{
+    return (uint_fast32_t) aPtr->sign<<31 | 0x7FC00000 | aPtr->v64>>41;
+}
+#endif
 
 /*----------------------------------------------------------------------------
 | Interpreting 'uiA' and 'uiB' as the bit patterns of two 32-bit floating-
@@ -178,7 +186,20 @@ bool softfloat_isSigNaNF64UI(uint64_t a) __attribute__((__const__, __nothrow__,
 | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid
 | exception is raised.
 *----------------------------------------------------------------------------*/
+#if 0
 void softfloat_f64UIToCommonNaN( uint_fast64_t uiA, struct commonNaN *zPtr );
+#else
+/** only used by f64_to_f32 currently */
+static inline void softfloat_f64UIToCommonNaN( uint_fast64_t uiA, struct commonNaN *zPtr )
+{
+    if ( softfloat_isSigNaNF64UI( uiA ) ) {
+        softfloat_raiseFlags( softfloat_flag_invalid );
+    }
+    zPtr->sign = uiA>>63;
+    zPtr->v64  = uiA<<12;
+    zPtr->v0   = 0;
+}
+#endif
 
 /*----------------------------------------------------------------------------
 | Converts the common NaN pointed to by 'aPtr' into a 64-bit floating-point

src/softfloat/s_commonNaNToF32UI.c

@@ -34,6 +34,8 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
 =============================================================================*/
 
+#if 0
+
 #include <stdint.h>
 #include "platform.h"
 #include "specialize.h"
@@ -49,3 +51,4 @@ uint_fast32_t softfloat_commonNaNToF32UI( const struct commonNaN *aPtr )
 
 }
 
+#endif

src/softfloat/s_f64UIToCommonNaN.c

@@ -34,6 +34,8 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
 =============================================================================*/
 
+#if 0
+
 #include <stdint.h>
 #include "platform.h"
 #include "specialize.h"
@@ -57,3 +59,4 @@ void softfloat_f64UIToCommonNaN( uint_fast64_t uiA, struct commonNaN *zPtr )
 
 }
 
+#endif

src/softfloat/s_normSubnormalF64Sig.c

@@ -34,6 +34,8 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
 =============================================================================*/
 
+#if 0
+
 #include <stdint.h>
 #include "platform.h"
 #include "internals.h"
@@ -50,3 +52,4 @@ struct exp16_sig64 softfloat_normSubnormalF64Sig( uint_fast64_t sig )
 
 }
 
+#endif

src/softfloat/s_normSubnormalF64Sig.src

@@ -0,0 +1,42 @@
+	assume	adl = 1
+
+	section	.text
+
+	public	_softfloat_normSubnormalF64Sig
+
+; saves 78 bytes
+; this function is called in the float64_ldexp tests
+_softfloat_normSubnormalF64Sig:
+	ld	iy, 0
+	add	iy, sp
+	ld	hl, (iy + 6)
+	ld	de, (iy + 9)
+	ld	bc, (iy + 12)
+	ld	iy, (iy + 3)	; struct
+	call	__llctlz
+
+	push	hl
+	; shiftDist = softfloat_countLeadingZeros64( sig ) - 11;
+	sub	a, 11
+	or	a, a
+	sbc	hl, hl
+	ld	l, a
+	; z.exp = 1 - shiftDist;
+	call	__ineg
+	inc	hl
+	ld	(iy + 0), hl
+	; z.sig = sig<<shiftDist;
+	ld	l, a
+	ex	(sp), hl
+	call	__llshl
+	pop	af	; reset SP
+	ld	(iy + 2), hl
+	ld	(iy + 5), de
+	ld	(iy + 8), bc
+
+	lea	hl, iy	; ABI struct ptr
+	ret
+
+	extern	__llshl
+	extern	__llctlz
+	extern	__ineg