diff --git a/lib_com/basop_util.c b/lib_com/basop_util.c
index fb4cf1517d3084601d31ec47a5682eb62cd94c64..c4f40c6df6080faab71efb203dacdb31e808d86b 100644
--- a/lib_com/basop_util.c
+++ b/lib_com/basop_util.c
@@ -1555,7 +1555,7 @@ Word16 findIndexOfMinWord32( Word32 *x, const Word16 len )
 Word16 imult1616( Word16 x, Word16 y )
 {
     assert( (int) x * (int) y < 32768 && (int) x * (int) y >= -32768 );
-    return extract_l( L_mult0( x, y ) );
+    return i_mult( x, y );
 }
 
 Word32 imult3216( Word32 x, Word16 y )