FIX: resolved implicit conversion warning

Oldes · Jul 3, 2022 · 8c92c8c · 8c92c8c
1 parent 32dd199
commit 8c92c8c
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/core/f-series.c b/src/core/f-series.c
@@ -306,13 +306,13 @@
 		return !CT_Object(s, t, 1); // equality used
 
 	case REB_NATIVE:
-		return &VAL_FUNC_CODE(s) - &VAL_FUNC_CODE(t);
+		return THE_SIGN(&VAL_FUNC_CODE(s) - &VAL_FUNC_CODE(t));
 
 	case REB_ACTION:
 	case REB_COMMAND:
 	case REB_OP:
 	case REB_FUNCTION:
-		return VAL_FUNC_BODY(s) - VAL_FUNC_BODY(t);
+		return THE_SIGN(VAL_FUNC_BODY(s) - VAL_FUNC_BODY(t));
 
 	case REB_STRUCT:
 		return Cmp_Struct(s, t);