cleanup cmp_ev_info

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@14778 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
yallop · May 10, 2014 · 0b50a80 · 0b50a80
1 parent 3fe8311
commit 0b50a80
Showing 1 changed file with 5 additions and 3 deletions.
diff --git a/byterun/backtrace.c b/byterun/backtrace.c
@@ -207,9 +207,11 @@ struct ev_info {
 };
 
 static int cmp_ev_info(const void *a, const void *b) {
-  if(((const struct ev_info*)a)->ev_pc > ((const struct ev_info*)b)->ev_pc)
-    return 1;
-  return -1;
+  code_t pc_a = ((const struct ev_info*)a)->ev_pc;
+  code_t pc_b = ((const struct ev_info*)b)->ev_pc;
+  if (pc_a > pc_b) return 1;
+  if (pc_a < pc_b) return -1;
+  return 0;
 }
 
 static char *read_debug_info_error = "";