Use range objects in the cbs interface instead of base, limit pairs. the idea is that freelist and cbs should offer similar interfaces so that the testing code can be shared.

Copied from Perforce
 Change: 182364
 ServerID: perforce.ravenbrook.com

1 files changed, 16 insertions, 0 deletions

diff --git a/mps/code/range.c b/mps/code/range.c
index 60a8b0da367..4cd61d7b04d 100644
--- a/mps/code/range.c
+++ b/mps/code/range.c
@@ -70,6 +70,22 @@ Bool RangesOverlap(Range range1, Range range2)
       && RangeBase(range2) < RangeLimit(range1);
 }
 
+Bool RangesNest(Range outer, Range inner)
+{
+  AVERT(Range, outer);
+  AVERT(Range, inner);
+  return RangeBase(outer) <= RangeBase(inner)
+      && RangeLimit(inner) <= RangeLimit(outer);
+}
+
+Bool RangesEqual(Range range1, Range range2)
+{
+  AVERT(Range, range1);
+  AVERT(Range, range2);
+  return RangeBase(range1) == RangeBase(range2)
+      && RangeLimit(range1) == RangeLimit(range2);
+}
+
 Bool RangeIsAligned(Range range, Align alignment)
 {
   AVERT(Range, range);