<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">

<html lang="en" style='--code-editor-font: var(--default-mono-font, "Menlo"), DejaVu Sans Mono, Liberation Mono, Consolas, Ubuntu Mono, Courier New, andale mono, lucida console, monospace;'>

<head>

<meta content="text/html; charset=US-ASCII" http-equiv="Content-Type">

<title>

GitLab

</title>

<style data-premailer="ignore" type="text/css">

a { color: #1068bf; }

</style>

<style>img {

max-width: 100%; height: auto;

}

body {

font-size: 0.875rem;

}

body {

-webkit-text-shadow: rgba(255,255,255,0.01) 0 0 1px;

}

body {

font-family: var(--default-regular-font, -apple-system),BlinkMacSystemFont,"Segoe UI",Roboto,"Noto Sans",Ubuntu,Cantarell,"Helvetica Neue",sans-serif,"Apple Color Emoji","Segoe UI Emoji","Segoe UI Symbol","Noto Color Emoji"; font-size: inherit;

}

</style>

</head>

<body style='font-size: inherit; -webkit-text-shadow: rgba(255,255,255,0.01) 0 0 1px; font-family: var(--default-regular-font, -apple-system),BlinkMacSystemFont,"Segoe UI",Roboto,"Noto Sans",Ubuntu,Cantarell,"Helvetica Neue",sans-serif,"Apple Color Emoji","Segoe UI Emoji","Segoe UI Symbol","Noto Color Emoji";'>

<div class="content">

<h3 style="margin-top: 20px; margin-bottom: 10px;">

Josh Meredith pushed to branch wip/js-boundsCheck at <a href="https://gitlab.haskell.org/ghc/ghc">Glasgow Haskell Compiler / GHC</a>

</h3>

<h4 style="margin-top: 10px; margin-bottom: 10px;">

Commits:

</h4>

<ul>

<li>

<strong style="font-weight: bold;"><a href="https://gitlab.haskell.org/ghc/ghc/-/commit/db5327f085b84f3a296d7347b63af6394dae026a">db5327f0</a></strong>

<div>

<span> by Josh Meredith </span> <i> at 2023-04-05T14:27:31+00:00 </i>

</div>

<pre class="commit-message" style='white-space: pre-wrap; display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: #fbfafd; border-radius: 2px; margin: 0; padding: 8px 12px; border: 1px solid #dcdcde;'>JS: fix bounds checking (Issue 23123)

For ByteArray-based bounds-checking, the JavaScript backend must use the

`len` field, instead of the inbuild JavaScript `length` field. Additionally,

range-based operations must also check both the start and end of the range

for bounds, if the range is greater than zero (all indicies are valid for

ranges of size zero, since they are essentially no-ops).

</pre>

</li>

</ul>

<h4 style="margin-top: 10px; margin-bottom: 10px;">

2 changed files:

</h4>

<ul>

<li class="file-stats">

<a href="#e09f1e9480e87656c84c1bbb39c1441b7884819d">

compiler/GHC/StgToJS/Prim.hs

</a>

</li>

<li class="file-stats">

<a href="#b9bba9766faf563ab195fb1402f14fa78ad5c66f">

testsuite/tests/codeGen/should_run/all.T

</a>

</li>

</ul>

<h4 style="margin-top: 10px; margin-bottom: 10px;">

Changes:

</h4>

<li id="e09f1e9480e87656c84c1bbb39c1441b7884819d">

<a href="https://gitlab.haskell.org/ghc/ghc/-/commit/db5327f085b84f3a296d7347b63af6394dae026a#e09f1e9480e87656c84c1bbb39c1441b7884819d"><strong style="font-weight: bold;">compiler/GHC/StgToJS/Prim.hs</strong></a>

<hr style="overflow: hidden; border: 1px solid #e1e1e1;">

<table class="code white" style="border-spacing: 0; border-collapse: collapse; width: auto; font-family: monospace; font-size: 90%;" bgcolor="#fff" width="100%" cellpadding="0" cellspacing="0">

<tr class="line_holder match" style="line-height: 1.6;">

<td class="diff-line-num unfold js-unfold old_line" data-linenumber="605" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="diff-line-num unfold js-unfold new_line" data-linenumber="605" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="line_content match" style="color: rgba(31,30,36,0.24); padding: inherit;" bgcolor="#fbfafd">@@ -605,12 +605,12 @@ genPrim prof bound ty op = case op of</td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="605" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

605

</td>

<td class="new_line diff-line-num" data-linenumber="605" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

605

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC605" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">SizeofByteArrayOp</span>                 <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">]</span>         <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"len"</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="606" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

606

</td>

<td class="new_line diff-line-num" data-linenumber="606" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

606

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC606" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">SizeofMutableByteArrayOp</span>          <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">]</span>         <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"len"</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="607" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

607

</td>

<td class="new_line diff-line-num" data-linenumber="607" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

607

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC607" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">GetSizeofMutableByteArrayOp</span>       <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">]</span>         <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"len"</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="608" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

608

</td>

<td class="new_line diff-line-num old" data-linenumber="608" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC608" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Char</span>             <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>       <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="609" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

609

</td>

<td class="new_line diff-line-num old" data-linenumber="608" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC609" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_WideChar</span>         <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>       <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="610" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

610

</td>

<td class="new_line diff-line-num old" data-linenumber="608" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC610" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Int</span>              <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>       <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="611" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

611

</td>

<td class="new_line diff-line-num old" data-linenumber="608" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC611" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word</span>             <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>       <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="612" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="608" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

608

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC608" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Char</span>             <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>       <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="612" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="609" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

609

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC609" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_WideChar</span>         <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>       <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="612" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="610" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

610

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC610" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Int</span>              <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>       <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="612" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="611" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

611

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC611" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word</span>             <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>       <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="612" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

612

</td>

<td class="new_line diff-line-num" data-linenumber="612" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

612

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC612" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Addr</span>             <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r1</span><span class="p">,</span><span class="n" style="color: #333;">r2</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>   <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="613" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

613

</td>

<td class="new_line diff-line-num old" data-linenumber="613" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC613" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">jVar</span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="n" style="color: #333;">t</span> <span class="o" style="font-weight: 600;">-></span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="614" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="613" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

613

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC613" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">jVar</span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="n" style="color: #333;">t</span> <span class="o" style="font-weight: 600;">-></span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="614" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

614

</td>

<td class="new_line diff-line-num" data-linenumber="614" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

614

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC614" class="line" lang="haskell">      <span class="p">[</span> <span class="n" style="color: #333;">t</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="615" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

615

</td>

<td class="new_line diff-line-num" data-linenumber="615" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

615

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC615" class="line" lang="haskell">      <span class="p">,</span> <span class="n" style="color: #333;">ifBlockS</span> <span class="p">(</span><span class="n" style="color: #333;">t</span> <span class="o" style="font-weight: 600;">.&&.</span> <span class="n" style="color: #333;">t</span> <span class="o" style="font-weight: 600;">.!</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">two_</span><span class="p">))</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="616" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

616

</td>

<td class="new_line diff-line-num" data-linenumber="616" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

616

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC616" class="line" lang="haskell">          <span class="p">[</span> <span class="n" style="color: #333;">r1</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">t</span> <span class="o" style="font-weight: 600;">.!</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">two_</span><span class="p">)</span> <span class="o" style="font-weight: 600;">.!</span> <span class="n" style="color: #333;">zero_</span></span>

</pre></td>

</tr>

<tr class="line_holder match" style="line-height: 1.6;">

<td class="diff-line-num unfold js-unfold old_line" data-linenumber="621" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="diff-line-num unfold js-unfold new_line" data-linenumber="621" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="line_content match" style="color: rgba(31,30,36,0.24); padding: inherit;" bgcolor="#fbfafd">@@ -621,31 +621,31 @@ genPrim prof bound ty op = case op of</td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="621" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

621

</td>

<td class="new_line diff-line-num" data-linenumber="621" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

621

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC621" class="line" lang="haskell">          <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="622" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

622

</td>

<td class="new_line diff-line-num" data-linenumber="622" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

622

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC622" class="line" lang="haskell">      <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="623" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

623

</td>

<td class="new_line diff-line-num" data-linenumber="623" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

623

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC623" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="624" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

624

</td>

<td class="new_line diff-line-num old" data-linenumber="624" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC624" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Float</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_f32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="625" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

625

</td>

<td class="new_line diff-line-num old" data-linenumber="624" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC625" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Double</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_f64</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="626" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="624" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

624

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC624" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Float</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_f32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="626" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="625" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

625

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC625" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Double</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_f64</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="626" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

626

</td>

<td class="new_line diff-line-num" data-linenumber="626" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

626

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC626" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_StablePtr</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r1</span><span class="p">,</span><span class="n" style="color: #333;">r2</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="627" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

627

</td>

<td class="new_line diff-line-num old" data-linenumber="627" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC627" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="628" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="627" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

627

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC627" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="628" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

628

</td>

<td class="new_line diff-line-num" data-linenumber="628" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

628

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC628" class="line" lang="haskell">      <span class="p">[</span> <span class="n" style="color: #333;">r1</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">var</span> <span class="s" style="color: #d14;">"h$stablePtrBuf"</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="629" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

629

</td>

<td class="new_line diff-line-num" data-linenumber="629" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

629

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC629" class="line" lang="haskell">      <span class="p">,</span> <span class="n" style="color: #333;">r2</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="630" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

630

</td>

<td class="new_line diff-line-num" data-linenumber="630" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

630

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC630" class="line" lang="haskell">      <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="631" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

631

</td>

<td class="new_line diff-line-num old" data-linenumber="631" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC631" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Int8</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>      <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="632" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

632

</td>

<td class="new_line diff-line-num old" data-linenumber="631" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC632" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Int16</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>      <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="633" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

633

</td>

<td class="new_line diff-line-num old" data-linenumber="631" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC633" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Int32</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>      <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="634" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

634

</td>

<td class="new_line diff-line-num old" data-linenumber="631" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC634" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Int64</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>    <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="635" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="631" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

631

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC631" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Int8</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>      <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="635" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="632" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

632

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC632" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Int16</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>      <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="635" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="633" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

633

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC633" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Int32</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>      <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="635" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="634" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

634

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC634" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Int64</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>    <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="635" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

635

</td>

<td class="new_line diff-line-num" data-linenumber="635" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

635

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC635" class="line" lang="haskell">                                                     <span class="p">[</span> <span class="n" style="color: #333;">h</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="636" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

636

</td>

<td class="new_line diff-line-num" data-linenumber="636" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

636

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC636" class="line" lang="haskell">                                                     <span class="p">,</span> <span class="n" style="color: #333;">l</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="637" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

637

</td>

<td class="new_line diff-line-num" data-linenumber="637" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

637

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC637" class="line" lang="haskell">                                                     <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="638" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

638

</td>

<td class="new_line diff-line-num old" data-linenumber="638" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC638" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="639" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

639

</td>

<td class="new_line diff-line-num old" data-linenumber="638" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC639" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word16</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="640" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

640

</td>

<td class="new_line diff-line-num old" data-linenumber="638" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC640" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word32</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="641" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

641

</td>

<td class="new_line diff-line-num old" data-linenumber="638" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC641" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word64</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="642" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="638" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

638

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC638" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="642" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="639" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

639

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC639" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word16</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="642" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="640" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

640

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC640" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word32</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="642" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="641" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

641

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC641" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word64</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="642" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

642

</td>

<td class="new_line diff-line-num" data-linenumber="642" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

642

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC642" class="line" lang="haskell">                                                      <span class="p">[</span> <span class="n" style="color: #333;">h</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="643" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

643

</td>

<td class="new_line diff-line-num" data-linenumber="643" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

643

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC643" class="line" lang="haskell">                                                      <span class="p">,</span> <span class="n" style="color: #333;">l</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="644" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

644

</td>

<td class="new_line diff-line-num" data-linenumber="644" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

644

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC644" class="line" lang="haskell">                                                      <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="645" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

645

</td>

<td class="new_line diff-line-num old" data-linenumber="645" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC645" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Char</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="646" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

646

</td>

<td class="new_line diff-line-num old" data-linenumber="645" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC646" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_WideChar</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="647" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

647

</td>

<td class="new_line diff-line-num old" data-linenumber="645" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC647" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Int</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="648" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

648

</td>

<td class="new_line diff-line-num old" data-linenumber="645" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC648" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="649" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="645" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

645

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC645" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Char</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="649" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="646" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

646

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC646" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_WideChar</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="649" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="647" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

647

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC647" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Int</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="649" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="648" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

648

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC648" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="649" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

649

</td>

<td class="new_line diff-line-num" data-linenumber="649" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

649

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC649" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Addr</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r1</span><span class="p">,</span><span class="n" style="color: #333;">r2</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="650" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

650

</td>

<td class="new_line diff-line-num" data-linenumber="650" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

650

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC650" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">jVar</span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">-></span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="651" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

651

</td>

<td class="new_line diff-line-num" data-linenumber="651" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

651

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC651" class="line" lang="haskell">        <span class="p">[</span> <span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">two_</span></span>

</pre></td>

</tr>

<tr class="line_holder match" style="line-height: 1.6;">

<td class="diff-line-num unfold js-unfold old_line" data-linenumber="655" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="diff-line-num unfold js-unfold new_line" data-linenumber="655" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="line_content match" style="color: rgba(31,30,36,0.24); padding: inherit;" bgcolor="#fbfafd">@@ -655,66 +655,66 @@ genPrim prof bound ty op = case op of</td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="655" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

655

</td>

<td class="new_line diff-line-num" data-linenumber="655" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

655

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC655" class="line" lang="haskell">                        <span class="p">])</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="656" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

656

</td>

<td class="new_line diff-line-num" data-linenumber="656" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

656

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC656" class="line" lang="haskell">               <span class="p">(</span><span class="n" style="color: #333;">mconcat</span> <span class="p">[</span><span class="n" style="color: #333;">r1</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">null_</span><span class="p">,</span> <span class="n" style="color: #333;">r2</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">one_</span><span class="p">])</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="657" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

657

</td>

<td class="new_line diff-line-num" data-linenumber="657" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

657

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC657" class="line" lang="haskell">        <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="658" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

658

</td>

<td class="new_line diff-line-num old" data-linenumber="658" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC658" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Float</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_f32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="659" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

659

</td>

<td class="new_line diff-line-num old" data-linenumber="658" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC659" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Double</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_f64</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="660" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="658" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

658

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC658" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Float</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_f32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="660" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="659" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

659

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC659" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Double</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_f64</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="660" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

660

</td>

<td class="new_line diff-line-num" data-linenumber="660" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

660

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC660" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_StablePtr</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r1</span><span class="p">,</span><span class="n" style="color: #333;">r2</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="661" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

661

</td>

<td class="new_line diff-line-num old" data-linenumber="661" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC661" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="662" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="661" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

661

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC661" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="662" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

662

</td>

<td class="new_line diff-line-num" data-linenumber="662" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

662

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC662" class="line" lang="haskell">       <span class="p">[</span> <span class="n" style="color: #333;">r1</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">var</span> <span class="s" style="color: #d14;">"h$stablePtrBuf"</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="663" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

663

</td>

<td class="new_line diff-line-num" data-linenumber="663" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

663

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC663" class="line" lang="haskell">       <span class="p">,</span> <span class="n" style="color: #333;">r2</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="664" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

664

</td>

<td class="new_line diff-line-num" data-linenumber="664" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

664

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC664" class="line" lang="haskell">       <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="665" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

665

</td>

<td class="new_line diff-line-num old" data-linenumber="665" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC665" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Int8</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="666" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

666

</td>

<td class="new_line diff-line-num old" data-linenumber="665" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC666" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Int16</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="667" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

667

</td>

<td class="new_line diff-line-num old" data-linenumber="665" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC667" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Int32</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="668" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="665" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

665

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC665" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Int8</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="668" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="666" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

666

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC666" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Int16</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="668" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="667" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

667

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC667" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Int32</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="668" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

668

</td>

<td class="new_line diff-line-num" data-linenumber="668" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

668

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC668" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Int64</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="669" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

669

</td>

<td class="new_line diff-line-num old" data-linenumber="669" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC669" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="670" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="669" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

669

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC669" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="670" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

670

</td>

<td class="new_line diff-line-num" data-linenumber="670" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

670

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC670" class="line" lang="haskell">        <span class="p">[</span> <span class="n" style="color: #333;">h</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="671" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

671

</td>

<td class="new_line diff-line-num" data-linenumber="671" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

671

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC671" class="line" lang="haskell">        <span class="p">,</span> <span class="n" style="color: #333;">l</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="672" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

672

</td>

<td class="new_line diff-line-num" data-linenumber="672" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

672

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC672" class="line" lang="haskell">        <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="673" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

673

</td>

<td class="new_line diff-line-num old" data-linenumber="673" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC673" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="674" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

674

</td>

<td class="new_line diff-line-num old" data-linenumber="673" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC674" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word16</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="675" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

675

</td>

<td class="new_line diff-line-num old" data-linenumber="673" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC675" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word32</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="676" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="673" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

673

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC673" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="676" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="674" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

674

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC674" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word16</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="676" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="675" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

675

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC675" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word32</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>     <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="676" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

676

</td>

<td class="new_line diff-line-num" data-linenumber="676" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

676

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC676" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word64</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="677" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

677

</td>

<td class="new_line diff-line-num old" data-linenumber="677" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC677" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="678" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="677" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

677

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC677" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="678" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

678

</td>

<td class="new_line diff-line-num" data-linenumber="678" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

678

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC678" class="line" lang="haskell">        <span class="p">[</span> <span class="n" style="color: #333;">h</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="679" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

679

</td>

<td class="new_line diff-line-num" data-linenumber="679" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

679

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC679" class="line" lang="haskell">        <span class="p">,</span> <span class="n" style="color: #333;">l</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="680" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

680

</td>

<td class="new_line diff-line-num" data-linenumber="680" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

680

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC680" class="line" lang="haskell">        <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="681" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

681

</td>

<td class="new_line diff-line-num old" data-linenumber="681" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC681" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Char</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="682" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

682

</td>

<td class="new_line diff-line-num old" data-linenumber="681" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC682" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_WideChar</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="683" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

683

</td>

<td class="new_line diff-line-num old" data-linenumber="681" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC683" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Int</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="684" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

684

</td>

<td class="new_line diff-line-num old" data-linenumber="681" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC684" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="685" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="681" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

681

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC681" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Char</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="685" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="682" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

682

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC682" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_WideChar</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="685" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="683" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

683

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC683" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Int</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="685" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="684" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

684

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC684" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="685" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

685

</td>

<td class="new_line diff-line-num" data-linenumber="685" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

685

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC685" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Addr</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e1</span><span class="p">,</span><span class="n" style="color: #333;">e2</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="686" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

686

</td>

<td class="new_line diff-line-num" data-linenumber="686" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

686

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC686" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="687" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

687

</td>

<td class="new_line diff-line-num" data-linenumber="687" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

687

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC687" class="line" lang="haskell">      <span class="p">[</span> <span class="n" style="color: #333;">ifS</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Not</span> <span class="p">(</span><span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span><span class="p">))</span> <span class="p">(</span><span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span> <span class="o" style="font-weight: 600;">|=</span> <span class="kt" style="color: #458; font-weight: 600;">ValExpr</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">JList</span> <span class="kt" style="color: #458; font-weight: 600;">[]</span><span class="p">))</span> <span class="n" style="color: #333;">mempty</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="688" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

688

</td>

<td class="new_line diff-line-num" data-linenumber="688" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

688

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC688" class="line" lang="haskell">      <span class="p">,</span> <span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span> <span class="o" style="font-weight: 600;">.!</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">two_</span><span class="p">)</span> <span class="o" style="font-weight: 600;">|=</span> <span class="kt" style="color: #458; font-weight: 600;">ValExpr</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">JList</span> <span class="p">[</span><span class="n" style="color: #333;">e1</span><span class="p">,</span> <span class="n" style="color: #333;">e2</span><span class="p">])</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="689" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

689

</td>

<td class="new_line diff-line-num" data-linenumber="689" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

689

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC689" class="line" lang="haskell">      <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="690" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

690

</td>

<td class="new_line diff-line-num old" data-linenumber="690" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC690" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Float</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>      <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_f32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="691" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

691

</td>

<td class="new_line diff-line-num old" data-linenumber="690" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC691" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Double</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>      <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_f64</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="692" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

692

</td>

<td class="new_line diff-line-num old" data-linenumber="690" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC692" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_StablePtr</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">_e1</span><span class="p">,</span><span class="n" style="color: #333;">e2</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e2</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="693" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="690" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

690

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC690" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Float</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>      <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_f32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="693" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="691" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

691

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC691" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Double</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>      <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_f64</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="693" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="692" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

692

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC692" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_StablePtr</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">_e1</span><span class="p">,</span><span class="n" style="color: #333;">e2</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e2</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="693" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

693

</td>

<td class="new_line diff-line-num" data-linenumber="693" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

693

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC693" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="694" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

694

</td>

<td class="new_line diff-line-num old" data-linenumber="694" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC694" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Int8</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="695" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

695

</td>

<td class="new_line diff-line-num old" data-linenumber="694" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC695" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Int16</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="696" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

696

</td>

<td class="new_line diff-line-num old" data-linenumber="694" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC696" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Int32</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="697" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="694" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

694

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC694" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Int8</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="697" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="695" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

695

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC695" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Int16</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="697" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="696" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

696

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC696" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Int32</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="697" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

697

</td>

<td class="new_line diff-line-num" data-linenumber="697" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

697

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC697" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Int64</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e1</span><span class="p">,</span><span class="n" style="color: #333;">e2</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="698" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

698

</td>

<td class="new_line diff-line-num old" data-linenumber="698" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC698" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="699" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="698" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

698

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC698" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="699" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

699

</td>

<td class="new_line diff-line-num" data-linenumber="699" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

699

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC699" class="line" lang="haskell">        <span class="p">[</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="n" style="color: #333;">e1</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="700" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

700

</td>

<td class="new_line diff-line-num" data-linenumber="700" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

700

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC700" class="line" lang="haskell">        <span class="p">,</span> <span class="n" style="color: #333;">write_u32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span>            <span class="n" style="color: #333;">e2</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="701" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

701

</td>

<td class="new_line diff-line-num" data-linenumber="701" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

701

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC701" class="line" lang="haskell">        <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="702" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

702

</td>

<td class="new_line diff-line-num old" data-linenumber="702" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC702" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="703" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

703

</td>

<td class="new_line diff-line-num old" data-linenumber="702" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC703" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word16</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_u16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="704" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

704

</td>

<td class="new_line diff-line-num old" data-linenumber="702" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC704" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word32</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="705" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="702" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

702

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC702" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="705" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="703" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

703

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC703" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word16</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_u16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="705" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="704" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

704

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC704" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word32</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="705" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

705

</td>

<td class="new_line diff-line-num" data-linenumber="705" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

705

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC705" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word64</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="706" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

706

</td>

<td class="new_line diff-line-num old" data-linenumber="706" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC706" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="707" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="706" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

706

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC706" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="707" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

707

</td>

<td class="new_line diff-line-num" data-linenumber="707" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

707

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC707" class="line" lang="haskell">        <span class="p">[</span> <span class="n" style="color: #333;">write_u32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="n" style="color: #333;">h</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="708" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

708

</td>

<td class="new_line diff-line-num" data-linenumber="708" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

708

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC708" class="line" lang="haskell">        <span class="p">,</span> <span class="n" style="color: #333;">write_u32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span>            <span class="n" style="color: #333;">l</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="709" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

709

</td>

<td class="new_line diff-line-num" data-linenumber="709" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

709

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC709" class="line" lang="haskell">        <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="710" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

710

</td>

<td class="new_line diff-line-num" data-linenumber="710" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

710

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC710" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CompareByteArraysOp</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a1</span><span class="p">,</span><span class="n" style="color: #333;">o1</span><span class="p">,</span><span class="n" style="color: #333;">a2</span><span class="p">,</span><span class="n" style="color: #333;">o2</span><span class="p">,</span><span class="n" style="color: #333;">n</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="711" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

711

</td>

<td class="new_line diff-line-num old" data-linenumber="711" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC711" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a1</span> <span class="p"><span class="idiff left deletion" style="background-color: #fac5cd;">(</span></span><span class="kt" style="color: #458; font-weight: 600;"><span class="idiff deletion" style="background-color: #fac5cd;">Add</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="n" style="color: #333;"><span class="idiff deletion" style="background-color: #fac5cd;">o1</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="p"><span class="idiff deletion" style="background-color: #fac5cd;">(</span></span><span class="kt" style="color: #458; font-weight: 600;"><span class="idiff deletion" style="background-color: #fac5cd;">Sub</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="n" style="color: #333;"><span class="idiff deletion" style="background-color: #fac5cd;">n</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="mi" style="color: #099;"><span class="idiff deletion" style="background-color: #fac5cd;">1</span></span><span class="p"><span class="idiff right deletion" style="background-color: #fac5cd;">))</span></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="712" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

712

</td>

<td class="new_line diff-line-num old" data-linenumber="711" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC712" class="line" lang="haskell">                 <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a2</span> <span class="p"><span class="idiff left deletion" style="background-color: #fac5cd;">(</span></span><span class="kt" style="color: #458; font-weight: 600;"><span class="idiff deletion" style="background-color: #fac5cd;">Add</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="n" style="color: #333;"><span class="idiff deletion" style="background-color: #fac5cd;">o2</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="p"><span class="idiff deletion" style="background-color: #fac5cd;">(</span></span><span class="kt" style="color: #458; font-weight: 600;"><span class="idiff deletion" style="background-color: #fac5cd;">Sub</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="n" style="color: #333;"><span class="idiff deletion" style="background-color: #fac5cd;">n</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="mi" style="color: #099;"><span class="idiff deletion" style="background-color: #fac5cd;">1</span></span><span class="p"><span class="idiff right deletion" style="background-color: #fac5cd;">))</span></span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="713" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="711" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

711

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC711" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left addition" style="background-color: #c7f0d2;">RangeLen</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a1</span> <span class="n" style="color: #333;"><span class="idiff addition" style="background-color: #c7f0d2;">o1</span></span><span class="idiff addition" style="background-color: #c7f0d2;"> </span><span class="n" style="color: #333;"><span class="idiff right addition" style="background-color: #c7f0d2;">n</span></span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="713" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="712" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

712

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC712" class="line" lang="haskell">                 <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left addition" style="background-color: #c7f0d2;">RangeLen</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a2</span> <span class="n" style="color: #333;"><span class="idiff addition" style="background-color: #c7f0d2;">o2</span></span><span class="idiff addition" style="background-color: #c7f0d2;"> </span><span class="n" style="color: #333;"><span class="idiff right addition" style="background-color: #c7f0d2;">n</span></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="713" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

713

</td>

<td class="new_line diff-line-num" data-linenumber="713" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

713

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC713" class="line" lang="haskell">                 <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">app</span> <span class="s" style="color: #d14;">"h$compareByteArrays"</span> <span class="p">[</span><span class="n" style="color: #333;">a1</span><span class="p">,</span><span class="n" style="color: #333;">o1</span><span class="p">,</span><span class="n" style="color: #333;">a2</span><span class="p">,</span><span class="n" style="color: #333;">o2</span><span class="p">,</span><span class="n" style="color: #333;">n</span><span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="714" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

714

</td>

<td class="new_line diff-line-num" data-linenumber="714" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

714

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC714" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="715" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

715

</td>

<td class="new_line diff-line-num" data-linenumber="715" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

715

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC715" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CopyByteArrayOp</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a1</span><span class="p">,</span><span class="n" style="color: #333;">o1</span><span class="p">,</span><span class="n" style="color: #333;">a2</span><span class="p">,</span><span class="n" style="color: #333;">o2</span><span class="p">,</span><span class="n" style="color: #333;">n</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="716" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

716

</td>

<td class="new_line diff-line-num old" data-linenumber="716" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC716" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a1</span> <span class="p"><span class="idiff left deletion" style="background-color: #fac5cd;">(</span></span><span class="kt" style="color: #458; font-weight: 600;"><span class="idiff deletion" style="background-color: #fac5cd;">Add</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="n" style="color: #333;"><span class="idiff deletion" style="background-color: #fac5cd;">o1</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="p"><span class="idiff deletion" style="background-color: #fac5cd;">(</span></span><span class="kt" style="color: #458; font-weight: 600;"><span class="idiff deletion" style="background-color: #fac5cd;">Sub</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="n" style="color: #333;"><span class="idiff deletion" style="background-color: #fac5cd;">n</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="mi" style="color: #099;"><span class="idiff deletion" style="background-color: #fac5cd;">1</span></span><span class="p"><span class="idiff right deletion" style="background-color: #fac5cd;">))</span></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="717" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

717

</td>

<td class="new_line diff-line-num old" data-linenumber="716" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC717" class="line" lang="haskell">                 <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a2</span> <span class="p"><span class="idiff left deletion" style="background-color: #fac5cd;">(</span></span><span class="kt" style="color: #458; font-weight: 600;"><span class="idiff deletion" style="background-color: #fac5cd;">Add</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="n" style="color: #333;"><span class="idiff deletion" style="background-color: #fac5cd;">o2</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="p"><span class="idiff deletion" style="background-color: #fac5cd;">(</span></span><span class="kt" style="color: #458; font-weight: 600;"><span class="idiff deletion" style="background-color: #fac5cd;">Sub</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="n" style="color: #333;"><span class="idiff deletion" style="background-color: #fac5cd;">n</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="mi" style="color: #099;"><span class="idiff deletion" style="background-color: #fac5cd;">1</span></span><span class="p"><span class="idiff right deletion" style="background-color: #fac5cd;">))</span></span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="718" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="716" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

716

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC716" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left addition" style="background-color: #c7f0d2;">RangeLen</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a1</span> <span class="n" style="color: #333;"><span class="idiff addition" style="background-color: #c7f0d2;">o1</span></span><span class="idiff addition" style="background-color: #c7f0d2;"> </span><span class="n" style="color: #333;"><span class="idiff right addition" style="background-color: #c7f0d2;">n</span></span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="718" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="717" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

717

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC717" class="line" lang="haskell">                 <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left addition" style="background-color: #c7f0d2;">RangeLen</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a2</span> <span class="n" style="color: #333;"><span class="idiff addition" style="background-color: #c7f0d2;">o2</span></span><span class="idiff addition" style="background-color: #c7f0d2;"> </span><span class="n" style="color: #333;"><span class="idiff right addition" style="background-color: #c7f0d2;">n</span></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="718" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

718

</td>

<td class="new_line diff-line-num" data-linenumber="718" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

718

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC718" class="line" lang="haskell">                 <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">appS</span> <span class="s" style="color: #d14;">"h$copyMutableByteArray"</span> <span class="p">[</span><span class="n" style="color: #333;">a1</span><span class="p">,</span><span class="n" style="color: #333;">o1</span><span class="p">,</span><span class="n" style="color: #333;">a2</span><span class="p">,</span><span class="n" style="color: #333;">o2</span><span class="p">,</span><span class="n" style="color: #333;">n</span><span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="719" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

719

</td>

<td class="new_line diff-line-num" data-linenumber="719" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

719

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC719" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CopyMutableByteArrayOp</span>       <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="n" style="color: #333;">xs</span><span class="o" style="font-weight: 600;">@</span><span class="p">[</span><span class="n" style="color: #333;">_a1</span><span class="p">,</span><span class="n" style="color: #333;">_o1</span><span class="p">,</span><span class="n" style="color: #333;">_a2</span><span class="p">,</span><span class="n" style="color: #333;">_o2</span><span class="p">,</span><span class="n" style="color: #333;">_n</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="n" style="color: #333;">genPrim</span> <span class="n" style="color: #333;">prof</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">ty</span> <span class="kt" style="color: #458; font-weight: 600;">CopyByteArrayOp</span> <span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="n" style="color: #333;">xs</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="720" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

720

</td>

<td class="new_line diff-line-num" data-linenumber="720" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

720

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC720" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CopyMutableByteArrayNonOverlappingOp</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="n" style="color: #333;">xs</span><span class="o" style="font-weight: 600;">@</span><span class="p">[</span><span class="n" style="color: #333;">_a1</span><span class="p">,</span><span class="n" style="color: #333;">_o1</span><span class="p">,</span><span class="n" style="color: #333;">_a2</span><span class="p">,</span><span class="n" style="color: #333;">_o2</span><span class="p">,</span><span class="n" style="color: #333;">_n</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="n" style="color: #333;">genPrim</span> <span class="n" style="color: #333;">prof</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">ty</span> <span class="kt" style="color: #458; font-weight: 600;">CopyByteArrayOp</span> <span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="n" style="color: #333;">xs</span></span>

</pre></td>

</tr>

<tr class="line_holder match" style="line-height: 1.6;">

<td class="diff-line-num unfold js-unfold old_line" data-linenumber="725" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="diff-line-num unfold js-unfold new_line" data-linenumber="725" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="line_content match" style="color: rgba(31,30,36,0.24); padding: inherit;" bgcolor="#fbfafd">@@ -725,20 +725,20 @@ genPrim prof bound ty op = case op of</td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="725" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

725

</td>

<td class="new_line diff-line-num" data-linenumber="725" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

725

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC725" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CopyAddrToAddrNonOverlappingOp</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="n" style="color: #333;">xs</span><span class="o" style="font-weight: 600;">@</span><span class="p">[</span><span class="n" style="color: #333;">_ba</span><span class="p">,</span><span class="n" style="color: #333;">_bo</span><span class="p">,</span><span class="n" style="color: #333;">_aa</span><span class="p">,</span><span class="n" style="color: #333;">_ao</span><span class="p">,</span><span class="n" style="color: #333;">_n</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="n" style="color: #333;">genPrim</span> <span class="n" style="color: #333;">prof</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">ty</span> <span class="kt" style="color: #458; font-weight: 600;">CopyByteArrayOp</span> <span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="n" style="color: #333;">xs</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="726" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

726

</td>

<td class="new_line diff-line-num" data-linenumber="726" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

726

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC726" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="727" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

727

</td>

<td class="new_line diff-line-num" data-linenumber="727" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

727

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC727" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">SetByteArrayOp</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">o</span><span class="p">,</span><span class="n" style="color: #333;">n</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="728" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

728

</td>

<td class="new_line diff-line-num old" data-linenumber="728" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC728" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p"><span class="idiff left deletion" style="background-color: #fac5cd;">(</span></span><span class="kt" style="color: #458; font-weight: 600;"><span class="idiff deletion" style="background-color: #fac5cd;">Add</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="n" style="color: #333;"><span class="idiff deletion" style="background-color: #fac5cd;">o</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="p"><span class="idiff deletion" style="background-color: #fac5cd;">(</span></span><span class="kt" style="color: #458; font-weight: 600;"><span class="idiff deletion" style="background-color: #fac5cd;">Sub</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="n" style="color: #333;"><span class="idiff deletion" style="background-color: #fac5cd;">n</span></span><span class="idiff deletion" style="background-color: #fac5cd;"> </span><span class="mi" style="color: #099;"><span class="idiff deletion" style="background-color: #fac5cd;">1</span></span><span class="p"><span class="idiff right deletion" style="background-color: #fac5cd;">))</span></span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">loopBlockS</span> <span class="n" style="color: #333;">zero_</span> <span class="p">(</span><span class="o" style="font-weight: 600;">.<.</span> <span class="n" style="color: #333;">n</span><span class="p">)</span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="729" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="728" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

728

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC728" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left addition" style="background-color: #c7f0d2;">RangeLen</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;"><span class="idiff addition" style="background-color: #c7f0d2;">o</span></span><span class="idiff addition" style="background-color: #c7f0d2;"> </span><span class="n" style="color: #333;"><span class="idiff right addition" style="background-color: #c7f0d2;">n</span></span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">loopBlockS</span> <span class="n" style="color: #333;">zero_</span> <span class="p">(</span><span class="o" style="font-weight: 600;">.<.</span> <span class="n" style="color: #333;">n</span><span class="p">)</span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="729" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

729

</td>

<td class="new_line diff-line-num" data-linenumber="729" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

729

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC729" class="line" lang="haskell">        <span class="p">[</span> <span class="n" style="color: #333;">write_u8</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">o</span> <span class="n" style="color: #333;">i</span><span class="p">)</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="730" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

730

</td>

<td class="new_line diff-line-num" data-linenumber="730" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

730

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC730" class="line" lang="haskell">        <span class="p">,</span> <span class="n" style="color: #333;">postIncrS</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="731" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

731

</td>

<td class="new_line diff-line-num" data-linenumber="731" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

731

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC731" class="line" lang="haskell">        <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="732" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

732

</td>

<td class="new_line diff-line-num" data-linenumber="732" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

732

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC732" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">SetAddrRangeOp</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="n" style="color: #333;">xs</span><span class="o" style="font-weight: 600;">@</span><span class="p">[</span><span class="n" style="color: #333;">_a</span><span class="p">,</span><span class="n" style="color: #333;">_o</span><span class="p">,</span><span class="n" style="color: #333;">_n</span><span class="p">,</span><span class="n" style="color: #333;">_v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="n" style="color: #333;">genPrim</span> <span class="n" style="color: #333;">prof</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">ty</span> <span class="kt" style="color: #458; font-weight: 600;">SetByteArrayOp</span> <span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="n" style="color: #333;">xs</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="733" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

733

</td>

<td class="new_line diff-line-num" data-linenumber="733" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

733

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC733" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="734" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

734

</td>

<td class="new_line diff-line-num old" data-linenumber="734" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC734" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">AtomicReadByteArrayOp_Int</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>         <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="735" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

735

</td>

<td class="new_line diff-line-num old" data-linenumber="734" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC735" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">AtomicWriteByteArrayOp_Int</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span>    <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span>       <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="736" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

736

</td>

<td class="new_line diff-line-num old" data-linenumber="734" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC736" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">FetchAddByteArrayOp_Int</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">fetchOpByteArray</span> <span class="kt" style="color: #458; font-weight: 600;">Add</span>  <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="737" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

737

</td>

<td class="new_line diff-line-num old" data-linenumber="734" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC737" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">FetchSubByteArrayOp_Int</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">fetchOpByteArray</span> <span class="kt" style="color: #458; font-weight: 600;">Sub</span>  <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="738" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

738

</td>

<td class="new_line diff-line-num old" data-linenumber="734" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC738" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">FetchAndByteArrayOp_Int</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">fetchOpByteArray</span> <span class="kt" style="color: #458; font-weight: 600;">BAnd</span> <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="739" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

739

</td>

<td class="new_line diff-line-num old" data-linenumber="734" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC739" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">FetchOrByteArrayOp_Int</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">fetchOpByteArray</span> <span class="kt" style="color: #458; font-weight: 600;">BOr</span>  <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="740" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

740

</td>

<td class="new_line diff-line-num old" data-linenumber="734" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC740" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">FetchNandByteArrayOp_Int</span>   <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">fetchOpByteArray</span> <span class="p">(</span><span class="nf" style="color: #900; font-weight: 600;">\</span><span class="n" style="color: #333;">x</span> <span class="n" style="color: #333;">y</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">BNot</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">BAnd</span> <span class="n" style="color: #333;">x</span> <span class="n" style="color: #333;">y</span><span class="p">))</span> <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="741" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

741

</td>

<td class="new_line diff-line-num old" data-linenumber="734" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC741" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">FetchXorByteArrayOp_Int</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">fetchOpByteArray</span> <span class="kt" style="color: #458; font-weight: 600;">BXor</span> <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="742" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="734" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

734

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC734" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">AtomicReadByteArrayOp_Int</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span>         <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="742" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="735" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

735

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC735" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">AtomicWriteByteArrayOp_Int</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span>    <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span>       <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="742" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="736" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

736

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC736" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">FetchAddByteArrayOp_Int</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">fetchOpByteArray</span> <span class="kt" style="color: #458; font-weight: 600;">Add</span>  <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="742" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="737" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

737

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC737" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">FetchSubByteArrayOp_Int</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">fetchOpByteArray</span> <span class="kt" style="color: #458; font-weight: 600;">Sub</span>  <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="742" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="738" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

738

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC738" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">FetchAndByteArrayOp_Int</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">fetchOpByteArray</span> <span class="kt" style="color: #458; font-weight: 600;">BAnd</span> <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="742" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="739" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

739

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC739" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">FetchOrByteArrayOp_Int</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">fetchOpByteArray</span> <span class="kt" style="color: #458; font-weight: 600;">BOr</span>  <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="742" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="740" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

740

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC740" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">FetchNandByteArrayOp_Int</span>   <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">fetchOpByteArray</span> <span class="p">(</span><span class="nf" style="color: #900; font-weight: 600;">\</span><span class="n" style="color: #333;">x</span> <span class="n" style="color: #333;">y</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">BNot</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">BAnd</span> <span class="n" style="color: #333;">x</span> <span class="n" style="color: #333;">y</span><span class="p">))</span> <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="742" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="741" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

741

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC741" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">FetchXorByteArrayOp_Int</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span>   <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">v</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">fetchOpByteArray</span> <span class="kt" style="color: #458; font-weight: 600;">BXor</span> <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">v</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="742" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

742

</td>

<td class="new_line diff-line-num" data-linenumber="742" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

742

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC742" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="743" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

743

</td>

<td class="new_line diff-line-num" data-linenumber="743" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

743

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC743" class="line" lang="haskell"><span class="c1" style="color: #998; font-style: italic;">------------------------------- Addr# ------------------------------------------</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="744" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

744

</td>

<td class="new_line diff-line-num" data-linenumber="744" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

744

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC744" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder match" style="line-height: 1.6;">

<td class="diff-line-num unfold js-unfold old_line" data-linenumber="1031" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="diff-line-num unfold js-unfold new_line" data-linenumber="1031" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="line_content match" style="color: rgba(31,30,36,0.24); padding: inherit;" bgcolor="#fbfafd">@@ -1031,115 +1031,115 @@ genPrim prof bound ty op = case op of</td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1031" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1031

</td>

<td class="new_line diff-line-num" data-linenumber="1031" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1031

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1031" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">TraceEventBinaryOp</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">ed</span><span class="p">,</span><span class="n" style="color: #333;">eo</span><span class="p">,</span><span class="n" style="color: #333;">len</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">appS</span> <span class="s" style="color: #d14;">"h$traceEventBinary"</span> <span class="p">[</span><span class="n" style="color: #333;">ed</span><span class="p">,</span><span class="n" style="color: #333;">eo</span><span class="p">,</span><span class="n" style="color: #333;">len</span><span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1032" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1032

</td>

<td class="new_line diff-line-num" data-linenumber="1032" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1032

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1032" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">TraceMarkerOp</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">ed</span><span class="p">,</span><span class="n" style="color: #333;">eo</span><span class="p">]</span>     <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">appS</span> <span class="s" style="color: #d14;">"h$traceMarker"</span> <span class="p">[</span><span class="n" style="color: #333;">ed</span><span class="p">,</span><span class="n" style="color: #333;">eo</span><span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1033" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1033

</td>

<td class="new_line diff-line-num" data-linenumber="1033" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1033

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1033" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1034" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1034

</td>

<td class="new_line diff-line-num old" data-linenumber="1034" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1034" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsChar</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1035" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1035

</td>

<td class="new_line diff-line-num old" data-linenumber="1034" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1035" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsWideChar</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1036" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1034" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1034

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1034" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsChar</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1036" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1035" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1035

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1035" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsWideChar</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1036" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1036

</td>

<td class="new_line diff-line-num" data-linenumber="1036" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1036

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1036" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsAddr</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r1</span><span class="p">,</span><span class="n" style="color: #333;">r2</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1037" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1037

</td>

<td class="new_line diff-line-num" data-linenumber="1037" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1037

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1037" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">jVar</span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">-></span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1038" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1038

</td>

<td class="new_line diff-line-num" data-linenumber="1038" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1038

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1038" class="line" lang="haskell">        <span class="p">[</span> <span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">two_</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1039" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1039

</td>

<td class="new_line diff-line-num old" data-linenumber="1039" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1039" class="line" lang="haskell">        <span class="p">,</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="p">(</span><span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span><span class="p">)</span> <span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">$</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1040" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1039" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1039

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1039" class="line" lang="haskell">        <span class="p">,</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="p">(</span><span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span><span class="p">)</span> <span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">$</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1040" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1040

</td>

<td class="new_line diff-line-num" data-linenumber="1040" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1040

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1040" class="line" lang="haskell">          <span class="n" style="color: #333;">ifS</span> <span class="p">(</span><span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span> <span class="o" style="font-weight: 600;">.&&.</span> <span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span> <span class="o" style="font-weight: 600;">.!</span> <span class="n" style="color: #333;">x</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1041" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1041

</td>

<td class="new_line diff-line-num" data-linenumber="1041" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1041

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1041" class="line" lang="haskell">               <span class="p">(</span><span class="n" style="color: #333;">mconcat</span> <span class="p">[</span> <span class="n" style="color: #333;">r1</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span> <span class="o" style="font-weight: 600;">.!</span> <span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">.!</span> <span class="n" style="color: #333;">zero_</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1042" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1042

</td>

<td class="new_line diff-line-num" data-linenumber="1042" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1042

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1042" class="line" lang="haskell">                        <span class="p">,</span> <span class="n" style="color: #333;">r2</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span> <span class="o" style="font-weight: 600;">.!</span> <span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">.!</span> <span class="n" style="color: #333;">one_</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1043" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1043

</td>

<td class="new_line diff-line-num" data-linenumber="1043" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1043

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1043" class="line" lang="haskell">                        <span class="p">])</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1044" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1044

</td>

<td class="new_line diff-line-num" data-linenumber="1044" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1044

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1044" class="line" lang="haskell">               <span class="p">(</span><span class="n" style="color: #333;">mconcat</span> <span class="p">[</span><span class="n" style="color: #333;">r1</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">null_</span><span class="p">,</span> <span class="n" style="color: #333;">r2</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">one_</span><span class="p">])</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1045" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1045

</td>

<td class="new_line diff-line-num" data-linenumber="1045" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1045

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1045" class="line" lang="haskell">        <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1046" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1046

</td>

<td class="new_line diff-line-num old" data-linenumber="1046" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1046" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsFloat</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_f32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1047" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1047

</td>

<td class="new_line diff-line-num old" data-linenumber="1046" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1047" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsDouble</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_f64</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1048" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1046" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1046

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1046" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsFloat</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_f32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1048" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1047" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1047

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1047" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsDouble</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_f64</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1048" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1048

</td>

<td class="new_line diff-line-num" data-linenumber="1048" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1048

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1048" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsStablePtr</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r1</span><span class="p">,</span><span class="n" style="color: #333;">r2</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1049" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1049

</td>

<td class="new_line diff-line-num" data-linenumber="1049" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1049

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1049" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1050" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1050

</td>

<td class="new_line diff-line-num" data-linenumber="1050" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1050

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1050" class="line" lang="haskell">    <span class="p">[</span> <span class="n" style="color: #333;">r1</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">var</span> <span class="s" style="color: #d14;">"h$stablePtrBuf"</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1051" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1051

</td>

<td class="new_line diff-line-num" data-linenumber="1051" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1051

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1051" class="line" lang="haskell">    <span class="p">,</span> <span class="n" style="color: #333;">r2</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1052" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1052

</td>

<td class="new_line diff-line-num" data-linenumber="1052" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1052

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1052" class="line" lang="haskell">    <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1053" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1053

</td>

<td class="new_line diff-line-num old" data-linenumber="1053" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1053" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsInt16</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1054" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1054

</td>

<td class="new_line diff-line-num old" data-linenumber="1053" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1054" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsInt32</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1055" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1053" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1053

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1053" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsInt16</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1055" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1054" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1054

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1054" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsInt32</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1055" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1055

</td>

<td class="new_line diff-line-num" data-linenumber="1055" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1055

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1055" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsInt64</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1056" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1056

</td>

<td class="new_line diff-line-num" data-linenumber="1056" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1056

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1056" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1057" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1057

</td>

<td class="new_line diff-line-num" data-linenumber="1057" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1057

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1057" class="line" lang="haskell">        <span class="p">[</span> <span class="n" style="color: #333;">h</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Int</span> <span class="mi" style="color: #099;">4</span><span class="p">))</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1058" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1058

</td>

<td class="new_line diff-line-num" data-linenumber="1058" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1058

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1058" class="line" lang="haskell">        <span class="p">,</span> <span class="n" style="color: #333;">l</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1059" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1059

</td>

<td class="new_line diff-line-num" data-linenumber="1059" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1059

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1059" class="line" lang="haskell">        <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1060" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1060

</td>

<td class="new_line diff-line-num old" data-linenumber="1060" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1060" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsInt</span>       <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1061" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1061

</td>

<td class="new_line diff-line-num old" data-linenumber="1060" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1061" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsWord16</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u16</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1062" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1062

</td>

<td class="new_line diff-line-num old" data-linenumber="1060" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1062" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsWord32</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1063" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1060" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1060

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1060" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsInt</span>       <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1063" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1061" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1061

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1061" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsWord16</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u16</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1063" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1062" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1062

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1062" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsWord32</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1063" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1063

</td>

<td class="new_line diff-line-num" data-linenumber="1063" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1063

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1063" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsWord64</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1064" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1064

</td>

<td class="new_line diff-line-num old" data-linenumber="1064" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1064" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1065" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1064" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1064

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1064" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1065" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1065

</td>

<td class="new_line diff-line-num" data-linenumber="1065" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1065

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1065" class="line" lang="haskell">        <span class="p">[</span> <span class="n" style="color: #333;">h</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Int</span> <span class="mi" style="color: #099;">4</span><span class="p">))</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1066" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1066

</td>

<td class="new_line diff-line-num" data-linenumber="1066" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1066

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1066" class="line" lang="haskell">        <span class="p">,</span> <span class="n" style="color: #333;">l</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1067" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1067

</td>

<td class="new_line diff-line-num" data-linenumber="1067" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1067

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1067" class="line" lang="haskell">        <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1068" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1068

</td>

<td class="new_line diff-line-num old" data-linenumber="1068" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1068" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsWord</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1069" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1068" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1068

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1068" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">IndexByteArrayOp_Word8AsWord</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1069" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1069

</td>

<td class="new_line diff-line-num" data-linenumber="1069" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1069

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1069" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1070" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1070

</td>

<td class="new_line diff-line-num old" data-linenumber="1070" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1070" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsChar</span>       <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1071" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1071

</td>

<td class="new_line diff-line-num old" data-linenumber="1070" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1071" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsWideChar</span>   <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1072" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1070" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1070

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1070" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsChar</span>       <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1072" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1071" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1071

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1071" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsWideChar</span>   <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1072" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1072

</td>

<td class="new_line diff-line-num" data-linenumber="1072" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1072

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1072" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsAddr</span>       <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r1</span><span class="p">,</span><span class="n" style="color: #333;">r2</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1073" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1073

</td>

<td class="new_line diff-line-num" data-linenumber="1073" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1073

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1073" class="line" lang="haskell">      <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">jVar</span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">-></span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1074" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1074

</td>

<td class="new_line diff-line-num" data-linenumber="1074" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1074

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1074" class="line" lang="haskell">        <span class="p">[</span> <span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">two_</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1075" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1075

</td>

<td class="new_line diff-line-num old" data-linenumber="1075" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1075" class="line" lang="haskell">        <span class="p">,</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="p">(</span><span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span><span class="p">)</span> <span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">$</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1076" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1075" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1075

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1075" class="line" lang="haskell">        <span class="p">,</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="p">(</span><span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span><span class="p">)</span> <span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">$</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1076" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1076

</td>

<td class="new_line diff-line-num" data-linenumber="1076" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1076

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1076" class="line" lang="haskell">          <span class="n" style="color: #333;">ifS</span> <span class="p">(</span><span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span> <span class="o" style="font-weight: 600;">.&&.</span> <span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span> <span class="o" style="font-weight: 600;">.!</span> <span class="n" style="color: #333;">x</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1077" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1077

</td>

<td class="new_line diff-line-num" data-linenumber="1077" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1077

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1077" class="line" lang="haskell">               <span class="p">(</span><span class="n" style="color: #333;">mconcat</span> <span class="p">[</span> <span class="n" style="color: #333;">r1</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span> <span class="o" style="font-weight: 600;">.!</span> <span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">.!</span> <span class="n" style="color: #333;">zero_</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1078" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1078

</td>

<td class="new_line diff-line-num" data-linenumber="1078" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1078

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1078" class="line" lang="haskell">                        <span class="p">,</span> <span class="n" style="color: #333;">r2</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span> <span class="o" style="font-weight: 600;">.!</span> <span class="n" style="color: #333;">x</span> <span class="o" style="font-weight: 600;">.!</span> <span class="n" style="color: #333;">one_</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1079" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1079

</td>

<td class="new_line diff-line-num" data-linenumber="1079" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1079

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1079" class="line" lang="haskell">                        <span class="p">])</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1080" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1080

</td>

<td class="new_line diff-line-num" data-linenumber="1080" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1080

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1080" class="line" lang="haskell">               <span class="p">(</span><span class="n" style="color: #333;">mconcat</span> <span class="p">[</span><span class="n" style="color: #333;">r1</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">null_</span><span class="p">,</span> <span class="n" style="color: #333;">r2</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">one_</span><span class="p">])</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1081" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1081

</td>

<td class="new_line diff-line-num" data-linenumber="1081" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1081

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1081" class="line" lang="haskell">        <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1082" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1082

</td>

<td class="new_line diff-line-num old" data-linenumber="1082" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1082" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsFloat</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_f32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1083" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1083

</td>

<td class="new_line diff-line-num old" data-linenumber="1082" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1083" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsDouble</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_f64</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1084" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1082" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1082

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1082" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsFloat</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_f32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1084" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1083" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1083

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1083" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsDouble</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_f64</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1084" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1084

</td>

<td class="new_line diff-line-num" data-linenumber="1084" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1084

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1084" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsStablePtr</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r1</span><span class="p">,</span><span class="n" style="color: #333;">r2</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1085" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1085

</td>

<td class="new_line diff-line-num" data-linenumber="1085" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1085

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1085" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1086" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1086

</td>

<td class="new_line diff-line-num" data-linenumber="1086" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1086

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1086" class="line" lang="haskell">    <span class="p">[</span> <span class="n" style="color: #333;">r1</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">var</span> <span class="s" style="color: #d14;">"h$stablePtrBuf"</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1087" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1087

</td>

<td class="new_line diff-line-num" data-linenumber="1087" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1087

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1087" class="line" lang="haskell">    <span class="p">,</span> <span class="n" style="color: #333;">r2</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1088" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1088

</td>

<td class="new_line diff-line-num" data-linenumber="1088" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1088

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1088" class="line" lang="haskell">    <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1089" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1089

</td>

<td class="new_line diff-line-num old" data-linenumber="1089" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1089" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsInt16</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1090" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1090

</td>

<td class="new_line diff-line-num old" data-linenumber="1089" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1090" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsInt32</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1091" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1089" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1089

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1089" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsInt16</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1091" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1090" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1090

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1090" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsInt32</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1091" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1091

</td>

<td class="new_line diff-line-num" data-linenumber="1091" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1091

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1091" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsInt64</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1092" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1092

</td>

<td class="new_line diff-line-num" data-linenumber="1092" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1092

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1092" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1093" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1093

</td>

<td class="new_line diff-line-num" data-linenumber="1093" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1093

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1093" class="line" lang="haskell">      <span class="p">[</span> <span class="n" style="color: #333;">h</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Int</span> <span class="mi" style="color: #099;">4</span><span class="p">))</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1094" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1094

</td>

<td class="new_line diff-line-num" data-linenumber="1094" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1094

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1094" class="line" lang="haskell">      <span class="p">,</span> <span class="n" style="color: #333;">l</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1095" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1095

</td>

<td class="new_line diff-line-num" data-linenumber="1095" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1095

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1095" class="line" lang="haskell">      <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1096" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1096

</td>

<td class="new_line diff-line-num old" data-linenumber="1096" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1096" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsInt</span>        <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1097" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1097

</td>

<td class="new_line diff-line-num old" data-linenumber="1096" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1097" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsWord16</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u16</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1098" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1098

</td>

<td class="new_line diff-line-num old" data-linenumber="1096" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1098" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsWord32</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1099" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1096" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1096

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1096" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsInt</span>        <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_i32</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1099" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1097" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1097

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1097" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsWord16</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u16</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1099" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1098" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1098

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1098" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsWord32</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1099" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1099

</td>

<td class="new_line diff-line-num" data-linenumber="1099" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1099

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1099" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsWord64</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1100" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1100

</td>

<td class="new_line diff-line-num old" data-linenumber="1100" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1100" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1101" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1100" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1100

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1100" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1101" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1101

</td>

<td class="new_line diff-line-num" data-linenumber="1101" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1101

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1101" class="line" lang="haskell">        <span class="p">[</span> <span class="n" style="color: #333;">h</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Int</span> <span class="mi" style="color: #099;">4</span><span class="p">))</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1102" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1102

</td>

<td class="new_line diff-line-num" data-linenumber="1102" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1102

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1102" class="line" lang="haskell">        <span class="p">,</span> <span class="n" style="color: #333;">l</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1103" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1103

</td>

<td class="new_line diff-line-num" data-linenumber="1103" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1103

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1103" class="line" lang="haskell">        <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1104" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1104

</td>

<td class="new_line diff-line-num old" data-linenumber="1104" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1104" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsWord</span>       <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1105" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1104" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1104

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1104" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">ReadByteArrayOp_Word8AsWord</span>       <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_boff_u32</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1105" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1105

</td>

<td class="new_line diff-line-num" data-linenumber="1105" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1105

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1105" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1106" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1106

</td>

<td class="new_line diff-line-num old" data-linenumber="1106" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1106" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsChar</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_i8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1107" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1107

</td>

<td class="new_line diff-line-num old" data-linenumber="1106" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1107" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsWideChar</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1108" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1106" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1106

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1106" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsChar</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_i8</span>  <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1108" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1107" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1107

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1107" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsWideChar</span>  <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1108" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1108

</td>

<td class="new_line diff-line-num" data-linenumber="1108" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1108

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1108" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsAddr</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e1</span><span class="p">,</span><span class="n" style="color: #333;">e2</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1109" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1109

</td>

<td class="new_line diff-line-num" data-linenumber="1109" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1109

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1109" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1110" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1110

</td>

<td class="new_line diff-line-num" data-linenumber="1110" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1110

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1110" class="line" lang="haskell">      <span class="p">[</span> <span class="n" style="color: #333;">ifS</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Not</span> <span class="p">(</span><span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span><span class="p">))</span> <span class="p">(</span><span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span> <span class="o" style="font-weight: 600;">|=</span> <span class="kt" style="color: #458; font-weight: 600;">ValExpr</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">JList</span> <span class="kt" style="color: #458; font-weight: 600;">[]</span><span class="p">))</span> <span class="n" style="color: #333;">mempty</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1111" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1111

</td>

<td class="new_line diff-line-num old" data-linenumber="1111" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1111" class="line" lang="haskell">      <span class="p">,</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="p">(</span><span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span><span class="p">)</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">two_</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1112" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1111" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1111

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1111" class="line" lang="haskell">      <span class="p">,</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="p">(</span><span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span><span class="p">)</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">two_</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1112" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1112

</td>

<td class="new_line diff-line-num" data-linenumber="1112" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1112

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1112" class="line" lang="haskell">          <span class="n" style="color: #333;">a</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"arr"</span> <span class="o" style="font-weight: 600;">.!</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">two_</span><span class="p">)</span> <span class="o" style="font-weight: 600;">|=</span> <span class="kt" style="color: #458; font-weight: 600;">ValExpr</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">JList</span> <span class="p">[</span><span class="n" style="color: #333;">e1</span><span class="p">,</span> <span class="n" style="color: #333;">e2</span><span class="p">])</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1113" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1113

</td>

<td class="new_line diff-line-num" data-linenumber="1113" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1113

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1113" class="line" lang="haskell">      <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1114" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1114

</td>

<td class="new_line diff-line-num" data-linenumber="1114" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1114

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1114" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1115" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1115

</td>

<td class="new_line diff-line-num old" data-linenumber="1115" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1115" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsFloat</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_f32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1116" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1116

</td>

<td class="new_line diff-line-num old" data-linenumber="1115" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1116" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsDouble</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_f64</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1117" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1117

</td>

<td class="new_line diff-line-num old" data-linenumber="1115" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1117" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsStablePtr</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">_e1</span><span class="p">,</span><span class="n" style="color: #333;">e2</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e2</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1118" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1118

</td>

<td class="new_line diff-line-num old" data-linenumber="1115" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1118" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsInt16</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_i16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1119" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1119

</td>

<td class="new_line diff-line-num old" data-linenumber="1115" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1119" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsInt32</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1120" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1115" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1115

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1115" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsFloat</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_f32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1120" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1116" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1116

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1116" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsDouble</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_f64</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1120" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1117" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1117

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1117" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsStablePtr</span> <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">_e1</span><span class="p">,</span><span class="n" style="color: #333;">e2</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e2</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1120" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1118" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1118

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1118" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsInt16</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_i16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1120" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1119" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1119

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1119" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsInt32</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1120" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1120

</td>

<td class="new_line diff-line-num" data-linenumber="1120" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1120

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1120" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsInt64</span>     <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1121" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1121

</td>

<td class="new_line diff-line-num" data-linenumber="1121" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1121

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1121" class="line" lang="haskell">    <span class="c1" style="color: #998; font-style: italic;">-- JS Numbers are little-endian and 32-bit, so write the lower 4 bytes at i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1122" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1122

</td>

<td class="new_line diff-line-num" data-linenumber="1122" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1122

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1122" class="line" lang="haskell">    <span class="c1" style="color: #998; font-style: italic;">-- then write the higher 4 bytes to i+4</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1123" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1123

</td>

<td class="new_line diff-line-num old" data-linenumber="1123" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1123" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1124" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1123" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1123

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1123" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1124" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1124

</td>

<td class="new_line diff-line-num" data-linenumber="1124" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1124

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1124" class="line" lang="haskell">               <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span> <span class="p">[</span> <span class="n" style="color: #333;">write_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Int</span> <span class="mi" style="color: #099;">4</span><span class="p">))</span> <span class="n" style="color: #333;">h</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1125" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1125

</td>

<td class="new_line diff-line-num" data-linenumber="1125" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1125

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1125" class="line" lang="haskell">                         <span class="p">,</span> <span class="n" style="color: #333;">write_boff_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>               <span class="n" style="color: #333;">l</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1126" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1126

</td>

<td class="new_line diff-line-num" data-linenumber="1126" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1126

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1126" class="line" lang="haskell">                         <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1127" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1127

</td>

<td class="new_line diff-line-num old" data-linenumber="1127" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1127" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsInt</span>       <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1128" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1128

</td>

<td class="new_line diff-line-num old" data-linenumber="1127" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1128" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsWord16</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_u16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1129" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1129

</td>

<td class="new_line diff-line-num old" data-linenumber="1127" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1129" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsWord32</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1130" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1127" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1127

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1127" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsInt</span>       <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_i32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1130" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1128" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1128

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1128" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsWord16</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_u16</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1130" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1129" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1129

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1129" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsWord32</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1130" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1130

</td>

<td class="new_line diff-line-num" data-linenumber="1130" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1130

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1130" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsWord64</span>    <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">h</span><span class="p">,</span><span class="n" style="color: #333;">l</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1131" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1131

</td>

<td class="new_line diff-line-num old" data-linenumber="1131" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1131" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1132" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1131" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1131

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1131" class="line" lang="haskell">    <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">7</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1132" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1132

</td>

<td class="new_line diff-line-num" data-linenumber="1132" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1132

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1132" class="line" lang="haskell">               <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">mconcat</span> <span class="p">[</span> <span class="n" style="color: #333;">write_boff_u32</span> <span class="n" style="color: #333;">a</span>  <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Int</span> <span class="mi" style="color: #099;">4</span><span class="p">))</span> <span class="n" style="color: #333;">h</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1133" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1133

</td>

<td class="new_line diff-line-num" data-linenumber="1133" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1133

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1133" class="line" lang="haskell">                         <span class="p">,</span> <span class="n" style="color: #333;">write_boff_u32</span> <span class="n" style="color: #333;">a</span>  <span class="n" style="color: #333;">i</span>               <span class="n" style="color: #333;">l</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1134" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1134

</td>

<td class="new_line diff-line-num" data-linenumber="1134" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1134

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1134" class="line" lang="haskell">                         <span class="p">]</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1135" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1135

</td>

<td class="new_line diff-line-num old" data-linenumber="1135" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1135" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsWord</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1136" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1135" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1135

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1135" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">WriteByteArrayOp_Word8AsWord</span>      <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="kt" style="color: #458; font-weight: 600;">[]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">e</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">write_boff_u32</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">e</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1136" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1136

</td>

<td class="new_line diff-line-num" data-linenumber="1136" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1136

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1136" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1137" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1137

</td>

<td class="new_line diff-line-num old" data-linenumber="1137" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1137" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CasByteArrayOp_Int</span>                <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">old</span><span class="p">,</span><span class="n" style="color: #333;">new</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">casOp</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">old</span> <span class="n" style="color: #333;">new</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1138" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1138

</td>

<td class="new_line diff-line-num old" data-linenumber="1137" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1138" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CasByteArrayOp_Int8</span>               <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">old</span><span class="p">,</span><span class="n" style="color: #333;">new</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">casOp</span> <span class="n" style="color: #333;">read_i8</span>  <span class="n" style="color: #333;">write_i8</span>  <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">old</span> <span class="n" style="color: #333;">new</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1139" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1139

</td>

<td class="new_line diff-line-num old" data-linenumber="1137" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1139" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CasByteArrayOp_Int16</span>              <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">old</span><span class="p">,</span><span class="n" style="color: #333;">new</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">casOp</span> <span class="n" style="color: #333;">read_i16</span> <span class="n" style="color: #333;">write_i16</span> <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">old</span> <span class="n" style="color: #333;">new</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1140" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1140

</td>

<td class="new_line diff-line-num old" data-linenumber="1137" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1140" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CasByteArrayOp_Int32</span>              <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">old</span><span class="p">,</span><span class="n" style="color: #333;">new</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">casOp</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">old</span> <span class="n" style="color: #333;">new</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1141" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1137" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1137

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1137" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CasByteArrayOp_Int</span>                <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">old</span><span class="p">,</span><span class="n" style="color: #333;">new</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">casOp</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">old</span> <span class="n" style="color: #333;">new</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1141" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1138" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1138

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1138" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CasByteArrayOp_Int8</span>               <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">old</span><span class="p">,</span><span class="n" style="color: #333;">new</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span>         <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">casOp</span> <span class="n" style="color: #333;">read_i8</span>  <span class="n" style="color: #333;">write_i8</span>  <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">old</span> <span class="n" style="color: #333;">new</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1141" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1139" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1139

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1139" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CasByteArrayOp_Int16</span>              <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">old</span><span class="p">,</span><span class="n" style="color: #333;">new</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">1</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">casOp</span> <span class="n" style="color: #333;">read_i16</span> <span class="n" style="color: #333;">write_i16</span> <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">old</span> <span class="n" style="color: #333;">new</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1141" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1140" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1140

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1140" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CasByteArrayOp_Int32</span>              <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">old</span><span class="p">,</span><span class="n" style="color: #333;">new</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="mi" style="color: #099;">3</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">casOp</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">write_i32</span> <span class="n" style="color: #333;">r</span> <span class="n" style="color: #333;">a</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">old</span> <span class="n" style="color: #333;">new</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1141" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1141

</td>

<td class="new_line diff-line-num" data-linenumber="1141" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1141

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1141" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1142" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1142

</td>

<td class="new_line diff-line-num old" data-linenumber="1142" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1142" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CasByteArrayOp_Int64</span>              <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r_h</span><span class="p">,</span><span class="n" style="color: #333;">r_l</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">old_h</span><span class="p">,</span><span class="n" style="color: #333;">old_l</span><span class="p">,</span><span class="n" style="color: #333;">new_h</span><span class="p">,</span><span class="n" style="color: #333;">new_l</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked</span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1143" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1142" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1142

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1142" class="line" lang="haskell">  <span class="kt" style="color: #458; font-weight: 600;">CasByteArrayOp_Int64</span>              <span class="o" style="font-weight: 600;">-></span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="p">[</span><span class="n" style="color: #333;">r_h</span><span class="p">,</span><span class="n" style="color: #333;">r_l</span><span class="p">]</span> <span class="p">[</span><span class="n" style="color: #333;">a</span><span class="p">,</span><span class="n" style="color: #333;">i</span><span class="p">,</span><span class="n" style="color: #333;">old_h</span><span class="p">,</span><span class="n" style="color: #333;">old_l</span><span class="p">,</span><span class="n" style="color: #333;">new_h</span><span class="p">,</span><span class="n" style="color: #333;">new_l</span><span class="p">]</span> <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">PrimInline</span> <span class="o" style="font-weight: 600;">.</span> <span class="n" style="color: #333;">boundsChecked<span class="idiff left right addition" style="background-color: #c7f0d2;">Len</span></span> <span class="n" style="color: #333;">bound</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="o" style="font-weight: 600;">$</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1143" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1143

</td>

<td class="new_line diff-line-num" data-linenumber="1143" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1143

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1143" class="line" lang="haskell">    <span class="n" style="color: #333;">jVar</span> <span class="nf" style="color: #900; font-weight: 600;">\</span><span class="n" style="color: #333;">t_h</span> <span class="n" style="color: #333;">t_l</span> <span class="o" style="font-weight: 600;">-></span> <span class="n" style="color: #333;">mconcat</span> <span class="p">[</span> <span class="n" style="color: #333;">t_h</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_i32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1144" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1144

</td>

<td class="new_line diff-line-num" data-linenumber="1144" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1144

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1144" class="line" lang="haskell">                             <span class="p">,</span> <span class="n" style="color: #333;">t_l</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">read_u32</span> <span class="n" style="color: #333;">a</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<<.</span> <span class="n" style="color: #333;">one_</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1145" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1145

</td>

<td class="new_line diff-line-num" data-linenumber="1145" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1145

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1145" class="line" lang="haskell">                             <span class="p">,</span> <span class="n" style="color: #333;">r_h</span> <span class="o" style="font-weight: 600;">|=</span> <span class="n" style="color: #333;">t_h</span></span>

</pre></td>

</tr>

<tr class="line_holder match" style="line-height: 1.6;">

<td class="diff-line-num unfold js-unfold old_line" data-linenumber="1473" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="diff-line-num unfold js-unfold new_line" data-linenumber="1473" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="line_content match" style="color: rgba(31,30,36,0.24); padding: inherit;" bgcolor="#fbfafd">@@ -1473,9 +1473,32 @@ boundsChecked :: Bool  -- ^ Should we do bounds checking?</td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1473" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1473

</td>

<td class="new_line diff-line-num" data-linenumber="1473" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1473

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1473" class="line" lang="haskell">              <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">JStat</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1474" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1474

</td>

<td class="new_line diff-line-num" data-linenumber="1474" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1474

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1474" class="line" lang="haskell"><span class="n" style="color: #333;">boundsChecked</span> <span class="kt" style="color: #458; font-weight: 600;">False</span> <span class="kr" style="font-weight: 600;">_</span> <span class="kr" style="font-weight: 600;">_</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">=</span> <span class="n" style="color: #333;">r</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1475" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1475

</td>

<td class="new_line diff-line-num" data-linenumber="1475" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1475

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1475" class="line" lang="haskell"><span class="n" style="color: #333;">boundsChecked</span> <span class="kt" style="color: #458; font-weight: 600;">True</span>  <span class="n" style="color: #333;">xs</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">=</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1476" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1476

</td>

<td class="new_line diff-line-num old" data-linenumber="1476" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1476" class="line" lang="haskell">  <span class="n" style="color: #333;">ifS</span> <span class="p">((</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<.</span> <span class="n" style="color: #333;">xs</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"length"</span><span class="p">)</span> <span class="o" style="font-weight: 600;">.&&.</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.>=.</span> <span class="n" style="color: #333;">zero_</span><span class="p">))</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1477" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1477

</td>

<td class="new_line diff-line-num old" data-linenumber="1476" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1477" class="line" lang="haskell">    <span class="n" style="color: #333;">r</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="1478" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

1478

</td>

<td class="new_line diff-line-num old" data-linenumber="1476" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC1478" class="line" lang="haskell">    <span class="p">(</span><span class="n" style="color: #333;">returnS</span> <span class="o" style="font-weight: 600;">$</span> <span class="n" style="color: #333;">app</span> <span class="s" style="color: #d14;">"h$exitProcess"</span> <span class="p">[</span><span class="kt" style="color: #458; font-weight: 600;">Int</span> <span class="mi" style="color: #099;">134</span><span class="p">])</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1476" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1476

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1476" class="line" lang="haskell">  <span class="n" style="color: #333;">ifS</span> <span class="p">((</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.>=.</span> <span class="n" style="color: #333;">zero_</span><span class="p">)</span> <span class="o" style="font-weight: 600;">.&&.</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<.</span> <span class="n" style="color: #333;">xs</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"length"</span><span class="p">))</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">$</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1477" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1477

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1477" class="line" lang="haskell">    <span class="n" style="color: #333;">returnS</span> <span class="p">(</span><span class="n" style="color: #333;">app</span> <span class="s" style="color: #d14;">"h$exitProcess"</span> <span class="p">[</span><span class="kt" style="color: #458; font-weight: 600;">Int</span> <span class="mi" style="color: #099;">134</span><span class="p">])</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1478" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1478

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1478" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1479

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1479" class="line" lang="haskell"><span class="n" style="color: #333;">boundsCheckedRangeLen</span> <span class="o" style="font-weight: 600;">::</span> <span class="kt" style="color: #458; font-weight: 600;">Bool</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1480" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1480

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1480" class="line" lang="haskell">                   <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">JExpr</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1481" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1481

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1481" class="line" lang="haskell">                   <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">JExpr</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1482" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1482

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1482" class="line" lang="haskell">                   <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">JExpr</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1483" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1483

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1483" class="line" lang="haskell">                   <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">JStat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1484" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1484

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1484" class="line" lang="haskell">                   <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">JStat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1485" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1485

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1485" class="line" lang="haskell"><span class="n" style="color: #333;">boundsCheckedRangeLen</span> <span class="kt" style="color: #458; font-weight: 600;">False</span> <span class="kr" style="font-weight: 600;">_</span>  <span class="kr" style="font-weight: 600;">_</span> <span class="kr" style="font-weight: 600;">_</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">=</span> <span class="n" style="color: #333;">r</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1486" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1486

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1486" class="line" lang="haskell"><span class="n" style="color: #333;">boundsCheckedRangeLen</span> <span class="kt" style="color: #458; font-weight: 600;">True</span>  <span class="n" style="color: #333;">xs</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">n</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">=</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1487" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1487

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1487" class="line" lang="haskell">  <span class="n" style="color: #333;">ifS</span> <span class="p">(</span><span class="n" style="color: #333;">n</span> <span class="o" style="font-weight: 600;">.===.</span> <span class="n" style="color: #333;">zero_</span><span class="p">)</span> <span class="c1" style="color: #998; font-style: italic;">-- We can always fill zero elements, even if it seems out-of-bounds</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1488" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1488

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1488" class="line" lang="haskell">      <span class="n" style="color: #333;">r</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1489" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1489

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1489" class="line" lang="haskell">      <span class="p">(</span><span class="n" style="color: #333;">boundsCheckedLen</span> <span class="kt" style="color: #458; font-weight: 600;">True</span> <span class="n" style="color: #333;">xs</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Add</span> <span class="n" style="color: #333;">i</span> <span class="p">(</span><span class="kt" style="color: #458; font-weight: 600;">Sub</span> <span class="n" style="color: #333;">n</span> <span class="mi" style="color: #099;">1</span><span class="p">))</span> <span class="p">(</span><span class="n" style="color: #333;">boundsCheckedLen</span> <span class="kt" style="color: #458; font-weight: 600;">True</span> <span class="n" style="color: #333;">xs</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">r</span><span class="p">))</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1490" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1490

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1490" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1491" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1491

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1491" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1492" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1492

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1492" class="line" lang="haskell"><span class="n" style="color: #333;">boundsCheckedLen</span> <span class="o" style="font-weight: 600;">::</span> <span class="kt" style="color: #458; font-weight: 600;">Bool</span>  <span class="c1" style="color: #998; font-style: italic;">-- ^ Should we do bounds checking?</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1493" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1493

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1493" class="line" lang="haskell">              <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">JExpr</span> <span class="c1" style="color: #998; font-style: italic;">-- ^ Array</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1494" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1494

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1494" class="line" lang="haskell">              <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">JExpr</span> <span class="c1" style="color: #998; font-style: italic;">-- ^ Index</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1495" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1495

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1495" class="line" lang="haskell">              <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">JStat</span> <span class="c1" style="color: #998; font-style: italic;">-- ^ Result</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1496" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1496

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1496" class="line" lang="haskell">              <span class="o" style="font-weight: 600;">-></span> <span class="kt" style="color: #458; font-weight: 600;">JStat</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1497" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1497

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1497" class="line" lang="haskell"><span class="n" style="color: #333;">boundsCheckedLen</span> <span class="kt" style="color: #458; font-weight: 600;">False</span> <span class="kr" style="font-weight: 600;">_</span> <span class="kr" style="font-weight: 600;">_</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">=</span> <span class="n" style="color: #333;">r</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1498" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1498

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1498" class="line" lang="haskell"><span class="n" style="color: #333;">boundsCheckedLen</span> <span class="kt" style="color: #458; font-weight: 600;">True</span>  <span class="n" style="color: #333;">xs</span> <span class="n" style="color: #333;">i</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">=</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1499" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1499

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1499" class="line" lang="haskell">  <span class="c1" style="color: #998; font-style: italic;">-- Byte arrays use `len`</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1500" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1500

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1500" class="line" lang="haskell">  <span class="n" style="color: #333;">ifS</span> <span class="p">((</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.>=.</span> <span class="n" style="color: #333;">zero_</span><span class="p">)</span> <span class="o" style="font-weight: 600;">.&&.</span> <span class="p">(</span><span class="n" style="color: #333;">i</span> <span class="o" style="font-weight: 600;">.<.</span> <span class="n" style="color: #333;">xs</span> <span class="o" style="font-weight: 600;">.^</span> <span class="s" style="color: #d14;">"len"</span><span class="p">))</span> <span class="n" style="color: #333;">r</span> <span class="o" style="font-weight: 600;">$</span></span>

</pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="1501" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

1501

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC1501" class="line" lang="haskell">    <span class="n" style="color: #333;">returnS</span> <span class="p">(</span><span class="n" style="color: #333;">app</span> <span class="s" style="color: #d14;">"h$exitProcess"</span> <span class="p">[</span><span class="kt" style="color: #458; font-weight: 600;">Int</span> <span class="mi" style="color: #099;">134</span><span class="p">])</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1479" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1479

</td>

<td class="new_line diff-line-num" data-linenumber="1502" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1502

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1502" class="line" lang="haskell"></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1480" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1480

</td>

<td class="new_line diff-line-num" data-linenumber="1503" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1503

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1503" class="line" lang="haskell"><span class="c1" style="color: #998; font-style: italic;">-- e|0 (32 bit signed integer truncation) required because of JS numbers. e|0</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="1481" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1481

</td>

<td class="new_line diff-line-num" data-linenumber="1504" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

1504

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC1504" class="line" lang="haskell"><span class="c1" style="color: #998; font-style: italic;">-- converts e to an Int32. Note that e|0 _is still a Double_ because JavaScript.</span></span>

</pre></td>

</tr>

</table>

<br>

</li>

<li id="b9bba9766faf563ab195fb1402f14fa78ad5c66f">

<a href="https://gitlab.haskell.org/ghc/ghc/-/commit/db5327f085b84f3a296d7347b63af6394dae026a#b9bba9766faf563ab195fb1402f14fa78ad5c66f"><strong style="font-weight: bold;">testsuite/tests/codeGen/should_run/all.T</strong></a>

<hr style="overflow: hidden; border: 1px solid #e1e1e1;">

<table class="code white" style="border-spacing: 0; border-collapse: collapse; width: auto; font-family: monospace; font-size: 90%;" bgcolor="#fff" width="100%" cellpadding="0" cellspacing="0">

<tr class="line_holder match" style="line-height: 1.6;">

<td class="diff-line-num unfold js-unfold old_line" data-linenumber="229" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="diff-line-num unfold js-unfold new_line" data-linenumber="229" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">...</td>

<td class="line_content match" style="color: rgba(31,30,36,0.24); padding: inherit;" bgcolor="#fbfafd">@@ -229,4 +229,4 @@ test('T20640b', normal, compile_and_run, [''])</td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="229" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

229

</td>

<td class="new_line diff-line-num" data-linenumber="229" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

229

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC229" class="line" lang="perl"><span class="nv" style="color: #008080;">test</span><span class="p">('</span><span class="s1" style="color: #d14;">T22296</span><span class="p">',[</span><span class="nv" style="color: #008080;">only_ways</span><span class="p">(</span><span class="nv" style="color: #008080;">llvm_ways</span><span class="p">)</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="230" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

230

</td>

<td class="new_line diff-line-num" data-linenumber="230" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

230

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC230" class="line" lang="perl">              <span class="p">,</span><span class="k" style="font-weight: 600;">unless</span><span class="p">(</span><span class="nv" style="color: #008080;">arch</span><span class="p">('</span><span class="s1" style="color: #d14;">x86_64</span><span class="p">'),</span> <span class="nv" style="color: #008080;">skip</span><span class="p">)],</span><span class="nv" style="color: #008080;">compile_and_run</span><span class="p">,[''])</span></span>

</pre></td>

</tr>

<tr class="line_holder" style="line-height: 1.6;">

<td class="old_line diff-line-num" data-linenumber="231" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

231

</td>

<td class="new_line diff-line-num" data-linenumber="231" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #ececef; border-right-style: solid; padding: inherit;" align="right" bgcolor="#fbfafd">

231

</td>

<td class="line_content" style="padding: inherit;"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'> <span id="LC231" class="line" lang="perl"><span class="nv" style="color: #008080;">test</span><span class="p">('</span><span class="s1" style="color: #d14;">T22798</span><span class="p">',</span> <span class="nv" style="color: #008080;">normal</span><span class="p">,</span> <span class="nv" style="color: #008080;">compile_and_run</span><span class="p">,</span> <span class="p">['</span><span class="s1" style="color: #d14;">-fregs-graph</span><span class="p">'])</span></span>

</pre></td>

</tr>

<tr class="line_holder old" style="line-height: 1.6;">

<td class="old_line diff-line-num old" data-linenumber="232" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

232

</td>

<td class="new_line diff-line-num old" data-linenumber="232" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #fac5cd; border-right-style: solid; padding: inherit;" align="right" bgcolor="#f9d7dc">

</td>

<td class="line_content old" style="padding: inherit;" bgcolor="#fbe9eb"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>-<span id="LC232" class="line" lang="perl"><span class="nv" style="color: #008080;">test</span><span class="p">('</span><span class="s1" style="color: #d14;">CheckBoundsOK</span><span class="p">',</span> <span class="nv" style="color: #008080;">js_broken</span><span class="p">(</span><span class="mi" style="color: #099;">2<span class="idiff left right deletion" style="background-color: #fac5cd;">3123</span></span><span class="p">),</span> <span class="nv" style="color: #008080;">compile_and_run</span><span class="p">,</span> <span class="p">['</span><span class="s1" style="color: #d14;">-fcheck-prim-bounds</span><span class="p">'])</span></span></pre></td>

</tr>

<tr class="line_holder new" style="line-height: 1.6;">

<td class="old_line diff-line-num new" data-linenumber="233" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

</td>

<td class="new_line diff-line-num new" data-linenumber="232" style="width: 35px; color: rgba(31,30,36,0.24); border-right-width: 1px; border-right-color: #c7f0d2; border-right-style: solid; padding: inherit;" align="right" bgcolor="#ddfbe6">

232

</td>

<td class="line_content new" style="padding: inherit;" bgcolor="#ecfdf0"><pre style='display: block; font-size: 0.875rem; color: #333238; position: relative; font-family: var(--default-mono-font, "Menlo"),"DejaVu Sans Mono","Liberation Mono","Consolas","Ubuntu Mono","Courier New","andale mono","lucida console",monospace; word-break: break-all; word-wrap: break-word; background-color: inherit; border-radius: 2px; margin: 0; padding: 0; border: inherit solid #dcdcde;'>+<span id="LC232" class="line" lang="perl"><span class="nv" style="color: #008080;">test</span><span class="p">('</span><span class="s1" style="color: #d14;">CheckBoundsOK</span><span class="p">',</span> <span class="nv" style="color: #008080;">js_broken</span><span class="p">(</span><span class="mi" style="color: #099;">2<span class="idiff left right addition" style="background-color: #c7f0d2;">1142</span></span><span class="p">),</span> <span class="nv" style="color: #008080;">compile_and_run</span><span class="p">,</span> <span class="p">['</span><span class="s1" style="color: #d14;">-fcheck-prim-bounds</span><span class="p">'])</span></span></pre></td>

</tr>

</table>

<br>

</li>

</div>

<div class="footer" style="margin-top: 10px;">

<p style="font-size: small; color: #737278;">

—

<br>

<a href="https://gitlab.haskell.org/ghc/ghc/-/commit/db5327f085b84f3a296d7347b63af6394dae026a">View it on GitLab</a>.

<br>

You're receiving this email because of your account on <a target="_blank" rel="noopener noreferrer" href="https://gitlab.haskell.org">gitlab.haskell.org</a>. <a href="https://gitlab.haskell.org/-/profile/notifications" target="_blank" rel="noopener noreferrer" class="mng-notif-link">Manage all notifications</a> · <a href="https://gitlab.haskell.org/help" target="_blank" rel="noopener noreferrer" class="help-link">Help</a>

<script type="application/ld+json">{"@context":"http://schema.org","@type":"EmailMessage","action":{"@type":"ViewAction","name":"View Commit","url":"https://gitlab.haskell.org/ghc/ghc/-/commit/db5327f085b84f3a296d7347b63af6394dae026a"}}</script>

</p>

</div>

</body>

</html>