Skip to content

Instantly share code, notes, and snippets.

@Tarmean

Tarmean/with_inline.dump-simpl

Created February 20, 2018 16:32
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save Tarmean/5d423b454dd75f8db11505eb28841ad1 to your computer and use it in GitHub Desktop.
Save Tarmean/5d423b454dd75f8db11505eb28841ad1 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
with_inline.dump-simpl
let {
$wbuildTable_s5dj
$wbuildTable_s5dj
= \ ww2_s5d6 ww3_s5da ww4_s5de ->
join {
exit_XS
exit_XS ww5_s5cU ww6_s5cY
= (# or# ww5_s5cU (uncheckedShiftL# 1## (andI# (word2Int# r#_a4by) 63#)), ww6_s5cY #) } in
joinrec {
$wbuildTable1_s5d0
$wbuildTable1_s5d0 ww5_s5cQ
ww6_s5cU
ww7_s5cY
= case >=# ww5_s5cQ nlast_s4my of {
__DEFAULT ->
case indexWord16Array#
dt_a4c1
(+# dt1_a4c2 ww5_s5cQ)
of r#1_X4dr
{ __DEFAULT ->
case eqWord# r#1_X4dr r#_a4by of {
__DEFAULT ->
jump $wbuildTable1_s5d0
(+# ww5_s5cQ 1#)
(or#
ww6_s5cU
(uncheckedShiftL#
1##
(andI#
(word2Int#
r#1_X4dr)
63#)))
ww7_s5cY;
1# ->
jump $wbuildTable1_s5d0
(+# ww5_s5cQ 1#)
(or#
ww6_s5cU
(uncheckedShiftL#
1##
(andI#
(word2Int#
r#1_X4dr)
63#)))
(-#
(-# wild3_X20 ww5_s5cQ)
2#)
}
};
1# -> jump exit_XS ww6_s5cU ww7_s5cY
}; } in
jump $wbuildTable1_s5d0
ww2_s5d6 ww3_s5da ww4_s5de } in
letrec {
$wscan_s5dB
$wscan_s5dB
= \ ww2_s5dz ->
case $wbuildTable_s5dj
0# 0## (-# wild3_X20 2#)
of
{ (# ww4_s5gu, ww5_s5gv #) ->
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment