Skip to content

Commit

Permalink
update example
Browse files Browse the repository at this point in the history
  • Loading branch information
Ptival committed Aug 8, 2023
1 parent d0f7c96 commit d346809
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions reopt-explore/Residual.hs
Original file line number Diff line number Diff line change
Expand Up @@ -296,8 +296,8 @@ splitAtAddresses addrs segs =
, final_seg <- splitSegmentAtAddresses addrs initial_seg
]

-- >>> splitAtAddresses [2, 5, 7] [(1, 5), (6, 7)]
-- [(1,1),(2,4),(5,5),(6,6),(7,7)]
-- >>> splitAtAddresses [2, 5, 7] (map InclusiveRange [(1, 5), (6, 7)])
-- [0x1 - 0x1,0x2 - 0x4,0x5 - 0x5,0x6 - 0x6,0x7 - 0x7]

-- NOTE: assumes a sorted residual segment list
registerAsBlockSegment :: PartitionedSegments -> InclusiveRange Word64 -> PartitionedSegments
Expand Down

0 comments on commit d346809

Please sign in to comment.