libbin-prot-ocaml-dev 113.33.03-2 / usr / lib / ocaml / bin_prot / write.annot

"src/write.ml" 27 1333 1337 "src/write.ml" 27 1333 1351
type(
  bool
)
ident(
  def arch_sixtyfour "src/write.ml" 28 1373 1373 "src/write.ml" 1 0 -1
)
"src/write.ml" 27 1333 1354 "src/write.ml" 27 1333 1367
type(
  int
)
ident(
  ext_ref Sys.word_size
)
"src/write.ml" 27 1333 1368 "src/write.ml" 27 1333 1369
type(
  int -> int -> bool
)
ident(
  ext_ref Pervasives.( = )
)
"src/write.ml" 27 1333 1370 "src/write.ml" 27 1333 1372
type(
  int
)
"src/write.ml" 27 1333 1354 "src/write.ml" 27 1333 1372
type(
  bool
)
"src/write.ml" 28 1373 1377 "src/write.ml" 28 1373 1392
type(
  bool
)
ident(
  def arch_big_endian "src/write.ml" 30 1411 1411 "src/write.ml" 1 0 -1
)
"src/write.ml" 28 1373 1395 "src/write.ml" 28 1373 1409
type(
  bool
)
ident(
  ext_ref Sys.big_endian
)
"src/write.ml" 30 1411 1415 "src/write.ml" 30 1411 1429
type(
  Common.buf -> int -> int -> unit
)
ident(
  def unsafe_set16be "src/write.ml" 35 1536 1536 "src/write.ml" 1 0 -1
)
"src/write.ml" 31 1432 1437 "src/write.ml" 31 1432 1452
type(
  bool
)
ident(
  int_ref arch_big_endian "src/write.ml" 28 1373 1377 "src/write.ml" 28 1373 1392
)
"src/write.ml" 32 1458 1462 "src/write.ml" 32 1458 1474
type(
  Common.buf -> int -> int -> unit
)
ident(
  int_ref unsafe_set16 "src/write.ml" 19 939 939 "src/write.ml" 19 939 1015
)
"src/write.ml" 34 1482 1490 "src/write.ml" 34 1482 1493
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 34 1482 1494 "src/write.ml" 34 1482 1535
)
"src/write.ml" 34 1482 1494 "src/write.ml" 34 1482 1497
type(
  int
)
ident(
  def pos "src/write.ml" 34 1482 1498 "src/write.ml" 34 1482 1535
)
"src/write.ml" 34 1482 1498 "src/write.ml" 34 1482 1499
type(
  int
)
ident(
  def x "src/write.ml" 34 1482 1503 "src/write.ml" 34 1482 1535
)
"src/write.ml" 34 1482 1503 "src/write.ml" 34 1482 1515
type(
  Common.buf -> int -> int -> unit
)
ident(
  int_ref unsafe_set16 "src/write.ml" 19 939 939 "src/write.ml" 19 939 1015
)
"src/write.ml" 34 1482 1516 "src/write.ml" 34 1482 1519
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 34 1482 1490 "src/write.ml" 34 1482 1493
)
"src/write.ml" 34 1482 1520 "src/write.ml" 34 1482 1523
type(
  int
)
ident(
  int_ref pos "src/write.ml" 34 1482 1494 "src/write.ml" 34 1482 1497
)
"src/write.ml" 34 1482 1525 "src/write.ml" 34 1482 1532
type(
  int -> int
)
ident(
  int_ref bswap16 "src/write.ml" 23 1181 1181 "src/write.ml" 23 1181 1223
)
"src/write.ml" 34 1482 1533 "src/write.ml" 34 1482 1534
type(
  int
)
ident(
  int_ref x "src/write.ml" 34 1482 1498 "src/write.ml" 34 1482 1499
)
"src/write.ml" 34 1482 1524 "src/write.ml" 34 1482 1535
type(
  int
)
"src/write.ml" 34 1482 1503 "src/write.ml" 34 1482 1535
type(
  unit
)
"src/write.ml" 34 1482 1486 "src/write.ml" 34 1482 1535
type(
  Common.buf -> int -> int -> unit
)
"src/write.ml" 31 1432 1434 "src/write.ml" 34 1482 1535
type(
  Common.buf -> int -> int -> unit
)
"src/write.ml" 35 1536 1540 "src/write.ml" 35 1536 1554
type(
  Common.buf -> int -> int32 -> unit
)
ident(
  def unsafe_set32be "src/write.ml" 40 1661 1661 "src/write.ml" 1 0 -1
)
"src/write.ml" 36 1557 1562 "src/write.ml" 36 1557 1577
type(
  bool
)
ident(
  int_ref arch_big_endian "src/write.ml" 28 1373 1377 "src/write.ml" 28 1373 1392
)
"src/write.ml" 37 1583 1587 "src/write.ml" 37 1583 1599
type(
  Common.buf -> int -> int32 -> unit
)
ident(
  int_ref unsafe_set32 "src/write.ml" 20 1018 1018 "src/write.ml" 20 1018 1096
)
"src/write.ml" 39 1607 1615 "src/write.ml" 39 1607 1618
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 39 1607 1619 "src/write.ml" 39 1607 1660
)
"src/write.ml" 39 1607 1619 "src/write.ml" 39 1607 1622
type(
  int
)
ident(
  def pos "src/write.ml" 39 1607 1623 "src/write.ml" 39 1607 1660
)
"src/write.ml" 39 1607 1623 "src/write.ml" 39 1607 1624
type(
  int32
)
ident(
  def x "src/write.ml" 39 1607 1628 "src/write.ml" 39 1607 1660
)
"src/write.ml" 39 1607 1628 "src/write.ml" 39 1607 1640
type(
  Common.buf -> int -> int32 -> unit
)
ident(
  int_ref unsafe_set32 "src/write.ml" 20 1018 1018 "src/write.ml" 20 1018 1096
)
"src/write.ml" 39 1607 1641 "src/write.ml" 39 1607 1644
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 39 1607 1615 "src/write.ml" 39 1607 1618
)
"src/write.ml" 39 1607 1645 "src/write.ml" 39 1607 1648
type(
  int
)
ident(
  int_ref pos "src/write.ml" 39 1607 1619 "src/write.ml" 39 1607 1622
)
"src/write.ml" 39 1607 1650 "src/write.ml" 39 1607 1657
type(
  int32 -> int32
)
ident(
  int_ref bswap32 "src/write.ml" 24 1226 1226 "src/write.ml" 24 1226 1276
)
"src/write.ml" 39 1607 1658 "src/write.ml" 39 1607 1659
type(
  int32
)
ident(
  int_ref x "src/write.ml" 39 1607 1623 "src/write.ml" 39 1607 1624
)
"src/write.ml" 39 1607 1649 "src/write.ml" 39 1607 1660
type(
  int32
)
"src/write.ml" 39 1607 1628 "src/write.ml" 39 1607 1660
type(
  unit
)
"src/write.ml" 39 1607 1611 "src/write.ml" 39 1607 1660
type(
  Common.buf -> int -> int32 -> unit
)
"src/write.ml" 36 1557 1559 "src/write.ml" 39 1607 1660
type(
  Common.buf -> int -> int32 -> unit
)
"src/write.ml" 40 1661 1665 "src/write.ml" 40 1661 1679
type(
  Common.buf -> int -> int64 -> unit
)
ident(
  def unsafe_set64be "src/write.ml" 46 1787 1787 "src/write.ml" 1 0 -1
)
"src/write.ml" 41 1682 1687 "src/write.ml" 41 1682 1702
type(
  bool
)
ident(
  int_ref arch_big_endian "src/write.ml" 28 1373 1377 "src/write.ml" 28 1373 1392
)
"src/write.ml" 42 1708 1712 "src/write.ml" 42 1708 1724
type(
  Common.buf -> int -> int64 -> unit
)
ident(
  int_ref unsafe_set64 "src/write.ml" 21 1099 1099 "src/write.ml" 21 1099 1177
)
"src/write.ml" 44 1732 1740 "src/write.ml" 44 1732 1743
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 44 1732 1744 "src/write.ml" 44 1732 1785
)
"src/write.ml" 44 1732 1744 "src/write.ml" 44 1732 1747
type(
  int
)
ident(
  def pos "src/write.ml" 44 1732 1748 "src/write.ml" 44 1732 1785
)
"src/write.ml" 44 1732 1748 "src/write.ml" 44 1732 1749
type(
  int64
)
ident(
  def x "src/write.ml" 44 1732 1753 "src/write.ml" 44 1732 1785
)
"src/write.ml" 44 1732 1753 "src/write.ml" 44 1732 1765
type(
  Common.buf -> int -> int64 -> unit
)
ident(
  int_ref unsafe_set64 "src/write.ml" 21 1099 1099 "src/write.ml" 21 1099 1177
)
"src/write.ml" 44 1732 1766 "src/write.ml" 44 1732 1769
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 44 1732 1740 "src/write.ml" 44 1732 1743
)
"src/write.ml" 44 1732 1770 "src/write.ml" 44 1732 1773
type(
  int
)
ident(
  int_ref pos "src/write.ml" 44 1732 1744 "src/write.ml" 44 1732 1747
)
"src/write.ml" 44 1732 1775 "src/write.ml" 44 1732 1782
type(
  int64 -> int64
)
ident(
  int_ref bswap64 "src/write.ml" 25 1279 1279 "src/write.ml" 25 1279 1329
)
"src/write.ml" 44 1732 1783 "src/write.ml" 44 1732 1784
type(
  int64
)
ident(
  int_ref x "src/write.ml" 44 1732 1748 "src/write.ml" 44 1732 1749
)
"src/write.ml" 44 1732 1774 "src/write.ml" 44 1732 1785
type(
  int64
)
"src/write.ml" 44 1732 1753 "src/write.ml" 44 1732 1785
type(
  unit
)
"src/write.ml" 44 1732 1736 "src/write.ml" 44 1732 1785
type(
  Common.buf -> int -> int64 -> unit
)
"src/write.ml" 41 1682 1684 "src/write.ml" 44 1732 1785
type(
  Common.buf -> int -> int64 -> unit
)
"src/write.ml" 46 1787 1791 "src/write.ml" 46 1787 1805
type(
  Common.buf -> int -> int -> unit
)
ident(
  def unsafe_set16le "src/write.ml" 51 1912 1912 "src/write.ml" 1 0 -1
)
"src/write.ml" 47 1808 1813 "src/write.ml" 47 1808 1828
type(
  bool
)
ident(
  int_ref arch_big_endian "src/write.ml" 28 1373 1377 "src/write.ml" 28 1373 1392
)
"src/write.ml" 48 1834 1842 "src/write.ml" 48 1834 1845
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 48 1834 1846 "src/write.ml" 48 1834 1887
)
"src/write.ml" 48 1834 1846 "src/write.ml" 48 1834 1849
type(
  int
)
ident(
  def pos "src/write.ml" 48 1834 1850 "src/write.ml" 48 1834 1887
)
"src/write.ml" 48 1834 1850 "src/write.ml" 48 1834 1851
type(
  int
)
ident(
  def x "src/write.ml" 48 1834 1855 "src/write.ml" 48 1834 1887
)
"src/write.ml" 48 1834 1855 "src/write.ml" 48 1834 1867
type(
  Common.buf -> int -> int -> unit
)
ident(
  int_ref unsafe_set16 "src/write.ml" 19 939 939 "src/write.ml" 19 939 1015
)
"src/write.ml" 48 1834 1868 "src/write.ml" 48 1834 1871
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 48 1834 1842 "src/write.ml" 48 1834 1845
)
"src/write.ml" 48 1834 1872 "src/write.ml" 48 1834 1875
type(
  int
)
ident(
  int_ref pos "src/write.ml" 48 1834 1846 "src/write.ml" 48 1834 1849
)
"src/write.ml" 48 1834 1877 "src/write.ml" 48 1834 1884
type(
  int -> int
)
ident(
  int_ref bswap16 "src/write.ml" 23 1181 1181 "src/write.ml" 23 1181 1223
)
"src/write.ml" 48 1834 1885 "src/write.ml" 48 1834 1886
type(
  int
)
ident(
  int_ref x "src/write.ml" 48 1834 1850 "src/write.ml" 48 1834 1851
)
"src/write.ml" 48 1834 1876 "src/write.ml" 48 1834 1887
type(
  int
)
"src/write.ml" 48 1834 1855 "src/write.ml" 48 1834 1887
type(
  unit
)
"src/write.ml" 48 1834 1838 "src/write.ml" 48 1834 1887
type(
  Common.buf -> int -> int -> unit
)
"src/write.ml" 50 1895 1899 "src/write.ml" 50 1895 1911
type(
  Common.buf -> int -> int -> unit
)
ident(
  int_ref unsafe_set16 "src/write.ml" 19 939 939 "src/write.ml" 19 939 1015
)
"src/write.ml" 47 1808 1810 "src/write.ml" 50 1895 1911
type(
  Common.buf -> int -> int -> unit
)
"src/write.ml" 51 1912 1916 "src/write.ml" 51 1912 1930
type(
  Common.buf -> int -> int32 -> unit
)
ident(
  def unsafe_set32le "src/write.ml" 56 2037 2037 "src/write.ml" 1 0 -1
)
"src/write.ml" 52 1933 1938 "src/write.ml" 52 1933 1953
type(
  bool
)
ident(
  int_ref arch_big_endian "src/write.ml" 28 1373 1377 "src/write.ml" 28 1373 1392
)
"src/write.ml" 53 1959 1967 "src/write.ml" 53 1959 1970
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 53 1959 1971 "src/write.ml" 53 1959 2012
)
"src/write.ml" 53 1959 1971 "src/write.ml" 53 1959 1974
type(
  int
)
ident(
  def pos "src/write.ml" 53 1959 1975 "src/write.ml" 53 1959 2012
)
"src/write.ml" 53 1959 1975 "src/write.ml" 53 1959 1976
type(
  int32
)
ident(
  def x "src/write.ml" 53 1959 1980 "src/write.ml" 53 1959 2012
)
"src/write.ml" 53 1959 1980 "src/write.ml" 53 1959 1992
type(
  Common.buf -> int -> int32 -> unit
)
ident(
  int_ref unsafe_set32 "src/write.ml" 20 1018 1018 "src/write.ml" 20 1018 1096
)
"src/write.ml" 53 1959 1993 "src/write.ml" 53 1959 1996
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 53 1959 1967 "src/write.ml" 53 1959 1970
)
"src/write.ml" 53 1959 1997 "src/write.ml" 53 1959 2000
type(
  int
)
ident(
  int_ref pos "src/write.ml" 53 1959 1971 "src/write.ml" 53 1959 1974
)
"src/write.ml" 53 1959 2002 "src/write.ml" 53 1959 2009
type(
  int32 -> int32
)
ident(
  int_ref bswap32 "src/write.ml" 24 1226 1226 "src/write.ml" 24 1226 1276
)
"src/write.ml" 53 1959 2010 "src/write.ml" 53 1959 2011
type(
  int32
)
ident(
  int_ref x "src/write.ml" 53 1959 1975 "src/write.ml" 53 1959 1976
)
"src/write.ml" 53 1959 2001 "src/write.ml" 53 1959 2012
type(
  int32
)
"src/write.ml" 53 1959 1980 "src/write.ml" 53 1959 2012
type(
  unit
)
"src/write.ml" 53 1959 1963 "src/write.ml" 53 1959 2012
type(
  Common.buf -> int -> int32 -> unit
)
"src/write.ml" 55 2020 2024 "src/write.ml" 55 2020 2036
type(
  Common.buf -> int -> int32 -> unit
)
ident(
  int_ref unsafe_set32 "src/write.ml" 20 1018 1018 "src/write.ml" 20 1018 1096
)
"src/write.ml" 52 1933 1935 "src/write.ml" 55 2020 2036
type(
  Common.buf -> int -> int32 -> unit
)
"src/write.ml" 56 2037 2041 "src/write.ml" 56 2037 2055
type(
  Common.buf -> int -> int64 -> unit
)
ident(
  def unsafe_set64le "src/write.ml" 62 2163 2163 "src/write.ml" 1 0 -1
)
"src/write.ml" 57 2058 2063 "src/write.ml" 57 2058 2078
type(
  bool
)
ident(
  int_ref arch_big_endian "src/write.ml" 28 1373 1377 "src/write.ml" 28 1373 1392
)
"src/write.ml" 58 2084 2092 "src/write.ml" 58 2084 2095
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 58 2084 2096 "src/write.ml" 58 2084 2137
)
"src/write.ml" 58 2084 2096 "src/write.ml" 58 2084 2099
type(
  int
)
ident(
  def pos "src/write.ml" 58 2084 2100 "src/write.ml" 58 2084 2137
)
"src/write.ml" 58 2084 2100 "src/write.ml" 58 2084 2101
type(
  int64
)
ident(
  def x "src/write.ml" 58 2084 2105 "src/write.ml" 58 2084 2137
)
"src/write.ml" 58 2084 2105 "src/write.ml" 58 2084 2117
type(
  Common.buf -> int -> int64 -> unit
)
ident(
  int_ref unsafe_set64 "src/write.ml" 21 1099 1099 "src/write.ml" 21 1099 1177
)
"src/write.ml" 58 2084 2118 "src/write.ml" 58 2084 2121
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 58 2084 2092 "src/write.ml" 58 2084 2095
)
"src/write.ml" 58 2084 2122 "src/write.ml" 58 2084 2125
type(
  int
)
ident(
  int_ref pos "src/write.ml" 58 2084 2096 "src/write.ml" 58 2084 2099
)
"src/write.ml" 58 2084 2127 "src/write.ml" 58 2084 2134
type(
  int64 -> int64
)
ident(
  int_ref bswap64 "src/write.ml" 25 1279 1279 "src/write.ml" 25 1279 1329
)
"src/write.ml" 58 2084 2135 "src/write.ml" 58 2084 2136
type(
  int64
)
ident(
  int_ref x "src/write.ml" 58 2084 2100 "src/write.ml" 58 2084 2101
)
"src/write.ml" 58 2084 2126 "src/write.ml" 58 2084 2137
type(
  int64
)
"src/write.ml" 58 2084 2105 "src/write.ml" 58 2084 2137
type(
  unit
)
"src/write.ml" 58 2084 2088 "src/write.ml" 58 2084 2137
type(
  Common.buf -> int -> int64 -> unit
)
"src/write.ml" 60 2145 2149 "src/write.ml" 60 2145 2161
type(
  Common.buf -> int -> int64 -> unit
)
ident(
  int_ref unsafe_set64 "src/write.ml" 21 1099 1099 "src/write.ml" 21 1099 1177
)
"src/write.ml" 57 2058 2060 "src/write.ml" 60 2145 2161
type(
  Common.buf -> int -> int64 -> unit
)
"src/write.ml" 62 2163 2167 "src/write.ml" 62 2163 2181
type(
  Common.buf -> pos:Common.pos -> unit -> int
)
ident(
  def bin_write_unit "src/write.ml" 68 2275 2275 "src/write.ml" 1 0 -1
)
"src/write.ml" 62 2163 2182 "src/write.ml" 62 2163 2185
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 62 2163 2186 "src/write.ml" 66 2264 2273
)
"src/write.ml" 62 2163 2187 "src/write.ml" 62 2163 2190
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 62 2163 2191 "src/write.ml" 66 2264 2273
)
"src/write.ml" 62 2163 2191 "src/write.ml" 62 2163 2193
type(
  unit
)
"src/write.ml" 63 2196 2198 "src/write.ml" 63 2196 2208
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 63 2196 2209 "src/write.ml" 63 2196 2212
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 62 2163 2187 "src/write.ml" 62 2163 2190
)
"src/write.ml" 63 2196 2198 "src/write.ml" 63 2196 2212
call(
  stack
)
type(
  unit
)
"src/write.ml" 64 2214 2216 "src/write.ml" 64 2214 2225
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_pos
)
"src/write.ml" 64 2214 2226 "src/write.ml" 64 2214 2229
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 62 2163 2182 "src/write.ml" 62 2163 2185
)
"src/write.ml" 64 2214 2230 "src/write.ml" 64 2214 2233
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 62 2163 2187 "src/write.ml" 62 2163 2190
)
"src/write.ml" 64 2214 2216 "src/write.ml" 64 2214 2233
call(
  stack
)
type(
  unit
)
"src/write.ml" 65 2235 2237 "src/write.ml" 65 2235 2247
type(
  Common.buf -> Common.pos -> char -> unit
)
ident(
  int_ref unsafe_set "src/write.ml" 17 785 785 "src/write.ml" 17 785 859
)
"src/write.ml" 65 2235 2248 "src/write.ml" 65 2235 2251
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 62 2163 2182 "src/write.ml" 62 2163 2185
)
"src/write.ml" 65 2235 2252 "src/write.ml" 65 2235 2255
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 62 2163 2187 "src/write.ml" 62 2163 2190
)
"src/write.ml" 65 2235 2256 "src/write.ml" 65 2235 2262
type(
  char
)
"src/write.ml" 65 2235 2237 "src/write.ml" 65 2235 2262
type(
  unit
)
"src/write.ml" 66 2264 2266 "src/write.ml" 66 2264 2269
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 62 2163 2187 "src/write.ml" 62 2163 2190
)
"src/write.ml" 66 2264 2270 "src/write.ml" 66 2264 2271
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 66 2264 2272 "src/write.ml" 66 2264 2273
type(
  int
)
"src/write.ml" 66 2264 2266 "src/write.ml" 66 2264 2273
type(
  int
)
"src/write.ml" 65 2235 2237 "src/write.ml" 66 2264 2273
type(
  int
)
"src/write.ml" 64 2214 2216 "src/write.ml" 66 2264 2273
type(
  int
)
"src/write.ml" 63 2196 2198 "src/write.ml" 66 2264 2273
type(
  int
)
"src/write.ml" 68 2275 2279 "src/write.ml" 68 2275 2293
type(
  Common.buf -> pos:Common.pos -> bool -> int
)
ident(
  def bin_write_bool "src/write.ml" 74 2410 2410 "src/write.ml" 1 0 -1
)
"src/write.ml" 68 2275 2294 "src/write.ml" 68 2275 2297
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 68 2275 2298 "src/write.ml" 72 2399 2408
)
"src/write.ml" 68 2275 2299 "src/write.ml" 68 2275 2302
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 68 2275 2303 "src/write.ml" 72 2399 2408
)
"src/write.ml" 68 2275 2303 "src/write.ml" 68 2275 2304
type(
  bool
)
ident(
  def b "src/write.ml" 69 2307 2309 "src/write.ml" 72 2399 2408
)
"src/write.ml" 69 2307 2309 "src/write.ml" 69 2307 2319
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 69 2307 2320 "src/write.ml" 69 2307 2323
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 68 2275 2299 "src/write.ml" 68 2275 2302
)
"src/write.ml" 69 2307 2309 "src/write.ml" 69 2307 2323
call(
  stack
)
type(
  unit
)
"src/write.ml" 70 2325 2327 "src/write.ml" 70 2325 2336
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_pos
)
"src/write.ml" 70 2325 2337 "src/write.ml" 70 2325 2340
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 68 2275 2294 "src/write.ml" 68 2275 2297
)
"src/write.ml" 70 2325 2341 "src/write.ml" 70 2325 2344
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 68 2275 2299 "src/write.ml" 68 2275 2302
)
"src/write.ml" 70 2325 2327 "src/write.ml" 70 2325 2344
call(
  stack
)
type(
  unit
)
"src/write.ml" 71 2346 2348 "src/write.ml" 71 2346 2358
type(
  Common.buf -> Common.pos -> char -> unit
)
ident(
  int_ref unsafe_set "src/write.ml" 17 785 785 "src/write.ml" 17 785 859
)
"src/write.ml" 71 2346 2359 "src/write.ml" 71 2346 2362
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 68 2275 2294 "src/write.ml" 68 2275 2297
)
"src/write.ml" 71 2346 2363 "src/write.ml" 71 2346 2366
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 68 2275 2299 "src/write.ml" 68 2275 2302
)
"src/write.ml" 71 2346 2371 "src/write.ml" 71 2346 2372
type(
  bool
)
ident(
  int_ref b "src/write.ml" 68 2275 2303 "src/write.ml" 68 2275 2304
)
"src/write.ml" 71 2346 2378 "src/write.ml" 71 2346 2384
type(
  char
)
"src/write.ml" 71 2346 2390 "src/write.ml" 71 2346 2396
type(
  char
)
"src/write.ml" 71 2346 2367 "src/write.ml" 71 2346 2397
type(
  char
)
"src/write.ml" 71 2346 2348 "src/write.ml" 71 2346 2397
type(
  unit
)
"src/write.ml" 72 2399 2401 "src/write.ml" 72 2399 2404
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 68 2275 2299 "src/write.ml" 68 2275 2302
)
"src/write.ml" 72 2399 2405 "src/write.ml" 72 2399 2406
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 72 2399 2407 "src/write.ml" 72 2399 2408
type(
  int
)
"src/write.ml" 72 2399 2401 "src/write.ml" 72 2399 2408
type(
  int
)
"src/write.ml" 71 2346 2348 "src/write.ml" 72 2399 2408
type(
  int
)
"src/write.ml" 70 2325 2327 "src/write.ml" 72 2399 2408
type(
  int
)
"src/write.ml" 69 2307 2309 "src/write.ml" 72 2399 2408
type(
  int
)
"src/write.ml" 74 2410 2414 "src/write.ml" 74 2410 2437
type(
  Common.buf -> Common.pos -> int -> int
)
ident(
  def all_bin_write_small_int "src/write.ml" 79 2507 2507 "src/write.ml" 1 0 -1
)
"src/write.ml" 74 2410 2438 "src/write.ml" 74 2410 2441
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 74 2410 2442 "src/write.ml" 77 2496 2505
)
"src/write.ml" 74 2410 2442 "src/write.ml" 74 2410 2445
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 74 2410 2446 "src/write.ml" 77 2496 2505
)
"src/write.ml" 74 2410 2446 "src/write.ml" 74 2410 2447
type(
  int
)
ident(
  def n "src/write.ml" 75 2450 2452 "src/write.ml" 77 2496 2505
)
"src/write.ml" 75 2450 2452 "src/write.ml" 75 2450 2461
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_pos
)
"src/write.ml" 75 2450 2462 "src/write.ml" 75 2450 2465
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 74 2410 2438 "src/write.ml" 74 2410 2441
)
"src/write.ml" 75 2450 2466 "src/write.ml" 75 2450 2469
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 74 2410 2442 "src/write.ml" 74 2410 2445
)
"src/write.ml" 75 2450 2452 "src/write.ml" 75 2450 2469
call(
  stack
)
type(
  unit
)
"src/write.ml" 76 2471 2473 "src/write.ml" 76 2471 2484
type(
  Common.buf -> Common.pos -> int -> unit
)
ident(
  int_ref unsafe_set8 "src/write.ml" 18 862 862 "src/write.ml" 18 862 936
)
"src/write.ml" 76 2471 2485 "src/write.ml" 76 2471 2488
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 74 2410 2438 "src/write.ml" 74 2410 2441
)
"src/write.ml" 76 2471 2489 "src/write.ml" 76 2471 2492
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 74 2410 2442 "src/write.ml" 74 2410 2445
)
"src/write.ml" 76 2471 2493 "src/write.ml" 76 2471 2494
type(
  int
)
ident(
  int_ref n "src/write.ml" 74 2410 2446 "src/write.ml" 74 2410 2447
)
"src/write.ml" 76 2471 2473 "src/write.ml" 76 2471 2494
type(
  unit
)
"src/write.ml" 77 2496 2498 "src/write.ml" 77 2496 2501
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 74 2410 2442 "src/write.ml" 74 2410 2445
)
"src/write.ml" 77 2496 2502 "src/write.ml" 77 2496 2503
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 77 2496 2504 "src/write.ml" 77 2496 2505
type(
  int
)
"src/write.ml" 77 2496 2498 "src/write.ml" 77 2496 2505
type(
  int
)
"src/write.ml" 76 2471 2473 "src/write.ml" 77 2496 2505
type(
  int
)
"src/write.ml" 75 2450 2452 "src/write.ml" 77 2496 2505
type(
  int
)
"src/write.ml" 79 2507 2511 "src/write.ml" 79 2507 2533
type(
  Common.buf -> int -> int -> int
)
ident(
  def all_bin_write_neg_int8 "src/write.ml" 86 2661 2661 "src/write.ml" 1 0 -1
)
"src/write.ml" 79 2507 2534 "src/write.ml" 79 2507 2537
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 79 2507 2538 "src/write.ml" 84 2653 2659
)
"src/write.ml" 79 2507 2538 "src/write.ml" 79 2507 2541
type(
  int
)
ident(
  def pos "src/write.ml" 79 2507 2542 "src/write.ml" 84 2653 2659
)
"src/write.ml" 79 2507 2542 "src/write.ml" 79 2507 2543
type(
  int
)
ident(
  def n "src/write.ml" 80 2546 2548 "src/write.ml" 84 2653 2659
)
"src/write.ml" 80 2546 2552 "src/write.ml" 80 2546 2556
type(
  int
)
ident(
  def next "src/write.ml" 81 2570 2572 "src/write.ml" 84 2653 2659
)
"src/write.ml" 80 2546 2559 "src/write.ml" 80 2546 2562
type(
  int
)
ident(
  int_ref pos "src/write.ml" 79 2507 2538 "src/write.ml" 79 2507 2541
)
"src/write.ml" 80 2546 2563 "src/write.ml" 80 2546 2564
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 80 2546 2565 "src/write.ml" 80 2546 2566
type(
  int
)
"src/write.ml" 80 2546 2559 "src/write.ml" 80 2546 2566
type(
  int
)
"src/write.ml" 81 2570 2572 "src/write.ml" 81 2570 2582
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 81 2570 2583 "src/write.ml" 81 2570 2586
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 79 2507 2534 "src/write.ml" 79 2507 2537
)
"src/write.ml" 81 2570 2587 "src/write.ml" 81 2570 2591
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 80 2546 2552 "src/write.ml" 80 2546 2556
)
"src/write.ml" 81 2570 2572 "src/write.ml" 81 2570 2591
call(
  stack
)
type(
  unit
)
"src/write.ml" 82 2593 2595 "src/write.ml" 82 2593 2605
type(
  Common.buf -> int -> char -> unit
)
ident(
  int_ref unsafe_set "src/write.ml" 17 785 785 "src/write.ml" 17 785 859
)
"src/write.ml" 82 2593 2606 "src/write.ml" 82 2593 2609
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 79 2507 2534 "src/write.ml" 79 2507 2537
)
"src/write.ml" 82 2593 2610 "src/write.ml" 82 2593 2613
type(
  int
)
ident(
  int_ref pos "src/write.ml" 79 2507 2538 "src/write.ml" 79 2507 2541
)
"src/write.ml" 82 2593 2614 "src/write.ml" 82 2593 2620
type(
  char
)
"src/write.ml" 82 2593 2595 "src/write.ml" 82 2593 2620
type(
  unit
)
"src/write.ml" 83 2622 2624 "src/write.ml" 83 2622 2635
type(
  Common.buf -> int -> int -> unit
)
ident(
  int_ref unsafe_set8 "src/write.ml" 18 862 862 "src/write.ml" 18 862 936
)
"src/write.ml" 83 2622 2636 "src/write.ml" 83 2622 2639
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 79 2507 2534 "src/write.ml" 79 2507 2537
)
"src/write.ml" 83 2622 2641 "src/write.ml" 83 2622 2644
type(
  int
)
ident(
  int_ref pos "src/write.ml" 79 2507 2538 "src/write.ml" 79 2507 2541
)
"src/write.ml" 83 2622 2645 "src/write.ml" 83 2622 2646
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 83 2622 2647 "src/write.ml" 83 2622 2648
type(
  int
)
"src/write.ml" 83 2622 2640 "src/write.ml" 83 2622 2649
type(
  int
)
"src/write.ml" 83 2622 2650 "src/write.ml" 83 2622 2651
type(
  int
)
ident(
  int_ref n "src/write.ml" 79 2507 2542 "src/write.ml" 79 2507 2543
)
"src/write.ml" 83 2622 2624 "src/write.ml" 83 2622 2651
type(
  unit
)
"src/write.ml" 84 2653 2655 "src/write.ml" 84 2653 2659
type(
  int
)
ident(
  int_ref next "src/write.ml" 80 2546 2552 "src/write.ml" 80 2546 2556
)
"src/write.ml" 83 2622 2624 "src/write.ml" 84 2653 2659
type(
  int
)
"src/write.ml" 82 2593 2595 "src/write.ml" 84 2653 2659
type(
  int
)
"src/write.ml" 81 2570 2572 "src/write.ml" 84 2653 2659
type(
  int
)
"src/write.ml" 80 2546 2548 "src/write.ml" 84 2653 2659
type(
  int
)
"src/write.ml" 86 2661 2665 "src/write.ml" 86 2661 2684
type(
  Common.buf -> int -> int -> int
)
ident(
  def all_bin_write_int16 "src/write.ml" 93 2815 2815 "src/write.ml" 1 0 -1
)
"src/write.ml" 86 2661 2685 "src/write.ml" 86 2661 2688
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 86 2661 2689 "src/write.ml" 91 2807 2813
)
"src/write.ml" 86 2661 2689 "src/write.ml" 86 2661 2692
type(
  int
)
ident(
  def pos "src/write.ml" 86 2661 2693 "src/write.ml" 91 2807 2813
)
"src/write.ml" 86 2661 2693 "src/write.ml" 86 2661 2694
type(
  int
)
ident(
  def n "src/write.ml" 87 2697 2699 "src/write.ml" 91 2807 2813
)
"src/write.ml" 87 2697 2703 "src/write.ml" 87 2697 2707
type(
  int
)
ident(
  def next "src/write.ml" 88 2721 2723 "src/write.ml" 91 2807 2813
)
"src/write.ml" 87 2697 2710 "src/write.ml" 87 2697 2713
type(
  int
)
ident(
  int_ref pos "src/write.ml" 86 2661 2689 "src/write.ml" 86 2661 2692
)
"src/write.ml" 87 2697 2714 "src/write.ml" 87 2697 2715
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 87 2697 2716 "src/write.ml" 87 2697 2717
type(
  int
)
"src/write.ml" 87 2697 2710 "src/write.ml" 87 2697 2717
type(
  int
)
"src/write.ml" 88 2721 2723 "src/write.ml" 88 2721 2733
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 88 2721 2734 "src/write.ml" 88 2721 2737
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 86 2661 2685 "src/write.ml" 86 2661 2688
)
"src/write.ml" 88 2721 2738 "src/write.ml" 88 2721 2742
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 87 2697 2703 "src/write.ml" 87 2697 2707
)
"src/write.ml" 88 2721 2723 "src/write.ml" 88 2721 2742
call(
  stack
)
type(
  unit
)
"src/write.ml" 89 2744 2746 "src/write.ml" 89 2744 2756
type(
  Common.buf -> int -> char -> unit
)
ident(
  int_ref unsafe_set "src/write.ml" 17 785 785 "src/write.ml" 17 785 859
)
"src/write.ml" 89 2744 2757 "src/write.ml" 89 2744 2760
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 86 2661 2685 "src/write.ml" 86 2661 2688
)
"src/write.ml" 89 2744 2761 "src/write.ml" 89 2744 2764
type(
  int
)
ident(
  int_ref pos "src/write.ml" 86 2661 2689 "src/write.ml" 86 2661 2692
)
"src/write.ml" 89 2744 2765 "src/write.ml" 89 2744 2771
type(
  char
)
"src/write.ml" 89 2744 2746 "src/write.ml" 89 2744 2771
type(
  unit
)
"src/write.ml" 90 2773 2775 "src/write.ml" 90 2773 2789
type(
  Common.buf -> int -> int -> unit
)
ident(
  int_ref unsafe_set16le "src/write.ml" 46 1787 1791 "src/write.ml" 46 1787 1805
)
"src/write.ml" 90 2773 2790 "src/write.ml" 90 2773 2793
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 86 2661 2685 "src/write.ml" 86 2661 2688
)
"src/write.ml" 90 2773 2795 "src/write.ml" 90 2773 2798
type(
  int
)
ident(
  int_ref pos "src/write.ml" 86 2661 2689 "src/write.ml" 86 2661 2692
)
"src/write.ml" 90 2773 2799 "src/write.ml" 90 2773 2800
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 90 2773 2801 "src/write.ml" 90 2773 2802
type(
  int
)
"src/write.ml" 90 2773 2794 "src/write.ml" 90 2773 2803
type(
  int
)
"src/write.ml" 90 2773 2804 "src/write.ml" 90 2773 2805
type(
  int
)
ident(
  int_ref n "src/write.ml" 86 2661 2693 "src/write.ml" 86 2661 2694
)
"src/write.ml" 90 2773 2775 "src/write.ml" 90 2773 2805
call(
  stack
)
type(
  unit
)
"src/write.ml" 91 2807 2809 "src/write.ml" 91 2807 2813
type(
  int
)
ident(
  int_ref next "src/write.ml" 87 2697 2703 "src/write.ml" 87 2697 2707
)
"src/write.ml" 90 2773 2775 "src/write.ml" 91 2807 2813
type(
  int
)
"src/write.ml" 89 2744 2746 "src/write.ml" 91 2807 2813
type(
  int
)
"src/write.ml" 88 2721 2723 "src/write.ml" 91 2807 2813
type(
  int
)
"src/write.ml" 87 2697 2699 "src/write.ml" 91 2807 2813
type(
  int
)
"src/write.ml" 93 2815 2819 "src/write.ml" 93 2815 2838
type(
  Common.buf -> int -> int32 -> int
)
ident(
  def all_bin_write_int32 "src/write.ml" 100 2969 2969 "src/write.ml" 1 0 -1
)
"src/write.ml" 93 2815 2839 "src/write.ml" 93 2815 2842
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 93 2815 2843 "src/write.ml" 98 2961 2967
)
"src/write.ml" 93 2815 2843 "src/write.ml" 93 2815 2846
type(
  int
)
ident(
  def pos "src/write.ml" 93 2815 2847 "src/write.ml" 98 2961 2967
)
"src/write.ml" 93 2815 2847 "src/write.ml" 93 2815 2848
type(
  int32
)
ident(
  def n "src/write.ml" 94 2851 2853 "src/write.ml" 98 2961 2967
)
"src/write.ml" 94 2851 2857 "src/write.ml" 94 2851 2861
type(
  int
)
ident(
  def next "src/write.ml" 95 2875 2877 "src/write.ml" 98 2961 2967
)
"src/write.ml" 94 2851 2864 "src/write.ml" 94 2851 2867
type(
  int
)
ident(
  int_ref pos "src/write.ml" 93 2815 2843 "src/write.ml" 93 2815 2846
)
"src/write.ml" 94 2851 2868 "src/write.ml" 94 2851 2869
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 94 2851 2870 "src/write.ml" 94 2851 2871
type(
  int
)
"src/write.ml" 94 2851 2864 "src/write.ml" 94 2851 2871
type(
  int
)
"src/write.ml" 95 2875 2877 "src/write.ml" 95 2875 2887
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 95 2875 2888 "src/write.ml" 95 2875 2891
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 93 2815 2839 "src/write.ml" 93 2815 2842
)
"src/write.ml" 95 2875 2892 "src/write.ml" 95 2875 2896
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 94 2851 2857 "src/write.ml" 94 2851 2861
)
"src/write.ml" 95 2875 2877 "src/write.ml" 95 2875 2896
call(
  stack
)
type(
  unit
)
"src/write.ml" 96 2898 2900 "src/write.ml" 96 2898 2910
type(
  Common.buf -> int -> char -> unit
)
ident(
  int_ref unsafe_set "src/write.ml" 17 785 785 "src/write.ml" 17 785 859
)
"src/write.ml" 96 2898 2911 "src/write.ml" 96 2898 2914
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 93 2815 2839 "src/write.ml" 93 2815 2842
)
"src/write.ml" 96 2898 2915 "src/write.ml" 96 2898 2918
type(
  int
)
ident(
  int_ref pos "src/write.ml" 93 2815 2843 "src/write.ml" 93 2815 2846
)
"src/write.ml" 96 2898 2919 "src/write.ml" 96 2898 2925
type(
  char
)
"src/write.ml" 96 2898 2900 "src/write.ml" 96 2898 2925
type(
  unit
)
"src/write.ml" 97 2927 2929 "src/write.ml" 97 2927 2943
type(
  Common.buf -> int -> int32 -> unit
)
ident(
  int_ref unsafe_set32le "src/write.ml" 51 1912 1916 "src/write.ml" 51 1912 1930
)
"src/write.ml" 97 2927 2944 "src/write.ml" 97 2927 2947
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 93 2815 2839 "src/write.ml" 93 2815 2842
)
"src/write.ml" 97 2927 2949 "src/write.ml" 97 2927 2952
type(
  int
)
ident(
  int_ref pos "src/write.ml" 93 2815 2843 "src/write.ml" 93 2815 2846
)
"src/write.ml" 97 2927 2953 "src/write.ml" 97 2927 2954
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 97 2927 2955 "src/write.ml" 97 2927 2956
type(
  int
)
"src/write.ml" 97 2927 2948 "src/write.ml" 97 2927 2957
type(
  int
)
"src/write.ml" 97 2927 2958 "src/write.ml" 97 2927 2959
type(
  int32
)
ident(
  int_ref n "src/write.ml" 93 2815 2847 "src/write.ml" 93 2815 2848
)
"src/write.ml" 97 2927 2929 "src/write.ml" 97 2927 2959
call(
  stack
)
type(
  unit
)
"src/write.ml" 98 2961 2963 "src/write.ml" 98 2961 2967
type(
  int
)
ident(
  int_ref next "src/write.ml" 94 2851 2857 "src/write.ml" 94 2851 2861
)
"src/write.ml" 97 2927 2929 "src/write.ml" 98 2961 2967
type(
  int
)
"src/write.ml" 96 2898 2900 "src/write.ml" 98 2961 2967
type(
  int
)
"src/write.ml" 95 2875 2877 "src/write.ml" 98 2961 2967
type(
  int
)
"src/write.ml" 94 2851 2853 "src/write.ml" 98 2961 2967
type(
  int
)
"src/write.ml" 100 2969 2973 "src/write.ml" 100 2969 2992
type(
  Common.buf -> int -> int64 -> int
)
ident(
  def all_bin_write_int64 "src/write.ml" 107 3123 3123 "src/write.ml" 1 0 -1
)
"src/write.ml" 100 2969 2993 "src/write.ml" 100 2969 2996
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 100 2969 2997 "src/write.ml" 105 3115 3121
)
"src/write.ml" 100 2969 2997 "src/write.ml" 100 2969 3000
type(
  int
)
ident(
  def pos "src/write.ml" 100 2969 3001 "src/write.ml" 105 3115 3121
)
"src/write.ml" 100 2969 3001 "src/write.ml" 100 2969 3002
type(
  int64
)
ident(
  def n "src/write.ml" 101 3005 3007 "src/write.ml" 105 3115 3121
)
"src/write.ml" 101 3005 3011 "src/write.ml" 101 3005 3015
type(
  int
)
ident(
  def next "src/write.ml" 102 3029 3031 "src/write.ml" 105 3115 3121
)
"src/write.ml" 101 3005 3018 "src/write.ml" 101 3005 3021
type(
  int
)
ident(
  int_ref pos "src/write.ml" 100 2969 2997 "src/write.ml" 100 2969 3000
)
"src/write.ml" 101 3005 3022 "src/write.ml" 101 3005 3023
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 101 3005 3024 "src/write.ml" 101 3005 3025
type(
  int
)
"src/write.ml" 101 3005 3018 "src/write.ml" 101 3005 3025
type(
  int
)
"src/write.ml" 102 3029 3031 "src/write.ml" 102 3029 3041
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 102 3029 3042 "src/write.ml" 102 3029 3045
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 100 2969 2993 "src/write.ml" 100 2969 2996
)
"src/write.ml" 102 3029 3046 "src/write.ml" 102 3029 3050
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 101 3005 3011 "src/write.ml" 101 3005 3015
)
"src/write.ml" 102 3029 3031 "src/write.ml" 102 3029 3050
call(
  stack
)
type(
  unit
)
"src/write.ml" 103 3052 3054 "src/write.ml" 103 3052 3064
type(
  Common.buf -> int -> char -> unit
)
ident(
  int_ref unsafe_set "src/write.ml" 17 785 785 "src/write.ml" 17 785 859
)
"src/write.ml" 103 3052 3065 "src/write.ml" 103 3052 3068
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 100 2969 2993 "src/write.ml" 100 2969 2996
)
"src/write.ml" 103 3052 3069 "src/write.ml" 103 3052 3072
type(
  int
)
ident(
  int_ref pos "src/write.ml" 100 2969 2997 "src/write.ml" 100 2969 3000
)
"src/write.ml" 103 3052 3073 "src/write.ml" 103 3052 3079
type(
  char
)
"src/write.ml" 103 3052 3054 "src/write.ml" 103 3052 3079
type(
  unit
)
"src/write.ml" 104 3081 3083 "src/write.ml" 104 3081 3097
type(
  Common.buf -> int -> int64 -> unit
)
ident(
  int_ref unsafe_set64le "src/write.ml" 56 2037 2041 "src/write.ml" 56 2037 2055
)
"src/write.ml" 104 3081 3098 "src/write.ml" 104 3081 3101
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 100 2969 2993 "src/write.ml" 100 2969 2996
)
"src/write.ml" 104 3081 3103 "src/write.ml" 104 3081 3106
type(
  int
)
ident(
  int_ref pos "src/write.ml" 100 2969 2997 "src/write.ml" 100 2969 3000
)
"src/write.ml" 104 3081 3107 "src/write.ml" 104 3081 3108
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 104 3081 3109 "src/write.ml" 104 3081 3110
type(
  int
)
"src/write.ml" 104 3081 3102 "src/write.ml" 104 3081 3111
type(
  int
)
"src/write.ml" 104 3081 3112 "src/write.ml" 104 3081 3113
type(
  int64
)
ident(
  int_ref n "src/write.ml" 100 2969 3001 "src/write.ml" 100 2969 3002
)
"src/write.ml" 104 3081 3083 "src/write.ml" 104 3081 3113
call(
  stack
)
type(
  unit
)
"src/write.ml" 105 3115 3117 "src/write.ml" 105 3115 3121
type(
  int
)
ident(
  int_ref next "src/write.ml" 101 3005 3011 "src/write.ml" 101 3005 3015
)
"src/write.ml" 104 3081 3083 "src/write.ml" 105 3115 3121
type(
  int
)
"src/write.ml" 103 3052 3054 "src/write.ml" 105 3115 3121
type(
  int
)
"src/write.ml" 102 3029 3031 "src/write.ml" 105 3115 3121
type(
  int
)
"src/write.ml" 101 3005 3007 "src/write.ml" 105 3115 3121
type(
  int
)
"src/write.ml" 107 3123 3127 "src/write.ml" 107 3123 3141
type(
  Common.buf -> pos:Common.pos -> char -> int
)
ident(
  def bin_write_char "src/write.ml" 113 3229 3229 "src/write.ml" 1 0 -1
)
"src/write.ml" 107 3123 3142 "src/write.ml" 107 3123 3145
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 107 3123 3146 "src/write.ml" 111 3218 3227
)
"src/write.ml" 107 3123 3147 "src/write.ml" 107 3123 3150
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 107 3123 3151 "src/write.ml" 111 3218 3227
)
"src/write.ml" 107 3123 3151 "src/write.ml" 107 3123 3152
type(
  char
)
ident(
  def c "src/write.ml" 108 3155 3157 "src/write.ml" 111 3218 3227
)
"src/write.ml" 108 3155 3157 "src/write.ml" 108 3155 3167
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 108 3155 3168 "src/write.ml" 108 3155 3171
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 107 3123 3147 "src/write.ml" 107 3123 3150
)
"src/write.ml" 108 3155 3157 "src/write.ml" 108 3155 3171
call(
  stack
)
type(
  unit
)
"src/write.ml" 109 3173 3175 "src/write.ml" 109 3173 3184
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_pos
)
"src/write.ml" 109 3173 3185 "src/write.ml" 109 3173 3188
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 107 3123 3142 "src/write.ml" 107 3123 3145
)
"src/write.ml" 109 3173 3189 "src/write.ml" 109 3173 3192
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 107 3123 3147 "src/write.ml" 107 3123 3150
)
"src/write.ml" 109 3173 3175 "src/write.ml" 109 3173 3192
call(
  stack
)
type(
  unit
)
"src/write.ml" 110 3194 3196 "src/write.ml" 110 3194 3206
type(
  Common.buf -> Common.pos -> char -> unit
)
ident(
  int_ref unsafe_set "src/write.ml" 17 785 785 "src/write.ml" 17 785 859
)
"src/write.ml" 110 3194 3207 "src/write.ml" 110 3194 3210
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 107 3123 3142 "src/write.ml" 107 3123 3145
)
"src/write.ml" 110 3194 3211 "src/write.ml" 110 3194 3214
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 107 3123 3147 "src/write.ml" 107 3123 3150
)
"src/write.ml" 110 3194 3215 "src/write.ml" 110 3194 3216
type(
  char
)
ident(
  int_ref c "src/write.ml" 107 3123 3151 "src/write.ml" 107 3123 3152
)
"src/write.ml" 110 3194 3196 "src/write.ml" 110 3194 3216
type(
  unit
)
"src/write.ml" 111 3218 3220 "src/write.ml" 111 3218 3223
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 107 3123 3147 "src/write.ml" 107 3123 3150
)
"src/write.ml" 111 3218 3224 "src/write.ml" 111 3218 3225
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 111 3218 3226 "src/write.ml" 111 3218 3227
type(
  int
)
"src/write.ml" 111 3218 3220 "src/write.ml" 111 3218 3227
type(
  int
)
"src/write.ml" 110 3194 3196 "src/write.ml" 111 3218 3227
type(
  int
)
"src/write.ml" 109 3173 3175 "src/write.ml" 111 3218 3227
type(
  int
)
"src/write.ml" 108 3155 3157 "src/write.ml" 111 3218 3227
type(
  int
)
"src/write.ml" 113 3229 3233 "src/write.ml" 113 3229 3246
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  def bin_write_int "src/write.ml" 135 3920 3920 "src/write.ml" 1 0 -1
)
"src/write.ml" 113 3229 3247 "src/write.ml" 113 3229 3250
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 113 3229 3251 "src/write.ml" 133 3913 3918
)
"src/write.ml" 113 3229 3252 "src/write.ml" 113 3229 3255
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 113 3229 3256 "src/write.ml" 133 3913 3918
)
"src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
type(
  int
)
ident(
  def n "src/write.ml" 114 3260 3262 "src/write.ml" 133 3913 3918
)
"src/write.ml" 114 3260 3262 "src/write.ml" 114 3260 3272
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 114 3260 3273 "src/write.ml" 114 3260 3276
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 113 3229 3252 "src/write.ml" 113 3229 3255
)
"src/write.ml" 114 3260 3262 "src/write.ml" 114 3260 3276
call(
  stack
)
type(
  unit
)
"src/write.ml" 115 3278 3283 "src/write.ml" 115 3278 3284
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 115 3278 3285 "src/write.ml" 115 3278 3287
type(
  int -> int -> bool
)
ident(
  ext_ref Pervasives.( >= )
)
"src/write.ml" 115 3278 3288 "src/write.ml" 115 3278 3289
type(
  int
)
"src/write.ml" 115 3278 3283 "src/write.ml" 115 3278 3289
type(
  bool
)
"src/write.ml" 116 3301 3308 "src/write.ml" 116 3301 3309
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 116 3301 3310 "src/write.ml" 116 3301 3311
type(
  int -> int -> bool
)
ident(
  ext_ref Pervasives.( < )
)
"src/write.ml" 116 3301 3312 "src/write.ml" 116 3301 3322
type(
  int
)
"src/write.ml" 116 3301 3308 "src/write.ml" 116 3301 3322
type(
  bool
)
"src/write.ml" 117 3328 3334 "src/write.ml" 117 3328 3357
type(
  Common.buf -> Common.pos -> int -> int
)
ident(
  int_ref all_bin_write_small_int "src/write.ml" 74 2410 2414 "src/write.ml" 74 2410 2437
)
"src/write.ml" 117 3328 3358 "src/write.ml" 117 3328 3361
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 113 3229 3247 "src/write.ml" 113 3229 3250
)
"src/write.ml" 117 3328 3362 "src/write.ml" 117 3328 3365
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 113 3229 3252 "src/write.ml" 113 3229 3255
)
"src/write.ml" 117 3328 3366 "src/write.ml" 117 3328 3367
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 117 3328 3334 "src/write.ml" 117 3328 3367
call(
  tail
)
type(
  int
)
"src/write.ml" 118 3368 3380 "src/write.ml" 118 3368 3381
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 118 3368 3382 "src/write.ml" 118 3368 3383
type(
  int -> int -> bool
)
ident(
  ext_ref Pervasives.( < )
)
"src/write.ml" 118 3368 3384 "src/write.ml" 118 3368 3394
type(
  int
)
"src/write.ml" 118 3368 3380 "src/write.ml" 118 3368 3394
type(
  bool
)
"src/write.ml" 119 3400 3406 "src/write.ml" 119 3400 3425
type(
  Common.buf -> Common.pos -> int -> int
)
ident(
  int_ref all_bin_write_int16 "src/write.ml" 86 2661 2665 "src/write.ml" 86 2661 2684
)
"src/write.ml" 119 3400 3426 "src/write.ml" 119 3400 3429
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 113 3229 3247 "src/write.ml" 113 3229 3250
)
"src/write.ml" 119 3400 3430 "src/write.ml" 119 3400 3433
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 113 3229 3252 "src/write.ml" 113 3229 3255
)
"src/write.ml" 119 3400 3434 "src/write.ml" 119 3400 3435
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 119 3400 3406 "src/write.ml" 119 3400 3435
call(
  tail
)
type(
  int
)
"src/write.ml" 120 3436 3448 "src/write.ml" 120 3436 3462
type(
  bool
)
ident(
  int_ref arch_sixtyfour "src/write.ml" 27 1333 1337 "src/write.ml" 27 1333 1351
)
"src/write.ml" 120 3436 3463 "src/write.ml" 120 3436 3465
type(
  bool -> bool -> bool
)
ident(
  ext_ref Pervasives.( && )
)
"src/write.ml" 120 3436 3466 "src/write.ml" 120 3436 3467
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 120 3436 3468 "src/write.ml" 120 3436 3470
type(
  int -> int -> bool
)
ident(
  ext_ref Pervasives.( >= )
)
"src/write.ml" 120 3436 3471 "src/write.ml" 120 3436 3472
type(
  int
)
"src/write.ml" 120 3436 3473 "src/write.ml" 120 3436 3476
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( lsl )
)
"src/write.ml" 120 3436 3477 "src/write.ml" 120 3436 3479
type(
  int
)
"src/write.ml" 120 3436 3471 "src/write.ml" 120 3436 3479
type(
  int
)
"src/write.ml" 120 3436 3466 "src/write.ml" 120 3436 3479
type(
  bool
)
"src/write.ml" 120 3436 3448 "src/write.ml" 120 3436 3479
type(
  bool
)
"src/write.ml" 121 3485 3491 "src/write.ml" 121 3485 3510
type(
  Common.buf -> Common.pos -> int64 -> int
)
ident(
  int_ref all_bin_write_int64 "src/write.ml" 100 2969 2973 "src/write.ml" 100 2969 2992
)
"src/write.ml" 121 3485 3511 "src/write.ml" 121 3485 3514
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 113 3229 3247 "src/write.ml" 113 3229 3250
)
"src/write.ml" 121 3485 3515 "src/write.ml" 121 3485 3518
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 113 3229 3252 "src/write.ml" 113 3229 3255
)
"src/write.ml" 121 3485 3520 "src/write.ml" 121 3485 3532
type(
  int -> int64
)
ident(
  ext_ref Int64.of_int
)
"src/write.ml" 121 3485 3533 "src/write.ml" 121 3485 3534
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 121 3485 3519 "src/write.ml" 121 3485 3535
type(
  int64
)
"src/write.ml" 121 3485 3491 "src/write.ml" 121 3485 3535
call(
  tail
)
type(
  int
)
"src/write.ml" 123 3545 3551 "src/write.ml" 123 3545 3570
type(
  Common.buf -> Common.pos -> int32 -> int
)
ident(
  int_ref all_bin_write_int32 "src/write.ml" 93 2815 2819 "src/write.ml" 93 2815 2838
)
"src/write.ml" 123 3545 3571 "src/write.ml" 123 3545 3574
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 113 3229 3247 "src/write.ml" 113 3229 3250
)
"src/write.ml" 123 3545 3575 "src/write.ml" 123 3545 3578
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 113 3229 3252 "src/write.ml" 113 3229 3255
)
"src/write.ml" 123 3545 3580 "src/write.ml" 123 3545 3592
type(
  int -> int32
)
ident(
  ext_ref Int32.of_int
)
"src/write.ml" 123 3545 3593 "src/write.ml" 123 3545 3594
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 123 3545 3579 "src/write.ml" 123 3545 3595
type(
  int32
)
"src/write.ml" 123 3545 3551 "src/write.ml" 123 3545 3595
call(
  tail
)
type(
  int
)
"src/write.ml" 120 3436 3445 "src/write.ml" 123 3545 3595
type(
  int
)
"src/write.ml" 118 3368 3377 "src/write.ml" 123 3545 3595
type(
  int
)
"src/write.ml" 115 3278 3295 "src/write.ml" 124 3596 3601
type(
  int
)
"src/write.ml" 125 3613 3620 "src/write.ml" 125 3613 3621
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 125 3613 3622 "src/write.ml" 125 3613 3624
type(
  int -> int -> bool
)
ident(
  ext_ref Pervasives.( >= )
)
"src/write.ml" 125 3613 3625 "src/write.ml" 125 3613 3636
type(
  int
)
"src/write.ml" 125 3613 3620 "src/write.ml" 125 3613 3636
type(
  bool
)
"src/write.ml" 126 3642 3648 "src/write.ml" 126 3642 3670
type(
  Common.buf -> Common.pos -> int -> int
)
ident(
  int_ref all_bin_write_neg_int8 "src/write.ml" 79 2507 2511 "src/write.ml" 79 2507 2533
)
"src/write.ml" 126 3642 3671 "src/write.ml" 126 3642 3674
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 113 3229 3247 "src/write.ml" 113 3229 3250
)
"src/write.ml" 126 3642 3675 "src/write.ml" 126 3642 3678
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 113 3229 3252 "src/write.ml" 113 3229 3255
)
"src/write.ml" 126 3642 3679 "src/write.ml" 126 3642 3680
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 126 3642 3648 "src/write.ml" 126 3642 3680
call(
  tail
)
type(
  int
)
"src/write.ml" 127 3681 3693 "src/write.ml" 127 3681 3694
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 127 3681 3695 "src/write.ml" 127 3681 3697
type(
  int -> int -> bool
)
ident(
  ext_ref Pervasives.( >= )
)
"src/write.ml" 127 3681 3698 "src/write.ml" 127 3681 3709
type(
  int
)
"src/write.ml" 127 3681 3693 "src/write.ml" 127 3681 3709
type(
  bool
)
"src/write.ml" 128 3715 3721 "src/write.ml" 128 3715 3740
type(
  Common.buf -> Common.pos -> int -> int
)
ident(
  int_ref all_bin_write_int16 "src/write.ml" 86 2661 2665 "src/write.ml" 86 2661 2684
)
"src/write.ml" 128 3715 3741 "src/write.ml" 128 3715 3744
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 113 3229 3247 "src/write.ml" 113 3229 3250
)
"src/write.ml" 128 3715 3745 "src/write.ml" 128 3715 3748
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 113 3229 3252 "src/write.ml" 113 3229 3255
)
"src/write.ml" 128 3715 3749 "src/write.ml" 128 3715 3750
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 128 3715 3721 "src/write.ml" 128 3715 3750
call(
  tail
)
type(
  int
)
"src/write.ml" 129 3751 3763 "src/write.ml" 129 3751 3777
type(
  bool
)
ident(
  int_ref arch_sixtyfour "src/write.ml" 27 1333 1337 "src/write.ml" 27 1333 1351
)
"src/write.ml" 129 3751 3778 "src/write.ml" 129 3751 3780
type(
  bool -> bool -> bool
)
ident(
  ext_ref Pervasives.( && )
)
"src/write.ml" 129 3751 3781 "src/write.ml" 129 3751 3782
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 129 3751 3783 "src/write.ml" 129 3751 3784
type(
  int -> int -> bool
)
ident(
  ext_ref Pervasives.( < )
)
"src/write.ml" 129 3751 3785 "src/write.ml" 129 3751 3786
type(
  int -> int
)
ident(
  ext_ref Pervasives.( ~- )
)
"src/write.ml" 129 3751 3787 "src/write.ml" 129 3751 3788
type(
  int
)
"src/write.ml" 129 3751 3789 "src/write.ml" 129 3751 3792
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( lsl )
)
"src/write.ml" 129 3751 3793 "src/write.ml" 129 3751 3795
type(
  int
)
"src/write.ml" 129 3751 3786 "src/write.ml" 129 3751 3796
type(
  int
)
"src/write.ml" 129 3751 3785 "src/write.ml" 129 3751 3796
type(
  int
)
"src/write.ml" 129 3751 3781 "src/write.ml" 129 3751 3796
type(
  bool
)
"src/write.ml" 129 3751 3763 "src/write.ml" 129 3751 3796
type(
  bool
)
"src/write.ml" 130 3802 3808 "src/write.ml" 130 3802 3827
type(
  Common.buf -> Common.pos -> int64 -> int
)
ident(
  int_ref all_bin_write_int64 "src/write.ml" 100 2969 2973 "src/write.ml" 100 2969 2992
)
"src/write.ml" 130 3802 3828 "src/write.ml" 130 3802 3831
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 113 3229 3247 "src/write.ml" 113 3229 3250
)
"src/write.ml" 130 3802 3832 "src/write.ml" 130 3802 3835
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 113 3229 3252 "src/write.ml" 113 3229 3255
)
"src/write.ml" 130 3802 3837 "src/write.ml" 130 3802 3849
type(
  int -> int64
)
ident(
  ext_ref Int64.of_int
)
"src/write.ml" 130 3802 3850 "src/write.ml" 130 3802 3851
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 130 3802 3836 "src/write.ml" 130 3802 3852
type(
  int64
)
"src/write.ml" 130 3802 3808 "src/write.ml" 130 3802 3852
call(
  tail
)
type(
  int
)
"src/write.ml" 132 3862 3868 "src/write.ml" 132 3862 3887
type(
  Common.buf -> Common.pos -> int32 -> int
)
ident(
  int_ref all_bin_write_int32 "src/write.ml" 93 2815 2819 "src/write.ml" 93 2815 2838
)
"src/write.ml" 132 3862 3888 "src/write.ml" 132 3862 3891
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 113 3229 3247 "src/write.ml" 113 3229 3250
)
"src/write.ml" 132 3862 3892 "src/write.ml" 132 3862 3895
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 113 3229 3252 "src/write.ml" 113 3229 3255
)
"src/write.ml" 132 3862 3897 "src/write.ml" 132 3862 3909
type(
  int -> int32
)
ident(
  ext_ref Int32.of_int
)
"src/write.ml" 132 3862 3910 "src/write.ml" 132 3862 3911
type(
  int
)
ident(
  int_ref n "src/write.ml" 113 3229 3256 "src/write.ml" 113 3229 3257
)
"src/write.ml" 132 3862 3896 "src/write.ml" 132 3862 3912
type(
  int32
)
"src/write.ml" 132 3862 3868 "src/write.ml" 132 3862 3912
call(
  tail
)
type(
  int
)
"src/write.ml" 129 3751 3760 "src/write.ml" 132 3862 3912
type(
  int
)
"src/write.ml" 127 3681 3690 "src/write.ml" 132 3862 3912
type(
  int
)
"src/write.ml" 124 3596 3607 "src/write.ml" 133 3913 3918
type(
  int
)
"src/write.ml" 115 3278 3280 "src/write.ml" 133 3913 3918
type(
  int
)
"src/write.ml" 114 3260 3262 "src/write.ml" 133 3913 3918
type(
  int
)
"src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  def bin_write_nat0 "src/write.ml" 147 4289 4289 "src/write.ml" 1 0 -1
)
"src/write.ml" 135 3920 3939 "src/write.ml" 135 3920 3942
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 135 3920 3943 "src/write.ml" 145 4239 4287
)
"src/write.ml" 135 3920 3944 "src/write.ml" 135 3920 3947
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 135 3920 3948 "src/write.ml" 145 4239 4287
)
"src/write.ml" 135 3920 3948 "src/write.ml" 135 3920 3952
type(
  Nat0.t
)
ident(
  def nat0 "src/write.ml" 136 3955 3957 "src/write.ml" 145 4239 4287
)
"src/write.ml" 136 3955 3957 "src/write.ml" 136 3955 3967
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 136 3955 3968 "src/write.ml" 136 3955 3971
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 135 3920 3944 "src/write.ml" 135 3920 3947
)
"src/write.ml" 136 3955 3957 "src/write.ml" 136 3955 3971
call(
  stack
)
type(
  unit
)
"src/write.ml" 137 3973 3979 "src/write.ml" 137 3973 3980
type(
  int
)
ident(
  def n "src/write.ml" 138 4009 4011 "src/write.ml" 145 4239 4287
)
"src/write.ml" 137 3973 3984 "src/write.ml" 137 3973 3988
type(
  int
)
type(
  Nat0.t
)
ident(
  int_ref nat0 "src/write.ml" 135 3920 3948 "src/write.ml" 135 3920 3952
)
"src/write.ml" 138 4009 4014 "src/write.ml" 138 4009 4015
type(
  int
)
ident(
  int_ref n "src/write.ml" 137 3973 3979 "src/write.ml" 137 3973 3980
)
"src/write.ml" 138 4009 4016 "src/write.ml" 138 4009 4017
type(
  int -> int -> bool
)
ident(
  ext_ref Pervasives.( < )
)
"src/write.ml" 138 4009 4018 "src/write.ml" 138 4009 4028
type(
  int
)
"src/write.ml" 138 4009 4014 "src/write.ml" 138 4009 4028
type(
  bool
)
"src/write.ml" 139 4034 4038 "src/write.ml" 139 4034 4061
type(
  Common.buf -> Common.pos -> int -> int
)
ident(
  int_ref all_bin_write_small_int "src/write.ml" 74 2410 2414 "src/write.ml" 74 2410 2437
)
"src/write.ml" 139 4034 4062 "src/write.ml" 139 4034 4065
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 135 3920 3939 "src/write.ml" 135 3920 3942
)
"src/write.ml" 139 4034 4066 "src/write.ml" 139 4034 4069
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 135 3920 3944 "src/write.ml" 135 3920 3947
)
"src/write.ml" 139 4034 4070 "src/write.ml" 139 4034 4071
type(
  int
)
ident(
  int_ref n "src/write.ml" 137 3973 3979 "src/write.ml" 137 3973 3980
)
"src/write.ml" 139 4034 4038 "src/write.ml" 139 4034 4071
call(
  tail
)
type(
  int
)
"src/write.ml" 140 4072 4082 "src/write.ml" 140 4072 4083
type(
  int
)
ident(
  int_ref n "src/write.ml" 137 3973 3979 "src/write.ml" 137 3973 3980
)
"src/write.ml" 140 4072 4084 "src/write.ml" 140 4072 4085
type(
  int -> int -> bool
)
ident(
  ext_ref Pervasives.( < )
)
"src/write.ml" 140 4072 4086 "src/write.ml" 140 4072 4096
type(
  int
)
"src/write.ml" 140 4072 4082 "src/write.ml" 140 4072 4096
type(
  bool
)
"src/write.ml" 141 4102 4106 "src/write.ml" 141 4102 4125
type(
  Common.buf -> Common.pos -> int -> int
)
ident(
  int_ref all_bin_write_int16 "src/write.ml" 86 2661 2665 "src/write.ml" 86 2661 2684
)
"src/write.ml" 141 4102 4126 "src/write.ml" 141 4102 4129
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 135 3920 3939 "src/write.ml" 135 3920 3942
)
"src/write.ml" 141 4102 4130 "src/write.ml" 141 4102 4133
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 135 3920 3944 "src/write.ml" 135 3920 3947
)
"src/write.ml" 141 4102 4134 "src/write.ml" 141 4102 4135
type(
  int
)
ident(
  int_ref n "src/write.ml" 137 3973 3979 "src/write.ml" 137 3973 3980
)
"src/write.ml" 141 4102 4106 "src/write.ml" 141 4102 4135
call(
  tail
)
type(
  int
)
"src/write.ml" 142 4136 4146 "src/write.ml" 142 4136 4160
type(
  bool
)
ident(
  int_ref arch_sixtyfour "src/write.ml" 27 1333 1337 "src/write.ml" 27 1333 1351
)
"src/write.ml" 142 4136 4161 "src/write.ml" 142 4136 4163
type(
  bool -> bool -> bool
)
ident(
  ext_ref Pervasives.( && )
)
"src/write.ml" 142 4136 4164 "src/write.ml" 142 4136 4165
type(
  int
)
ident(
  int_ref n "src/write.ml" 137 3973 3979 "src/write.ml" 137 3973 3980
)
"src/write.ml" 142 4136 4166 "src/write.ml" 142 4136 4168
type(
  int -> int -> bool
)
ident(
  ext_ref Pervasives.( >= )
)
"src/write.ml" 142 4136 4169 "src/write.ml" 142 4136 4170
type(
  int
)
"src/write.ml" 142 4136 4171 "src/write.ml" 142 4136 4174
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( lsl )
)
"src/write.ml" 142 4136 4175 "src/write.ml" 142 4136 4177
type(
  int
)
"src/write.ml" 142 4136 4169 "src/write.ml" 142 4136 4177
type(
  int
)
"src/write.ml" 142 4136 4164 "src/write.ml" 142 4136 4177
type(
  bool
)
"src/write.ml" 142 4136 4146 "src/write.ml" 142 4136 4177
type(
  bool
)
"src/write.ml" 143 4183 4187 "src/write.ml" 143 4183 4206
type(
  Common.buf -> Common.pos -> int64 -> int
)
ident(
  int_ref all_bin_write_int64 "src/write.ml" 100 2969 2973 "src/write.ml" 100 2969 2992
)
"src/write.ml" 143 4183 4207 "src/write.ml" 143 4183 4210
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 135 3920 3939 "src/write.ml" 135 3920 3942
)
"src/write.ml" 143 4183 4211 "src/write.ml" 143 4183 4214
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 135 3920 3944 "src/write.ml" 135 3920 3947
)
"src/write.ml" 143 4183 4216 "src/write.ml" 143 4183 4228
type(
  int -> int64
)
ident(
  ext_ref Int64.of_int
)
"src/write.ml" 143 4183 4229 "src/write.ml" 143 4183 4230
type(
  int
)
ident(
  int_ref n "src/write.ml" 137 3973 3979 "src/write.ml" 137 3973 3980
)
"src/write.ml" 143 4183 4215 "src/write.ml" 143 4183 4231
type(
  int64
)
"src/write.ml" 143 4183 4187 "src/write.ml" 143 4183 4231
call(
  tail
)
type(
  int
)
"src/write.ml" 145 4239 4243 "src/write.ml" 145 4239 4262
type(
  Common.buf -> Common.pos -> int32 -> int
)
ident(
  int_ref all_bin_write_int32 "src/write.ml" 93 2815 2819 "src/write.ml" 93 2815 2838
)
"src/write.ml" 145 4239 4263 "src/write.ml" 145 4239 4266
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 135 3920 3939 "src/write.ml" 135 3920 3942
)
"src/write.ml" 145 4239 4267 "src/write.ml" 145 4239 4270
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 135 3920 3944 "src/write.ml" 135 3920 3947
)
"src/write.ml" 145 4239 4272 "src/write.ml" 145 4239 4284
type(
  int -> int32
)
ident(
  ext_ref Int32.of_int
)
"src/write.ml" 145 4239 4285 "src/write.ml" 145 4239 4286
type(
  int
)
ident(
  int_ref n "src/write.ml" 137 3973 3979 "src/write.ml" 137 3973 3980
)
"src/write.ml" 145 4239 4271 "src/write.ml" 145 4239 4287
type(
  int32
)
"src/write.ml" 145 4239 4243 "src/write.ml" 145 4239 4287
call(
  tail
)
type(
  int
)
"src/write.ml" 142 4136 4143 "src/write.ml" 145 4239 4287
type(
  int
)
"src/write.ml" 140 4072 4079 "src/write.ml" 145 4239 4287
type(
  int
)
"src/write.ml" 138 4009 4011 "src/write.ml" 145 4239 4287
type(
  int
)
"src/write.ml" 137 3973 3975 "src/write.ml" 145 4239 4287
type(
  int
)
"src/write.ml" 136 3955 3957 "src/write.ml" 145 4239 4287
type(
  int
)
"src/write.ml" 147 4289 4293 "src/write.ml" 147 4289 4309
type(
  Common.buf -> pos:Common.pos -> string -> int
)
ident(
  def bin_write_string "src/write.ml" 160 4647 4647 "src/write.ml" 1 0 -1
)
"src/write.ml" 147 4289 4310 "src/write.ml" 147 4289 4313
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 147 4289 4314 "src/write.ml" 155 4606 4612
)
"src/write.ml" 147 4289 4315 "src/write.ml" 147 4289 4318
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 147 4289 4319 "src/write.ml" 155 4606 4612
)
"src/write.ml" 147 4289 4319 "src/write.ml" 147 4289 4322
type(
  string
)
ident(
  def str "src/write.ml" 148 4325 4327 "src/write.ml" 155 4606 4612
)
"src/write.ml" 148 4325 4331 "src/write.ml" 148 4325 4334
type(
  int
)
ident(
  def len "src/write.ml" 149 4358 4360 "src/write.ml" 155 4606 4612
)
"src/write.ml" 148 4325 4337 "src/write.ml" 148 4325 4350
type(
  string -> int
)
ident(
  ext_ref String.length
)
"src/write.ml" 148 4325 4351 "src/write.ml" 148 4325 4354
type(
  string
)
ident(
  int_ref str "src/write.ml" 147 4289 4319 "src/write.ml" 147 4289 4322
)
"src/write.ml" 148 4325 4337 "src/write.ml" 148 4325 4354
type(
  int
)
"src/write.ml" 149 4358 4364 "src/write.ml" 149 4358 4368
type(
  Nat0.t
)
ident(
  def plen "src/write.ml" 150 4397 4399 "src/write.ml" 155 4606 4612
)
"src/write.ml" 149 4358 4371 "src/write.ml" 149 4358 4389
type(
  int -> Nat0.t
)
ident(
  ext_ref Nat0.unsafe_of_int
)
"src/write.ml" 149 4358 4390 "src/write.ml" 149 4358 4393
type(
  int
)
ident(
  int_ref len "src/write.ml" 148 4325 4331 "src/write.ml" 148 4325 4334
)
"src/write.ml" 149 4358 4371 "src/write.ml" 149 4358 4393
type(
  Nat0.t
)
"src/write.ml" 150 4397 4403 "src/write.ml" 150 4397 4410
type(
  int
)
ident(
  def new_pos "src/write.ml" 151 4445 4447 "src/write.ml" 155 4606 4612
)
"src/write.ml" 150 4397 4413 "src/write.ml" 150 4397 4427
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  int_ref bin_write_nat0 "src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
)
"src/write.ml" 150 4397 4428 "src/write.ml" 150 4397 4431
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 147 4289 4310 "src/write.ml" 147 4289 4313
)
"src/write.ml" 150 4397 4433 "src/write.ml" 150 4397 4436
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 147 4289 4315 "src/write.ml" 147 4289 4318
)
"src/write.ml" 150 4397 4437 "src/write.ml" 150 4397 4441
type(
  Nat0.t
)
ident(
  int_ref plen "src/write.ml" 149 4358 4364 "src/write.ml" 149 4358 4368
)
"src/write.ml" 150 4397 4413 "src/write.ml" 150 4397 4441
call(
  stack
)
type(
  int
)
"src/write.ml" 151 4445 4451 "src/write.ml" 151 4445 4455
type(
  int
)
ident(
  def next "src/write.ml" 152 4475 4477 "src/write.ml" 155 4606 4612
)
"src/write.ml" 151 4445 4458 "src/write.ml" 151 4445 4465
type(
  int
)
ident(
  int_ref new_pos "src/write.ml" 150 4397 4403 "src/write.ml" 150 4397 4410
)
"src/write.ml" 151 4445 4466 "src/write.ml" 151 4445 4467
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 151 4445 4468 "src/write.ml" 151 4445 4471
type(
  int
)
ident(
  int_ref len "src/write.ml" 148 4325 4331 "src/write.ml" 148 4325 4334
)
"src/write.ml" 151 4445 4458 "src/write.ml" 151 4445 4471
type(
  int
)
"src/write.ml" 152 4475 4477 "src/write.ml" 152 4475 4487
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 152 4475 4488 "src/write.ml" 152 4475 4491
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 147 4289 4310 "src/write.ml" 147 4289 4313
)
"src/write.ml" 152 4475 4492 "src/write.ml" 152 4475 4496
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 151 4445 4451 "src/write.ml" 151 4445 4455
)
"src/write.ml" 152 4475 4477 "src/write.ml" 152 4475 4496
call(
  stack
)
type(
  unit
)
"src/write.ml" 154 4539 4541 "src/write.ml" 154 4539 4563
type(
  src_pos:int -> string -> dst_pos:int -> Common.buf -> len:int -> unit
)
ident(
  ext_ref Common.unsafe_blit_string_buf
)
"src/write.ml" 154 4539 4573 "src/write.ml" 154 4539 4574
type(
  int
)
"src/write.ml" 154 4539 4575 "src/write.ml" 154 4539 4578
type(
  string
)
ident(
  int_ref str "src/write.ml" 147 4289 4319 "src/write.ml" 147 4289 4322
)
"src/write.ml" 154 4539 4588 "src/write.ml" 154 4539 4595
type(
  int
)
ident(
  int_ref new_pos "src/write.ml" 150 4397 4403 "src/write.ml" 150 4397 4410
)
"src/write.ml" 154 4539 4596 "src/write.ml" 154 4539 4599
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 147 4289 4310 "src/write.ml" 147 4289 4313
)
"src/write.ml" 154 4539 4601 "src/write.ml" 154 4539 4604
type(
  int
)
ident(
  int_ref len "src/write.ml" 148 4325 4331 "src/write.ml" 148 4325 4334
)
"src/write.ml" 154 4539 4541 "src/write.ml" 154 4539 4604
type(
  unit
)
"src/write.ml" 155 4606 4608 "src/write.ml" 155 4606 4612
type(
  int
)
ident(
  int_ref next "src/write.ml" 151 4445 4451 "src/write.ml" 151 4445 4455
)
"src/write.ml" 154 4539 4541 "src/write.ml" 155 4606 4612
type(
  int
)
"src/write.ml" 152 4475 4477 "src/write.ml" 155 4606 4612
type(
  int
)
"src/write.ml" 151 4445 4447 "src/write.ml" 155 4606 4612
type(
  int
)
"src/write.ml" 150 4397 4399 "src/write.ml" 155 4606 4612
type(
  int
)
"src/write.ml" 149 4358 4360 "src/write.ml" 155 4606 4612
type(
  int
)
"src/write.ml" 148 4325 4327 "src/write.ml" 155 4606 4612
type(
  int
)
"src/write.ml" 164 4745 4749 "src/write.ml" 164 4745 4764
type(
  Common.buf -> pos:Common.pos -> float -> int
)
ident(
  def bin_write_float "src/write.ml" 176 4907 4907 "src/write.ml" 1 0 -1
)
"src/write.ml" 164 4745 4765 "src/write.ml" 164 4745 4768
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 164 4745 4769 "src/write.ml" 174 4899 4905
)
"src/write.ml" 164 4745 4770 "src/write.ml" 164 4745 4773
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 164 4745 4774 "src/write.ml" 174 4899 4905
)
"src/write.ml" 164 4745 4774 "src/write.ml" 164 4745 4775
type(
  float
)
ident(
  def x "src/write.ml" 165 4778 4780 "src/write.ml" 174 4899 4905
)
"src/write.ml" 165 4778 4780 "src/write.ml" 165 4778 4790
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 165 4778 4791 "src/write.ml" 165 4778 4794
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 164 4745 4770 "src/write.ml" 164 4745 4773
)
"src/write.ml" 165 4778 4780 "src/write.ml" 165 4778 4794
call(
  stack
)
type(
  unit
)
"src/write.ml" 166 4796 4802 "src/write.ml" 166 4796 4806
type(
  int
)
ident(
  def next "src/write.ml" 167 4820 4822 "src/write.ml" 174 4899 4905
)
"src/write.ml" 166 4796 4809 "src/write.ml" 166 4796 4812
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 164 4745 4770 "src/write.ml" 164 4745 4773
)
"src/write.ml" 166 4796 4813 "src/write.ml" 166 4796 4814
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 166 4796 4815 "src/write.ml" 166 4796 4816
type(
  int
)
"src/write.ml" 166 4796 4809 "src/write.ml" 166 4796 4816
type(
  int
)
"src/write.ml" 167 4820 4822 "src/write.ml" 167 4820 4832
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 167 4820 4833 "src/write.ml" 167 4820 4836
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 164 4745 4765 "src/write.ml" 164 4745 4768
)
"src/write.ml" 167 4820 4837 "src/write.ml" 167 4820 4841
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 166 4796 4802 "src/write.ml" 166 4796 4806
)
"src/write.ml" 167 4820 4822 "src/write.ml" 167 4820 4841
call(
  stack
)
type(
  unit
)
"src/write.ml" 169 4844 4846 "src/write.ml" 169 4844 4862
type(
  float array -> int -> float -> unit
)
ident(
  ext_ref Array.unsafe_set
)
"src/write.ml" 169 4844 4864 "src/write.ml" 169 4844 4880
type(
  Common.buf -> Common.pos -> float array
)
ident(
  int_ref get_float_offset "src/write.ml" 160 4647 4647 "src/write.ml" 161 4701 4742
)
"src/write.ml" 169 4844 4881 "src/write.ml" 169 4844 4884
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 164 4745 4765 "src/write.ml" 164 4745 4768
)
"src/write.ml" 169 4844 4885 "src/write.ml" 169 4844 4888
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 164 4745 4770 "src/write.ml" 164 4745 4773
)
"src/write.ml" 169 4844 4863 "src/write.ml" 169 4844 4889
type(
  float array
)
"src/write.ml" 169 4844 4890 "src/write.ml" 169 4844 4891
type(
  int
)
"src/write.ml" 169 4844 4892 "src/write.ml" 169 4844 4893
type(
  float
)
ident(
  int_ref x "src/write.ml" 164 4745 4774 "src/write.ml" 164 4745 4775
)
"src/write.ml" 169 4844 4846 "src/write.ml" 169 4844 4893
type(
  unit
)
"src/write.ml" 174 4899 4901 "src/write.ml" 174 4899 4905
type(
  int
)
ident(
  int_ref next "src/write.ml" 166 4796 4802 "src/write.ml" 166 4796 4806
)
"src/write.ml" 169 4844 4846 "src/write.ml" 174 4899 4905
type(
  int
)
"src/write.ml" 167 4820 4822 "src/write.ml" 174 4899 4905
type(
  int
)
"src/write.ml" 166 4796 4798 "src/write.ml" 174 4899 4905
type(
  int
)
"src/write.ml" 165 4778 4780 "src/write.ml" 174 4899 4905
type(
  int
)
"src/write.ml" 176 4907 4911 "src/write.ml" 176 4907 4926
type(
  Common.buf -> pos:Common.pos -> int32 -> int
)
ident(
  def bin_write_int32 "src/write.ml" 187 5228 5228 "src/write.ml" 1 0 -1
)
"src/write.ml" 177 4929 4934 "src/write.ml" 177 4929 4948
type(
  bool
)
ident(
  int_ref arch_sixtyfour "src/write.ml" 27 1333 1337 "src/write.ml" 27 1333 1351
)
"src/write.ml" 178 4954 4962 "src/write.ml" 178 4954 4965
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 178 4954 4966 "src/write.ml" 178 4954 5015
)
"src/write.ml" 178 4954 4967 "src/write.ml" 178 4954 4970
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 178 4954 4971 "src/write.ml" 178 4954 5015
)
"src/write.ml" 178 4954 4971 "src/write.ml" 178 4954 4972
type(
  int32
)
ident(
  def n "src/write.ml" 178 4954 4976 "src/write.ml" 178 4954 5015
)
"src/write.ml" 178 4954 4976 "src/write.ml" 178 4954 4989
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  int_ref bin_write_int "src/write.ml" 113 3229 3233 "src/write.ml" 113 3229 3246
)
"src/write.ml" 178 4954 4990 "src/write.ml" 178 4954 4993
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 178 4954 4962 "src/write.ml" 178 4954 4965
)
"src/write.ml" 178 4954 4995 "src/write.ml" 178 4954 4998
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 178 4954 4967 "src/write.ml" 178 4954 4970
)
"src/write.ml" 178 4954 5000 "src/write.ml" 178 4954 5012
type(
  int32 -> int
)
ident(
  ext_ref Int32.to_int
)
"src/write.ml" 178 4954 5013 "src/write.ml" 178 4954 5014
type(
  int32
)
ident(
  int_ref n "src/write.ml" 178 4954 4971 "src/write.ml" 178 4954 4972
)
"src/write.ml" 178 4954 4999 "src/write.ml" 178 4954 5015
type(
  int
)
"src/write.ml" 178 4954 4976 "src/write.ml" 178 4954 5015
call(
  tail
)
type(
  int
)
"src/write.ml" 178 4954 4958 "src/write.ml" 178 4954 5015
type(
  Common.buf -> pos:Common.pos -> int32 -> int
)
"src/write.ml" 180 5023 5031 "src/write.ml" 180 5023 5034
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 180 5023 5035 "src/write.ml" 185 5179 5226
)
"src/write.ml" 180 5023 5036 "src/write.ml" 180 5023 5039
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 180 5023 5040 "src/write.ml" 185 5179 5226
)
"src/write.ml" 180 5023 5040 "src/write.ml" 180 5023 5041
type(
  int32
)
ident(
  def n "src/write.ml" 181 5045 5051 "src/write.ml" 185 5179 5226
)
"src/write.ml" 181 5045 5054 "src/write.ml" 181 5045 5055
type(
  int32
)
ident(
  int_ref n "src/write.ml" 180 5023 5040 "src/write.ml" 180 5023 5041
)
"src/write.ml" 181 5045 5056 "src/write.ml" 181 5045 5058
type(
  int32 -> int32 -> bool
)
ident(
  ext_ref Pervasives.( >= )
)
"src/write.ml" 181 5045 5059 "src/write.ml" 181 5045 5070
type(
  int32
)
"src/write.ml" 181 5045 5054 "src/write.ml" 181 5045 5070
type(
  bool
)
"src/write.ml" 181 5045 5071 "src/write.ml" 181 5045 5073
type(
  bool -> bool -> bool
)
ident(
  ext_ref Pervasives.( || )
)
"src/write.ml" 181 5045 5074 "src/write.ml" 181 5045 5075
type(
  int32
)
ident(
  int_ref n "src/write.ml" 180 5023 5040 "src/write.ml" 180 5023 5041
)
"src/write.ml" 181 5045 5076 "src/write.ml" 181 5045 5077
type(
  int32 -> int32 -> bool
)
ident(
  ext_ref Pervasives.( < )
)
"src/write.ml" 181 5045 5078 "src/write.ml" 181 5045 5090
type(
  int32
)
"src/write.ml" 181 5045 5074 "src/write.ml" 181 5045 5090
type(
  bool
)
"src/write.ml" 181 5045 5054 "src/write.ml" 181 5045 5090
type(
  bool
)
"src/write.ml" 182 5102 5110 "src/write.ml" 182 5102 5120
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 182 5102 5121 "src/write.ml" 182 5102 5124
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 180 5023 5036 "src/write.ml" 180 5023 5039
)
"src/write.ml" 182 5102 5110 "src/write.ml" 182 5102 5124
call(
  stack
)
type(
  unit
)
"src/write.ml" 183 5126 5134 "src/write.ml" 183 5126 5153
type(
  Common.buf -> Common.pos -> int32 -> int
)
ident(
  int_ref all_bin_write_int32 "src/write.ml" 93 2815 2819 "src/write.ml" 93 2815 2838
)
"src/write.ml" 183 5126 5154 "src/write.ml" 183 5126 5157
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 180 5023 5031 "src/write.ml" 180 5023 5034
)
"src/write.ml" 183 5126 5158 "src/write.ml" 183 5126 5161
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 180 5023 5036 "src/write.ml" 180 5023 5039
)
"src/write.ml" 183 5126 5162 "src/write.ml" 183 5126 5163
type(
  int32
)
ident(
  int_ref n "src/write.ml" 180 5023 5040 "src/write.ml" 180 5023 5041
)
"src/write.ml" 183 5126 5134 "src/write.ml" 183 5126 5163
call(
  tail
)
type(
  int
)
"src/write.ml" 181 5045 5096 "src/write.ml" 184 5164 5173
type(
  int
)
"src/write.ml" 185 5179 5187 "src/write.ml" 185 5179 5200
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  int_ref bin_write_int "src/write.ml" 113 3229 3233 "src/write.ml" 113 3229 3246
)
"src/write.ml" 185 5179 5201 "src/write.ml" 185 5179 5204
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 180 5023 5031 "src/write.ml" 180 5023 5034
)
"src/write.ml" 185 5179 5206 "src/write.ml" 185 5179 5209
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 180 5023 5036 "src/write.ml" 180 5023 5039
)
"src/write.ml" 185 5179 5211 "src/write.ml" 185 5179 5223
type(
  int32 -> int
)
ident(
  ext_ref Int32.to_int
)
"src/write.ml" 185 5179 5224 "src/write.ml" 185 5179 5225
type(
  int32
)
ident(
  int_ref n "src/write.ml" 180 5023 5040 "src/write.ml" 180 5023 5041
)
"src/write.ml" 185 5179 5210 "src/write.ml" 185 5179 5226
type(
  int
)
"src/write.ml" 185 5179 5187 "src/write.ml" 185 5179 5226
call(
  tail
)
type(
  int
)
"src/write.ml" 181 5045 5051 "src/write.ml" 185 5179 5226
type(
  int
)
"src/write.ml" 180 5023 5027 "src/write.ml" 185 5179 5226
type(
  Common.buf -> pos:Common.pos -> int32 -> int
)
"src/write.ml" 177 4929 4931 "src/write.ml" 185 5179 5226
type(
  Common.buf -> pos:Common.pos -> int32 -> int
)
"src/write.ml" 187 5228 5232 "src/write.ml" 187 5228 5247
type(
  Common.buf -> pos:Common.pos -> int64 -> int
)
ident(
  def bin_write_int64 "src/write.ml" 199 5631 5631 "src/write.ml" 1 0 -1
)
"src/write.ml" 187 5228 5248 "src/write.ml" 187 5228 5251
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 187 5228 5252 "src/write.ml" 197 5586 5629
)
"src/write.ml" 187 5228 5253 "src/write.ml" 187 5228 5256
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 187 5228 5257 "src/write.ml" 197 5586 5629
)
"src/write.ml" 187 5228 5257 "src/write.ml" 187 5228 5258
type(
  int64
)
ident(
  def n "src/write.ml" 188 5261 5263 "src/write.ml" 197 5586 5629
)
"src/write.ml" 188 5261 5266 "src/write.ml" 188 5261 5267
type(
  int64
)
ident(
  int_ref n "src/write.ml" 187 5228 5257 "src/write.ml" 187 5228 5258
)
"src/write.ml" 188 5261 5268 "src/write.ml" 188 5261 5270
type(
  int64 -> int64 -> bool
)
ident(
  ext_ref Pervasives.( >= )
)
"src/write.ml" 188 5261 5271 "src/write.ml" 188 5261 5282
type(
  int64
)
"src/write.ml" 188 5261 5266 "src/write.ml" 188 5261 5282
type(
  bool
)
"src/write.ml" 188 5261 5283 "src/write.ml" 188 5261 5285
type(
  bool -> bool -> bool
)
ident(
  ext_ref Pervasives.( || )
)
"src/write.ml" 188 5261 5286 "src/write.ml" 188 5261 5287
type(
  int64
)
ident(
  int_ref n "src/write.ml" 187 5228 5257 "src/write.ml" 187 5228 5258
)
"src/write.ml" 188 5261 5288 "src/write.ml" 188 5261 5289
type(
  int64 -> int64 -> bool
)
ident(
  ext_ref Pervasives.( < )
)
"src/write.ml" 188 5261 5290 "src/write.ml" 188 5261 5302
type(
  int64
)
"src/write.ml" 188 5261 5286 "src/write.ml" 188 5261 5302
type(
  bool
)
"src/write.ml" 188 5261 5266 "src/write.ml" 188 5261 5302
type(
  bool
)
"src/write.ml" 189 5314 5318 "src/write.ml" 189 5314 5328
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 189 5314 5329 "src/write.ml" 189 5314 5332
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 187 5228 5253 "src/write.ml" 187 5228 5256
)
"src/write.ml" 189 5314 5318 "src/write.ml" 189 5314 5332
call(
  stack
)
type(
  unit
)
"src/write.ml" 190 5334 5338 "src/write.ml" 190 5334 5357
type(
  Common.buf -> Common.pos -> int64 -> int
)
ident(
  int_ref all_bin_write_int64 "src/write.ml" 100 2969 2973 "src/write.ml" 100 2969 2992
)
"src/write.ml" 190 5334 5358 "src/write.ml" 190 5334 5361
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 187 5228 5248 "src/write.ml" 187 5228 5251
)
"src/write.ml" 190 5334 5362 "src/write.ml" 190 5334 5365
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 187 5228 5253 "src/write.ml" 187 5228 5256
)
"src/write.ml" 190 5334 5366 "src/write.ml" 190 5334 5367
type(
  int64
)
ident(
  int_ref n "src/write.ml" 187 5228 5257 "src/write.ml" 187 5228 5258
)
"src/write.ml" 190 5334 5338 "src/write.ml" 190 5334 5367
call(
  tail
)
type(
  int
)
"src/write.ml" 188 5261 5308 "src/write.ml" 191 5368 5373
type(
  int
)
"src/write.ml" 191 5368 5382 "src/write.ml" 191 5368 5396
type(
  bool
)
ident(
  int_ref arch_sixtyfour "src/write.ml" 27 1333 1337 "src/write.ml" 27 1333 1351
)
"src/write.ml" 192 5402 5406 "src/write.ml" 192 5402 5419
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  int_ref bin_write_int "src/write.ml" 113 3229 3233 "src/write.ml" 113 3229 3246
)
"src/write.ml" 192 5402 5420 "src/write.ml" 192 5402 5423
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 187 5228 5248 "src/write.ml" 187 5228 5251
)
"src/write.ml" 192 5402 5425 "src/write.ml" 192 5402 5428
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 187 5228 5253 "src/write.ml" 187 5228 5256
)
"src/write.ml" 192 5402 5430 "src/write.ml" 192 5402 5442
type(
  int64 -> int
)
ident(
  ext_ref Int64.to_int
)
"src/write.ml" 192 5402 5443 "src/write.ml" 192 5402 5444
type(
  int64
)
ident(
  int_ref n "src/write.ml" 187 5228 5257 "src/write.ml" 187 5228 5258
)
"src/write.ml" 192 5402 5429 "src/write.ml" 192 5402 5445
type(
  int
)
"src/write.ml" 192 5402 5406 "src/write.ml" 192 5402 5445
call(
  tail
)
type(
  int
)
"src/write.ml" 193 5446 5456 "src/write.ml" 193 5446 5457
type(
  int64
)
ident(
  int_ref n "src/write.ml" 187 5228 5257 "src/write.ml" 187 5228 5258
)
"src/write.ml" 193 5446 5458 "src/write.ml" 193 5446 5460
type(
  int64 -> int64 -> bool
)
ident(
  ext_ref Pervasives.( >= )
)
"src/write.ml" 193 5446 5461 "src/write.ml" 193 5446 5472
type(
  int64
)
"src/write.ml" 193 5446 5456 "src/write.ml" 193 5446 5472
type(
  bool
)
"src/write.ml" 193 5446 5473 "src/write.ml" 193 5446 5475
type(
  bool -> bool -> bool
)
ident(
  ext_ref Pervasives.( || )
)
"src/write.ml" 193 5446 5476 "src/write.ml" 193 5446 5477
type(
  int64
)
ident(
  int_ref n "src/write.ml" 187 5228 5257 "src/write.ml" 187 5228 5258
)
"src/write.ml" 193 5446 5478 "src/write.ml" 193 5446 5479
type(
  int64 -> int64 -> bool
)
ident(
  ext_ref Pervasives.( < )
)
"src/write.ml" 193 5446 5480 "src/write.ml" 193 5446 5492
type(
  int64
)
"src/write.ml" 193 5446 5476 "src/write.ml" 193 5446 5492
type(
  bool
)
"src/write.ml" 193 5446 5456 "src/write.ml" 193 5446 5492
type(
  bool
)
"src/write.ml" 194 5504 5508 "src/write.ml" 194 5504 5518
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 194 5504 5519 "src/write.ml" 194 5504 5522
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 187 5228 5253 "src/write.ml" 187 5228 5256
)
"src/write.ml" 194 5504 5508 "src/write.ml" 194 5504 5522
call(
  stack
)
type(
  unit
)
"src/write.ml" 195 5524 5528 "src/write.ml" 195 5524 5547
type(
  Common.buf -> Common.pos -> int32 -> int
)
ident(
  int_ref all_bin_write_int32 "src/write.ml" 93 2815 2819 "src/write.ml" 93 2815 2838
)
"src/write.ml" 195 5524 5548 "src/write.ml" 195 5524 5551
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 187 5228 5248 "src/write.ml" 187 5228 5251
)
"src/write.ml" 195 5524 5552 "src/write.ml" 195 5524 5555
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 187 5228 5253 "src/write.ml" 187 5228 5256
)
"src/write.ml" 195 5524 5557 "src/write.ml" 195 5524 5571
type(
  int64 -> int32
)
ident(
  ext_ref Int64.to_int32
)
"src/write.ml" 195 5524 5572 "src/write.ml" 195 5524 5573
type(
  int64
)
ident(
  int_ref n "src/write.ml" 187 5228 5257 "src/write.ml" 187 5228 5258
)
"src/write.ml" 195 5524 5556 "src/write.ml" 195 5524 5574
type(
  int32
)
"src/write.ml" 195 5524 5528 "src/write.ml" 195 5524 5574
call(
  tail
)
type(
  int
)
"src/write.ml" 193 5446 5498 "src/write.ml" 196 5575 5580
type(
  int
)
"src/write.ml" 197 5586 5590 "src/write.ml" 197 5586 5603
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  int_ref bin_write_int "src/write.ml" 113 3229 3233 "src/write.ml" 113 3229 3246
)
"src/write.ml" 197 5586 5604 "src/write.ml" 197 5586 5607
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 187 5228 5248 "src/write.ml" 187 5228 5251
)
"src/write.ml" 197 5586 5609 "src/write.ml" 197 5586 5612
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 187 5228 5253 "src/write.ml" 187 5228 5256
)
"src/write.ml" 197 5586 5614 "src/write.ml" 197 5586 5626
type(
  int64 -> int
)
ident(
  ext_ref Int64.to_int
)
"src/write.ml" 197 5586 5627 "src/write.ml" 197 5586 5628
type(
  int64
)
ident(
  int_ref n "src/write.ml" 187 5228 5257 "src/write.ml" 187 5228 5258
)
"src/write.ml" 197 5586 5613 "src/write.ml" 197 5586 5629
type(
  int
)
"src/write.ml" 197 5586 5590 "src/write.ml" 197 5586 5629
call(
  tail
)
type(
  int
)
"src/write.ml" 193 5446 5453 "src/write.ml" 197 5586 5629
type(
  int
)
"src/write.ml" 191 5368 5379 "src/write.ml" 197 5586 5629
type(
  int
)
"src/write.ml" 188 5261 5263 "src/write.ml" 197 5586 5629
type(
  int
)
"src/write.ml" 199 5631 5635 "src/write.ml" 199 5631 5654
type(
  Common.buf -> pos:Common.pos -> nativeint -> int
)
ident(
  def bin_write_nativeint "src/write.ml" 209 6025 6025 "src/write.ml" 1 0 -1
)
"src/write.ml" 199 5631 5655 "src/write.ml" 199 5631 5658
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 199 5631 5659 "src/write.ml" 207 5976 6023
)
"src/write.ml" 199 5631 5660 "src/write.ml" 199 5631 5663
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 199 5631 5664 "src/write.ml" 207 5976 6023
)
"src/write.ml" 199 5631 5664 "src/write.ml" 199 5631 5665
type(
  nativeint
)
ident(
  def n "src/write.ml" 200 5668 5670 "src/write.ml" 207 5976 6023
)
"src/write.ml" 200 5668 5673 "src/write.ml" 200 5668 5687
type(
  bool
)
ident(
  int_ref arch_sixtyfour "src/write.ml" 27 1333 1337 "src/write.ml" 27 1333 1351
)
"src/write.ml" 200 5668 5688 "src/write.ml" 200 5668 5690
type(
  bool -> bool -> bool
)
ident(
  ext_ref Pervasives.( && )
)
"src/write.ml" 200 5668 5691 "src/write.ml" 200 5668 5692
type(
  nativeint
)
ident(
  int_ref n "src/write.ml" 199 5631 5664 "src/write.ml" 199 5631 5665
)
"src/write.ml" 200 5668 5693 "src/write.ml" 200 5668 5695
type(
  nativeint -> nativeint -> bool
)
ident(
  ext_ref Pervasives.( >= )
)
"src/write.ml" 200 5668 5696 "src/write.ml" 200 5668 5707
type(
  nativeint
)
"src/write.ml" 200 5668 5691 "src/write.ml" 200 5668 5707
type(
  bool
)
"src/write.ml" 200 5668 5673 "src/write.ml" 200 5668 5707
type(
  bool
)
"src/write.ml" 200 5668 5708 "src/write.ml" 200 5668 5710
type(
  bool -> bool -> bool
)
ident(
  ext_ref Pervasives.( || )
)
"src/write.ml" 200 5668 5711 "src/write.ml" 200 5668 5712
type(
  nativeint
)
ident(
  int_ref n "src/write.ml" 199 5631 5664 "src/write.ml" 199 5631 5665
)
"src/write.ml" 200 5668 5713 "src/write.ml" 200 5668 5714
type(
  nativeint -> nativeint -> bool
)
ident(
  ext_ref Pervasives.( < )
)
"src/write.ml" 200 5668 5715 "src/write.ml" 200 5668 5727
type(
  nativeint
)
"src/write.ml" 200 5668 5711 "src/write.ml" 200 5668 5727
type(
  bool
)
"src/write.ml" 200 5668 5673 "src/write.ml" 200 5668 5727
type(
  bool
)
"src/write.ml" 201 5739 5743 "src/write.ml" 201 5739 5753
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 201 5739 5754 "src/write.ml" 201 5739 5757
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 199 5631 5660 "src/write.ml" 199 5631 5663
)
"src/write.ml" 201 5739 5743 "src/write.ml" 201 5739 5757
call(
  stack
)
type(
  unit
)
"src/write.ml" 202 5759 5763 "src/write.ml" 202 5759 5782
type(
  Common.buf -> Common.pos -> int64 -> int
)
ident(
  int_ref all_bin_write_int64 "src/write.ml" 100 2969 2973 "src/write.ml" 100 2969 2992
)
"src/write.ml" 202 5759 5783 "src/write.ml" 202 5759 5786
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 199 5631 5655 "src/write.ml" 199 5631 5658
)
"src/write.ml" 202 5759 5787 "src/write.ml" 202 5759 5790
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 199 5631 5660 "src/write.ml" 199 5631 5663
)
"src/write.ml" 202 5759 5792 "src/write.ml" 202 5759 5810
type(
  nativeint -> int64
)
ident(
  ext_ref Int64.of_nativeint
)
"src/write.ml" 202 5759 5811 "src/write.ml" 202 5759 5812
type(
  nativeint
)
ident(
  int_ref n "src/write.ml" 199 5631 5664 "src/write.ml" 199 5631 5665
)
"src/write.ml" 202 5759 5791 "src/write.ml" 202 5759 5813
type(
  int64
)
"src/write.ml" 202 5759 5763 "src/write.ml" 202 5759 5813
call(
  tail
)
type(
  int
)
"src/write.ml" 200 5668 5733 "src/write.ml" 203 5814 5819
type(
  int
)
"src/write.ml" 203 5814 5828 "src/write.ml" 203 5814 5831
type(
  bool -> bool
)
ident(
  ext_ref Pervasives.not
)
"src/write.ml" 203 5814 5832 "src/write.ml" 203 5814 5846
type(
  bool
)
ident(
  int_ref arch_sixtyfour "src/write.ml" 27 1333 1337 "src/write.ml" 27 1333 1351
)
"src/write.ml" 203 5814 5828 "src/write.ml" 203 5814 5846
type(
  bool
)
"src/write.ml" 203 5814 5847 "src/write.ml" 203 5814 5849
type(
  bool -> bool -> bool
)
ident(
  ext_ref Pervasives.( && )
)
"src/write.ml" 203 5814 5850 "src/write.ml" 203 5814 5851
type(
  nativeint
)
ident(
  int_ref n "src/write.ml" 199 5631 5664 "src/write.ml" 199 5631 5665
)
"src/write.ml" 203 5814 5852 "src/write.ml" 203 5814 5854
type(
  nativeint -> nativeint -> bool
)
ident(
  ext_ref Pervasives.( >= )
)
"src/write.ml" 203 5814 5855 "src/write.ml" 203 5814 5862
type(
  nativeint
)
"src/write.ml" 203 5814 5850 "src/write.ml" 203 5814 5862
type(
  bool
)
"src/write.ml" 203 5814 5828 "src/write.ml" 203 5814 5862
type(
  bool
)
"src/write.ml" 203 5814 5863 "src/write.ml" 203 5814 5865
type(
  bool -> bool -> bool
)
ident(
  ext_ref Pervasives.( || )
)
"src/write.ml" 203 5814 5866 "src/write.ml" 203 5814 5867
type(
  nativeint
)
ident(
  int_ref n "src/write.ml" 199 5631 5664 "src/write.ml" 199 5631 5665
)
"src/write.ml" 203 5814 5868 "src/write.ml" 203 5814 5869
type(
  nativeint -> nativeint -> bool
)
ident(
  ext_ref Pervasives.( < )
)
"src/write.ml" 203 5814 5870 "src/write.ml" 203 5814 5878
type(
  nativeint
)
"src/write.ml" 203 5814 5866 "src/write.ml" 203 5814 5878
type(
  bool
)
"src/write.ml" 203 5814 5828 "src/write.ml" 203 5814 5878
type(
  bool
)
"src/write.ml" 204 5890 5894 "src/write.ml" 204 5890 5904
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 204 5890 5905 "src/write.ml" 204 5890 5908
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 199 5631 5660 "src/write.ml" 199 5631 5663
)
"src/write.ml" 204 5890 5894 "src/write.ml" 204 5890 5908
call(
  stack
)
type(
  unit
)
"src/write.ml" 205 5910 5914 "src/write.ml" 205 5910 5933
type(
  Common.buf -> Common.pos -> int32 -> int
)
ident(
  int_ref all_bin_write_int32 "src/write.ml" 93 2815 2819 "src/write.ml" 93 2815 2838
)
"src/write.ml" 205 5910 5934 "src/write.ml" 205 5910 5937
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 199 5631 5655 "src/write.ml" 199 5631 5658
)
"src/write.ml" 205 5910 5938 "src/write.ml" 205 5910 5941
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 199 5631 5660 "src/write.ml" 199 5631 5663
)
"src/write.ml" 205 5910 5943 "src/write.ml" 205 5910 5961
type(
  nativeint -> int32
)
ident(
  ext_ref Nativeint.to_int32
)
"src/write.ml" 205 5910 5962 "src/write.ml" 205 5910 5963
type(
  nativeint
)
ident(
  int_ref n "src/write.ml" 199 5631 5664 "src/write.ml" 199 5631 5665
)
"src/write.ml" 205 5910 5942 "src/write.ml" 205 5910 5964
type(
  int32
)
"src/write.ml" 205 5910 5914 "src/write.ml" 205 5910 5964
call(
  tail
)
type(
  int
)
"src/write.ml" 203 5814 5884 "src/write.ml" 206 5965 5970
type(
  int
)
"src/write.ml" 207 5976 5980 "src/write.ml" 207 5976 5993
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  int_ref bin_write_int "src/write.ml" 113 3229 3233 "src/write.ml" 113 3229 3246
)
"src/write.ml" 207 5976 5994 "src/write.ml" 207 5976 5997
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 199 5631 5655 "src/write.ml" 199 5631 5658
)
"src/write.ml" 207 5976 5999 "src/write.ml" 207 5976 6002
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 199 5631 5660 "src/write.ml" 199 5631 5663
)
"src/write.ml" 207 5976 6004 "src/write.ml" 207 5976 6020
type(
  nativeint -> int
)
ident(
  ext_ref Nativeint.to_int
)
"src/write.ml" 207 5976 6021 "src/write.ml" 207 5976 6022
type(
  nativeint
)
ident(
  int_ref n "src/write.ml" 199 5631 5664 "src/write.ml" 199 5631 5665
)
"src/write.ml" 207 5976 6003 "src/write.ml" 207 5976 6023
type(
  int
)
"src/write.ml" 207 5976 5980 "src/write.ml" 207 5976 6023
call(
  tail
)
type(
  int
)
"src/write.ml" 203 5814 5825 "src/write.ml" 207 5976 6023
type(
  int
)
"src/write.ml" 200 5668 5670 "src/write.ml" 207 5976 6023
type(
  int
)
"src/write.ml" 209 6025 6029 "src/write.ml" 209 6025 6042
type(
  ('a -> pos:'b -> 'c -> 'd) -> 'a -> pos:'b -> 'c ref -> 'd
)
ident(
  def bin_write_ref "src/write.ml" 211 6095 6095 "src/write.ml" 1 0 -1
)
"src/write.ml" 209 6025 6043 "src/write.ml" 209 6025 6055
type(
  'a -> pos:'b -> 'c -> 'd
)
ident(
  def bin_write_el "src/write.ml" 209 6025 6056 "src/write.ml" 209 6025 6093
)
"src/write.ml" 209 6025 6056 "src/write.ml" 209 6025 6059
type(
  'a
)
ident(
  def buf "src/write.ml" 209 6025 6060 "src/write.ml" 209 6025 6093
)
"src/write.ml" 209 6025 6061 "src/write.ml" 209 6025 6064
type(
  'b
)
ident(
  def pos "src/write.ml" 209 6025 6065 "src/write.ml" 209 6025 6093
)
"src/write.ml" 209 6025 6065 "src/write.ml" 209 6025 6066
type(
  'c ref
)
ident(
  def r "src/write.ml" 209 6025 6069 "src/write.ml" 209 6025 6093
)
"src/write.ml" 209 6025 6069 "src/write.ml" 209 6025 6081
type(
  'a -> pos:'b -> 'c -> 'd
)
ident(
  int_ref bin_write_el "src/write.ml" 209 6025 6043 "src/write.ml" 209 6025 6055
)
"src/write.ml" 209 6025 6082 "src/write.ml" 209 6025 6085
type(
  'a
)
ident(
  int_ref buf "src/write.ml" 209 6025 6056 "src/write.ml" 209 6025 6059
)
"src/write.ml" 209 6025 6087 "src/write.ml" 209 6025 6090
type(
  'b
)
ident(
  int_ref pos "src/write.ml" 209 6025 6061 "src/write.ml" 209 6025 6064
)
"src/write.ml" 209 6025 6091 "src/write.ml" 209 6025 6092
type(
  'c ref -> 'c
)
ident(
  ext_ref Pervasives.( ! )
)
"src/write.ml" 209 6025 6092 "src/write.ml" 209 6025 6093
type(
  'c ref
)
ident(
  int_ref r "src/write.ml" 209 6025 6065 "src/write.ml" 209 6025 6066
)
"src/write.ml" 209 6025 6091 "src/write.ml" 209 6025 6093
type(
  'c
)
"src/write.ml" 209 6025 6069 "src/write.ml" 209 6025 6093
call(
  tail
)
type(
  'd
)
"src/write.ml" 211 6095 6099 "src/write.ml" 211 6095 6113
type(
  ('a -> pos:'b -> 'c -> 'd) -> 'a -> pos:'b -> 'c Lazy.t -> 'd
)
ident(
  def bin_write_lazy "src/write.ml" 215 6195 6195 "src/write.ml" 1 0 -1
)
"src/write.ml" 211 6095 6114 "src/write.ml" 211 6095 6126
type(
  'a -> pos:'b -> 'c -> 'd
)
ident(
  def bin_write_el "src/write.ml" 211 6095 6127 "src/write.ml" 213 6168 6193
)
"src/write.ml" 211 6095 6127 "src/write.ml" 211 6095 6130
type(
  'a
)
ident(
  def buf "src/write.ml" 211 6095 6131 "src/write.ml" 213 6168 6193
)
"src/write.ml" 211 6095 6132 "src/write.ml" 211 6095 6135
type(
  'b
)
ident(
  def pos "src/write.ml" 211 6095 6136 "src/write.ml" 213 6168 6193
)
"src/write.ml" 211 6095 6136 "src/write.ml" 211 6095 6138
type(
  'c Lazy.t
)
ident(
  def lv "src/write.ml" 212 6141 6143 "src/write.ml" 213 6168 6193
)
"src/write.ml" 212 6141 6147 "src/write.ml" 212 6141 6148
type(
  'c
)
ident(
  def v "src/write.ml" 213 6168 6170 "src/write.ml" 213 6168 6193
)
"src/write.ml" 212 6141 6151 "src/write.ml" 212 6141 6161
type(
  'c Lazy.t -> 'c
)
ident(
  ext_ref Lazy.force
)
"src/write.ml" 212 6141 6162 "src/write.ml" 212 6141 6164
type(
  'c Lazy.t
)
ident(
  int_ref lv "src/write.ml" 211 6095 6136 "src/write.ml" 211 6095 6138
)
"src/write.ml" 212 6141 6151 "src/write.ml" 212 6141 6164
call(
  stack
)
type(
  'c
)
"src/write.ml" 213 6168 6170 "src/write.ml" 213 6168 6182
type(
  'a -> pos:'b -> 'c -> 'd
)
ident(
  int_ref bin_write_el "src/write.ml" 211 6095 6114 "src/write.ml" 211 6095 6126
)
"src/write.ml" 213 6168 6183 "src/write.ml" 213 6168 6186
type(
  'a
)
ident(
  int_ref buf "src/write.ml" 211 6095 6127 "src/write.ml" 211 6095 6130
)
"src/write.ml" 213 6168 6188 "src/write.ml" 213 6168 6191
type(
  'b
)
ident(
  int_ref pos "src/write.ml" 211 6095 6132 "src/write.ml" 211 6095 6135
)
"src/write.ml" 213 6168 6192 "src/write.ml" 213 6168 6193
type(
  'c
)
ident(
  int_ref v "src/write.ml" 212 6141 6147 "src/write.ml" 212 6141 6148
)
"src/write.ml" 213 6168 6170 "src/write.ml" 213 6168 6193
call(
  tail
)
type(
  'd
)
"src/write.ml" 212 6141 6143 "src/write.ml" 213 6168 6193
type(
  'd
)
"src/write.ml" 215 6195 6199 "src/write.ml" 215 6195 6215
type(
  (Common.buf -> pos:int -> 'a -> int) ->
  Common.buf -> pos:Common.pos -> 'a option -> int
)
ident(
  def bin_write_option "src/write.ml" 221 6390 6390 "src/write.ml" 1 0 -1
)
"src/write.ml" 215 6195 6216 "src/write.ml" 215 6195 6228
type(
  Common.buf -> pos:int -> 'a -> int
)
ident(
  def bin_write_el "src/write.ml" 215 6195 6229 "src/write.ml" 219 6354 6388
)
"src/write.ml" 215 6195 6229 "src/write.ml" 215 6195 6232
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 215 6195 6233 "src/write.ml" 219 6354 6388
)
"src/write.ml" 215 6195 6234 "src/write.ml" 215 6195 6237
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 215 6195 6240 "src/write.ml" 219 6354 6388
)
"src/write.ml" 216 6249 6253 "src/write.ml" 216 6249 6257
type(
  'a option
)
"src/write.ml" 216 6249 6261 "src/write.ml" 216 6249 6275
type(
  Common.buf -> pos:Common.pos -> bool -> int
)
ident(
  int_ref bin_write_bool "src/write.ml" 68 2275 2279 "src/write.ml" 68 2275 2293
)
"src/write.ml" 216 6249 6276 "src/write.ml" 216 6249 6279
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 215 6195 6229 "src/write.ml" 215 6195 6232
)
"src/write.ml" 216 6249 6281 "src/write.ml" 216 6249 6284
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 215 6195 6234 "src/write.ml" 215 6195 6237
)
"src/write.ml" 216 6249 6285 "src/write.ml" 216 6249 6290
type(
  bool
)
"src/write.ml" 216 6249 6261 "src/write.ml" 216 6249 6290
call(
  tail
)
type(
  int
)
"src/write.ml" 217 6291 6300 "src/write.ml" 217 6291 6301
type(
  'a
)
ident(
  def v "src/write.ml" 218 6305 6311 "src/write.ml" 219 6354 6388
)
"src/write.ml" 217 6291 6295 "src/write.ml" 217 6291 6301
type(
  'a option
)
"src/write.ml" 218 6305 6315 "src/write.ml" 218 6305 6319
type(
  int
)
ident(
  def next "src/write.ml" 219 6354 6360 "src/write.ml" 219 6354 6388
)
"src/write.ml" 218 6305 6322 "src/write.ml" 218 6305 6336
type(
  Common.buf -> pos:Common.pos -> bool -> int
)
ident(
  int_ref bin_write_bool "src/write.ml" 68 2275 2279 "src/write.ml" 68 2275 2293
)
"src/write.ml" 218 6305 6337 "src/write.ml" 218 6305 6340
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 215 6195 6229 "src/write.ml" 215 6195 6232
)
"src/write.ml" 218 6305 6342 "src/write.ml" 218 6305 6345
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 215 6195 6234 "src/write.ml" 215 6195 6237
)
"src/write.ml" 218 6305 6346 "src/write.ml" 218 6305 6350
type(
  bool
)
"src/write.ml" 218 6305 6322 "src/write.ml" 218 6305 6350
call(
  stack
)
type(
  int
)
"src/write.ml" 219 6354 6360 "src/write.ml" 219 6354 6372
type(
  Common.buf -> pos:int -> 'a -> int
)
ident(
  int_ref bin_write_el "src/write.ml" 215 6195 6216 "src/write.ml" 215 6195 6228
)
"src/write.ml" 219 6354 6373 "src/write.ml" 219 6354 6376
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 215 6195 6229 "src/write.ml" 215 6195 6232
)
"src/write.ml" 219 6354 6382 "src/write.ml" 219 6354 6386
type(
  int
)
ident(
  int_ref next "src/write.ml" 218 6305 6315 "src/write.ml" 218 6305 6319
)
"src/write.ml" 219 6354 6387 "src/write.ml" 219 6354 6388
type(
  'a
)
ident(
  int_ref v "src/write.ml" 217 6291 6300 "src/write.ml" 217 6291 6301
)
"src/write.ml" 219 6354 6360 "src/write.ml" 219 6354 6388
call(
  tail
)
type(
  int
)
"src/write.ml" 218 6305 6311 "src/write.ml" 219 6354 6388
type(
  int
)
"src/write.ml" 215 6195 6240 "src/write.ml" 219 6354 6388
type(
  'a option -> int
)
"src/write.ml" 221 6390 6394 "src/write.ml" 221 6390 6408
type(
  ('a -> pos:'b -> 'c -> 'd) ->
  ('a -> pos:'d -> 'e -> 'f) -> 'a -> pos:'b -> 'c * 'e -> 'f
)
ident(
  def bin_write_pair "src/write.ml" 225 6521 6521 "src/write.ml" 1 0 -1
)
"src/write.ml" 221 6390 6409 "src/write.ml" 221 6390 6420
type(
  'a -> pos:'b -> 'c -> 'd
)
ident(
  def bin_write_a "src/write.ml" 221 6390 6421 "src/write.ml" 223 6490 6519
)
"src/write.ml" 221 6390 6421 "src/write.ml" 221 6390 6432
type(
  'a -> pos:'d -> 'e -> 'f
)
ident(
  def bin_write_b "src/write.ml" 221 6390 6433 "src/write.ml" 223 6490 6519
)
"src/write.ml" 221 6390 6433 "src/write.ml" 221 6390 6436
type(
  'a
)
ident(
  def buf "src/write.ml" 221 6390 6437 "src/write.ml" 223 6490 6519
)
"src/write.ml" 221 6390 6438 "src/write.ml" 221 6390 6441
type(
  'b
)
ident(
  def pos "src/write.ml" 221 6390 6442 "src/write.ml" 223 6490 6519
)
"src/write.ml" 221 6390 6443 "src/write.ml" 221 6390 6444
type(
  'c
)
ident(
  def a "src/write.ml" 222 6451 6453 "src/write.ml" 223 6490 6519
)
"src/write.ml" 221 6390 6446 "src/write.ml" 221 6390 6447
type(
  'e
)
ident(
  def b "src/write.ml" 222 6451 6453 "src/write.ml" 223 6490 6519
)
"src/write.ml" 221 6390 6442 "src/write.ml" 221 6390 6448
type(
  'c * 'e
)
"src/write.ml" 222 6451 6457 "src/write.ml" 222 6451 6461
type(
  'd
)
ident(
  def next "src/write.ml" 223 6490 6492 "src/write.ml" 223 6490 6519
)
"src/write.ml" 222 6451 6464 "src/write.ml" 222 6451 6475
type(
  'a -> pos:'b -> 'c -> 'd
)
ident(
  int_ref bin_write_a "src/write.ml" 221 6390 6409 "src/write.ml" 221 6390 6420
)
"src/write.ml" 222 6451 6476 "src/write.ml" 222 6451 6479
type(
  'a
)
ident(
  int_ref buf "src/write.ml" 221 6390 6433 "src/write.ml" 221 6390 6436
)
"src/write.ml" 222 6451 6481 "src/write.ml" 222 6451 6484
type(
  'b
)
ident(
  int_ref pos "src/write.ml" 221 6390 6438 "src/write.ml" 221 6390 6441
)
"src/write.ml" 222 6451 6485 "src/write.ml" 222 6451 6486
type(
  'c
)
ident(
  int_ref a "src/write.ml" 221 6390 6443 "src/write.ml" 221 6390 6444
)
"src/write.ml" 222 6451 6464 "src/write.ml" 222 6451 6486
call(
  stack
)
type(
  'd
)
"src/write.ml" 223 6490 6492 "src/write.ml" 223 6490 6503
type(
  'a -> pos:'d -> 'e -> 'f
)
ident(
  int_ref bin_write_b "src/write.ml" 221 6390 6421 "src/write.ml" 221 6390 6432
)
"src/write.ml" 223 6490 6504 "src/write.ml" 223 6490 6507
type(
  'a
)
ident(
  int_ref buf "src/write.ml" 221 6390 6433 "src/write.ml" 221 6390 6436
)
"src/write.ml" 223 6490 6513 "src/write.ml" 223 6490 6517
type(
  'd
)
ident(
  int_ref next "src/write.ml" 222 6451 6457 "src/write.ml" 222 6451 6461
)
"src/write.ml" 223 6490 6518 "src/write.ml" 223 6490 6519
type(
  'e
)
ident(
  int_ref b "src/write.ml" 221 6390 6446 "src/write.ml" 221 6390 6447
)
"src/write.ml" 223 6490 6492 "src/write.ml" 223 6490 6519
call(
  tail
)
type(
  'f
)
"src/write.ml" 222 6451 6453 "src/write.ml" 223 6490 6519
type(
  'f
)
"src/write.ml" 225 6521 6525 "src/write.ml" 225 6521 6541
type(
  ('a -> pos:'b -> 'c -> 'd) ->
  ('a -> pos:'d -> 'e -> 'f) ->
  ('a -> pos:'f -> 'g -> 'h) -> 'a -> pos:'b -> 'c * 'e * 'g -> 'h
)
ident(
  def bin_write_triple "src/write.ml" 230 6717 6717 "src/write.ml" 1 0 -1
)
"src/write.ml" 225 6521 6542 "src/write.ml" 225 6521 6553
type(
  'a -> pos:'b -> 'c -> 'd
)
ident(
  def bin_write_a "src/write.ml" 225 6521 6554 "src/write.ml" 228 6685 6715
)
"src/write.ml" 225 6521 6554 "src/write.ml" 225 6521 6565
type(
  'a -> pos:'d -> 'e -> 'f
)
ident(
  def bin_write_b "src/write.ml" 225 6521 6566 "src/write.ml" 228 6685 6715
)
"src/write.ml" 225 6521 6566 "src/write.ml" 225 6521 6577
type(
  'a -> pos:'f -> 'g -> 'h
)
ident(
  def bin_write_c "src/write.ml" 225 6521 6578 "src/write.ml" 228 6685 6715
)
"src/write.ml" 225 6521 6578 "src/write.ml" 225 6521 6581
type(
  'a
)
ident(
  def buf "src/write.ml" 225 6521 6582 "src/write.ml" 228 6685 6715
)
"src/write.ml" 225 6521 6583 "src/write.ml" 225 6521 6586
type(
  'b
)
ident(
  def pos "src/write.ml" 225 6521 6587 "src/write.ml" 228 6685 6715
)
"src/write.ml" 225 6521 6588 "src/write.ml" 225 6521 6589
type(
  'c
)
ident(
  def a "src/write.ml" 226 6599 6601 "src/write.ml" 228 6685 6715
)
"src/write.ml" 225 6521 6591 "src/write.ml" 225 6521 6592
type(
  'e
)
ident(
  def b "src/write.ml" 226 6599 6601 "src/write.ml" 228 6685 6715
)
"src/write.ml" 225 6521 6594 "src/write.ml" 225 6521 6595
type(
  'g
)
ident(
  def c "src/write.ml" 226 6599 6601 "src/write.ml" 228 6685 6715
)
"src/write.ml" 225 6521 6587 "src/write.ml" 225 6521 6596
type(
  'c * 'e * 'g
)
"src/write.ml" 226 6599 6605 "src/write.ml" 226 6599 6610
type(
  'd
)
ident(
  def next1 "src/write.ml" 227 6639 6641 "src/write.ml" 228 6685 6715
)
"src/write.ml" 226 6599 6613 "src/write.ml" 226 6599 6624
type(
  'a -> pos:'b -> 'c -> 'd
)
ident(
  int_ref bin_write_a "src/write.ml" 225 6521 6542 "src/write.ml" 225 6521 6553
)
"src/write.ml" 226 6599 6625 "src/write.ml" 226 6599 6628
type(
  'a
)
ident(
  int_ref buf "src/write.ml" 225 6521 6578 "src/write.ml" 225 6521 6581
)
"src/write.ml" 226 6599 6630 "src/write.ml" 226 6599 6633
type(
  'b
)
ident(
  int_ref pos "src/write.ml" 225 6521 6583 "src/write.ml" 225 6521 6586
)
"src/write.ml" 226 6599 6634 "src/write.ml" 226 6599 6635
type(
  'c
)
ident(
  int_ref a "src/write.ml" 225 6521 6588 "src/write.ml" 225 6521 6589
)
"src/write.ml" 226 6599 6613 "src/write.ml" 226 6599 6635
call(
  stack
)
type(
  'd
)
"src/write.ml" 227 6639 6645 "src/write.ml" 227 6639 6650
type(
  'f
)
ident(
  def next2 "src/write.ml" 228 6685 6687 "src/write.ml" 228 6685 6715
)
"src/write.ml" 227 6639 6653 "src/write.ml" 227 6639 6664
type(
  'a -> pos:'d -> 'e -> 'f
)
ident(
  int_ref bin_write_b "src/write.ml" 225 6521 6554 "src/write.ml" 225 6521 6565
)
"src/write.ml" 227 6639 6665 "src/write.ml" 227 6639 6668
type(
  'a
)
ident(
  int_ref buf "src/write.ml" 225 6521 6578 "src/write.ml" 225 6521 6581
)
"src/write.ml" 227 6639 6674 "src/write.ml" 227 6639 6679
type(
  'd
)
ident(
  int_ref next1 "src/write.ml" 226 6599 6605 "src/write.ml" 226 6599 6610
)
"src/write.ml" 227 6639 6680 "src/write.ml" 227 6639 6681
type(
  'e
)
ident(
  int_ref b "src/write.ml" 225 6521 6591 "src/write.ml" 225 6521 6592
)
"src/write.ml" 227 6639 6653 "src/write.ml" 227 6639 6681
call(
  stack
)
type(
  'f
)
"src/write.ml" 228 6685 6687 "src/write.ml" 228 6685 6698
type(
  'a -> pos:'f -> 'g -> 'h
)
ident(
  int_ref bin_write_c "src/write.ml" 225 6521 6566 "src/write.ml" 225 6521 6577
)
"src/write.ml" 228 6685 6699 "src/write.ml" 228 6685 6702
type(
  'a
)
ident(
  int_ref buf "src/write.ml" 225 6521 6578 "src/write.ml" 225 6521 6581
)
"src/write.ml" 228 6685 6708 "src/write.ml" 228 6685 6713
type(
  'f
)
ident(
  int_ref next2 "src/write.ml" 227 6639 6645 "src/write.ml" 227 6639 6650
)
"src/write.ml" 228 6685 6714 "src/write.ml" 228 6685 6715
type(
  'g
)
ident(
  int_ref c "src/write.ml" 225 6521 6594 "src/write.ml" 225 6521 6595
)
"src/write.ml" 228 6685 6687 "src/write.ml" 228 6685 6715
call(
  tail
)
type(
  'h
)
"src/write.ml" 227 6639 6641 "src/write.ml" 228 6685 6715
type(
  'h
)
"src/write.ml" 226 6599 6601 "src/write.ml" 228 6685 6715
type(
  'h
)
"src/write.ml" 230 6717 6721 "src/write.ml" 230 6717 6735
type(
  (Common.buf -> pos:int -> 'a -> int) ->
  Common.buf -> pos:Common.pos -> 'a list -> int
)
ident(
  def bin_write_list "src/write.ml" 241 7046 7046 "src/write.ml" 1 0 -1
)
"src/write.ml" 230 6717 6736 "src/write.ml" 230 6717 6748
type(
  Common.buf -> pos:int -> 'a -> int
)
ident(
  def bin_write_el "src/write.ml" 230 6717 6749 "src/write.ml" 239 7026 7044
)
"src/write.ml" 230 6717 6749 "src/write.ml" 230 6717 6752
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 230 6717 6753 "src/write.ml" 239 7026 7044
)
"src/write.ml" 230 6717 6754 "src/write.ml" 230 6717 6757
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 230 6717 6758 "src/write.ml" 239 7026 7044
)
"src/write.ml" 230 6717 6758 "src/write.ml" 230 6717 6761
type(
  'a list
)
ident(
  def lst "src/write.ml" 231 6764 6766 "src/write.ml" 239 7026 7044
)
"src/write.ml" 231 6764 6774 "src/write.ml" 231 6764 6778
type(
  int -> 'a list -> int
)
ident(
  def loop "src/write.ml" 231 6764 6766 "src/write.ml" 239 7026 7044
)
"src/write.ml" 231 6764 6779 "src/write.ml" 231 6764 6786
type(
  int
)
ident(
  def els_pos "src/write.ml" 231 6764 6789 "src/write.ml" 235 6895 6921
)
"src/write.ml" 232 6798 6804 "src/write.ml" 232 6798 6806
type(
  'a list
)
"src/write.ml" 232 6798 6810 "src/write.ml" 232 6798 6817
type(
  int
)
ident(
  int_ref els_pos "src/write.ml" 231 6764 6779 "src/write.ml" 231 6764 6786
)
"src/write.ml" 233 6818 6824 "src/write.ml" 233 6818 6825
type(
  'a
)
ident(
  def h "src/write.ml" 234 6834 6842 "src/write.ml" 235 6895 6921
)
"src/write.ml" 233 6818 6829 "src/write.ml" 233 6818 6830
type(
  'a list
)
ident(
  def t "src/write.ml" 234 6834 6842 "src/write.ml" 235 6895 6921
)
"src/write.ml" 233 6818 6824 "src/write.ml" 233 6818 6830
type(
  'a list
)
"src/write.ml" 234 6834 6846 "src/write.ml" 234 6834 6857
type(
  int
)
ident(
  def new_els_pos "src/write.ml" 235 6895 6903 "src/write.ml" 235 6895 6921
)
"src/write.ml" 234 6834 6860 "src/write.ml" 234 6834 6872
type(
  Common.buf -> pos:int -> 'a -> int
)
ident(
  int_ref bin_write_el "src/write.ml" 230 6717 6736 "src/write.ml" 230 6717 6748
)
"src/write.ml" 234 6834 6873 "src/write.ml" 234 6834 6876
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 230 6717 6749 "src/write.ml" 230 6717 6752
)
"src/write.ml" 234 6834 6882 "src/write.ml" 234 6834 6889
type(
  int
)
ident(
  int_ref els_pos "src/write.ml" 231 6764 6779 "src/write.ml" 231 6764 6786
)
"src/write.ml" 234 6834 6890 "src/write.ml" 234 6834 6891
type(
  'a
)
ident(
  int_ref h "src/write.ml" 233 6818 6824 "src/write.ml" 233 6818 6825
)
"src/write.ml" 234 6834 6860 "src/write.ml" 234 6834 6891
call(
  stack
)
type(
  int
)
"src/write.ml" 235 6895 6903 "src/write.ml" 235 6895 6907
type(
  int -> 'a list -> int
)
ident(
  int_ref loop "src/write.ml" 231 6764 6774 "src/write.ml" 231 6764 6778
)
"src/write.ml" 235 6895 6908 "src/write.ml" 235 6895 6919
type(
  int
)
ident(
  int_ref new_els_pos "src/write.ml" 234 6834 6846 "src/write.ml" 234 6834 6857
)
"src/write.ml" 235 6895 6920 "src/write.ml" 235 6895 6921
type(
  'a list
)
ident(
  int_ref t "src/write.ml" 233 6818 6829 "src/write.ml" 233 6818 6830
)
"src/write.ml" 235 6895 6903 "src/write.ml" 235 6895 6921
call(
  tail
)
type(
  int
)
"src/write.ml" 234 6834 6842 "src/write.ml" 235 6895 6921
type(
  int
)
"src/write.ml" 231 6764 6789 "src/write.ml" 235 6895 6921
type(
  'a list -> int
)
"src/write.ml" 237 6927 6933 "src/write.ml" 237 6927 6936
type(
  Nat0.t
)
ident(
  def len "src/write.ml" 238 6979 6981 "src/write.ml" 239 7026 7044
)
"src/write.ml" 237 6927 6939 "src/write.ml" 237 6927 6957
type(
  int -> Nat0.t
)
ident(
  ext_ref Nat0.unsafe_of_int
)
"src/write.ml" 237 6927 6959 "src/write.ml" 237 6927 6970
type(
  'a list -> int
)
ident(
  ext_ref List.length
)
"src/write.ml" 237 6927 6971 "src/write.ml" 237 6927 6974
type(
  'a list
)
ident(
  int_ref lst "src/write.ml" 230 6717 6758 "src/write.ml" 230 6717 6761
)
"src/write.ml" 237 6927 6958 "src/write.ml" 237 6927 6975
call(
  stack
)
type(
  int
)
"src/write.ml" 237 6927 6939 "src/write.ml" 237 6927 6975
type(
  Nat0.t
)
"src/write.ml" 238 6979 6985 "src/write.ml" 238 6979 6992
type(
  int
)
ident(
  def els_pos "src/write.ml" 239 7026 7028 "src/write.ml" 239 7026 7044
)
"src/write.ml" 238 6979 6995 "src/write.ml" 238 6979 7009
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  int_ref bin_write_nat0 "src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
)
"src/write.ml" 238 6979 7010 "src/write.ml" 238 6979 7013
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 230 6717 6749 "src/write.ml" 230 6717 6752
)
"src/write.ml" 238 6979 7015 "src/write.ml" 238 6979 7018
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 230 6717 6754 "src/write.ml" 230 6717 6757
)
"src/write.ml" 238 6979 7019 "src/write.ml" 238 6979 7022
type(
  Nat0.t
)
ident(
  int_ref len "src/write.ml" 237 6927 6933 "src/write.ml" 237 6927 6936
)
"src/write.ml" 238 6979 6995 "src/write.ml" 238 6979 7022
call(
  stack
)
type(
  int
)
"src/write.ml" 239 7026 7028 "src/write.ml" 239 7026 7032
type(
  int -> 'a list -> int
)
ident(
  int_ref loop "src/write.ml" 231 6764 6774 "src/write.ml" 231 6764 6778
)
"src/write.ml" 239 7026 7033 "src/write.ml" 239 7026 7040
type(
  int
)
ident(
  int_ref els_pos "src/write.ml" 238 6979 6985 "src/write.ml" 238 6979 6992
)
"src/write.ml" 239 7026 7041 "src/write.ml" 239 7026 7044
type(
  'a list
)
ident(
  int_ref lst "src/write.ml" 230 6717 6758 "src/write.ml" 230 6717 6761
)
"src/write.ml" 239 7026 7028 "src/write.ml" 239 7026 7044
call(
  tail
)
type(
  int
)
"src/write.ml" 238 6979 6981 "src/write.ml" 239 7026 7044
type(
  int
)
"src/write.ml" 237 6927 6929 "src/write.ml" 239 7026 7044
type(
  int
)
"src/write.ml" 231 6764 6766 "src/write.ml" 239 7026 7044
type(
  int
)
"src/write.ml" 241 7046 7050 "src/write.ml" 241 7046 7071
type(
  Common.buf -> pos:Common.pos -> float array -> int
)
ident(
  def bin_write_float_array "src/write.ml" 251 7346 7346 "src/write.ml" 1 0 -1
)
"src/write.ml" 241 7046 7072 "src/write.ml" 241 7046 7075
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 241 7046 7076 "src/write.ml" 249 7338 7344
)
"src/write.ml" 241 7046 7077 "src/write.ml" 241 7046 7080
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 241 7046 7081 "src/write.ml" 249 7338 7344
)
"src/write.ml" 241 7046 7081 "src/write.ml" 241 7046 7082
type(
  float array
)
ident(
  def a "src/write.ml" 242 7085 7087 "src/write.ml" 249 7338 7344
)
"src/write.ml" 242 7085 7091 "src/write.ml" 242 7085 7094
type(
  int
)
ident(
  def len "src/write.ml" 243 7115 7117 "src/write.ml" 249 7338 7344
)
"src/write.ml" 242 7085 7097 "src/write.ml" 242 7085 7109
type(
  float array -> int
)
ident(
  ext_ref Array.length
)
"src/write.ml" 242 7085 7110 "src/write.ml" 242 7085 7111
type(
  float array
)
ident(
  int_ref a "src/write.ml" 241 7046 7081 "src/write.ml" 241 7046 7082
)
"src/write.ml" 242 7085 7097 "src/write.ml" 242 7085 7111
type(
  int
)
"src/write.ml" 243 7115 7121 "src/write.ml" 243 7115 7125
type(
  Nat0.t
)
ident(
  def plen "src/write.ml" 244 7154 7156 "src/write.ml" 249 7338 7344
)
"src/write.ml" 243 7115 7128 "src/write.ml" 243 7115 7146
type(
  int -> Nat0.t
)
ident(
  ext_ref Nat0.unsafe_of_int
)
"src/write.ml" 243 7115 7147 "src/write.ml" 243 7115 7150
type(
  int
)
ident(
  int_ref len "src/write.ml" 242 7085 7091 "src/write.ml" 242 7085 7094
)
"src/write.ml" 243 7115 7128 "src/write.ml" 243 7115 7150
type(
  Nat0.t
)
"src/write.ml" 244 7154 7160 "src/write.ml" 244 7154 7163
type(
  int
)
ident(
  def pos "src/write.ml" 245 7198 7200 "src/write.ml" 249 7338 7344
)
"src/write.ml" 244 7154 7166 "src/write.ml" 244 7154 7180
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  int_ref bin_write_nat0 "src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
)
"src/write.ml" 244 7154 7181 "src/write.ml" 244 7154 7184
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 241 7046 7072 "src/write.ml" 241 7046 7075
)
"src/write.ml" 244 7154 7186 "src/write.ml" 244 7154 7189
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 241 7046 7077 "src/write.ml" 241 7046 7080
)
"src/write.ml" 244 7154 7190 "src/write.ml" 244 7154 7194
type(
  Nat0.t
)
ident(
  int_ref plen "src/write.ml" 243 7115 7121 "src/write.ml" 243 7115 7125
)
"src/write.ml" 244 7154 7166 "src/write.ml" 244 7154 7194
call(
  stack
)
type(
  int
)
"src/write.ml" 245 7198 7204 "src/write.ml" 245 7198 7208
type(
  int
)
ident(
  def size "src/write.ml" 246 7222 7224 "src/write.ml" 249 7338 7344
)
"src/write.ml" 245 7198 7211 "src/write.ml" 245 7198 7214
type(
  int
)
ident(
  int_ref len "src/write.ml" 242 7085 7091 "src/write.ml" 242 7085 7094
)
"src/write.ml" 245 7198 7215 "src/write.ml" 245 7198 7216
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( * )
)
"src/write.ml" 245 7198 7217 "src/write.ml" 245 7198 7218
type(
  int
)
"src/write.ml" 245 7198 7211 "src/write.ml" 245 7198 7218
type(
  int
)
"src/write.ml" 246 7222 7228 "src/write.ml" 246 7222 7232
type(
  int
)
ident(
  def next "src/write.ml" 247 7249 7251 "src/write.ml" 249 7338 7344
)
"src/write.ml" 246 7222 7235 "src/write.ml" 246 7222 7238
type(
  int
)
ident(
  int_ref pos "src/write.ml" 244 7154 7160 "src/write.ml" 244 7154 7163
)
"src/write.ml" 246 7222 7239 "src/write.ml" 246 7222 7240
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 246 7222 7241 "src/write.ml" 246 7222 7245
type(
  int
)
ident(
  int_ref size "src/write.ml" 245 7198 7204 "src/write.ml" 245 7198 7208
)
"src/write.ml" 246 7222 7235 "src/write.ml" 246 7222 7245
type(
  int
)
"src/write.ml" 247 7249 7251 "src/write.ml" 247 7249 7261
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 247 7249 7262 "src/write.ml" 247 7249 7265
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 241 7046 7072 "src/write.ml" 241 7046 7075
)
"src/write.ml" 247 7249 7266 "src/write.ml" 247 7249 7270
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 246 7222 7228 "src/write.ml" 246 7222 7232
)
"src/write.ml" 247 7249 7251 "src/write.ml" 247 7249 7270
call(
  stack
)
type(
  unit
)
"src/write.ml" 248 7272 7274 "src/write.ml" 248 7272 7301
type(
  src_pos:int -> float array -> dst_pos:int -> Common.buf -> len:int -> unit
)
ident(
  ext_ref Common.unsafe_blit_float_array_buf
)
"src/write.ml" 248 7272 7302 "src/write.ml" 248 7272 7303
type(
  float array
)
ident(
  int_ref a "src/write.ml" 241 7046 7081 "src/write.ml" 241 7046 7082
)
"src/write.ml" 248 7272 7304 "src/write.ml" 248 7272 7307
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 241 7046 7072 "src/write.ml" 241 7046 7075
)
"src/write.ml" 248 7272 7317 "src/write.ml" 248 7272 7318
type(
  int
)
"src/write.ml" 248 7272 7328 "src/write.ml" 248 7272 7331
type(
  int
)
ident(
  int_ref pos "src/write.ml" 244 7154 7160 "src/write.ml" 244 7154 7163
)
"src/write.ml" 248 7272 7333 "src/write.ml" 248 7272 7336
type(
  int
)
ident(
  int_ref len "src/write.ml" 242 7085 7091 "src/write.ml" 242 7085 7094
)
"src/write.ml" 248 7272 7274 "src/write.ml" 248 7272 7336
type(
  unit
)
"src/write.ml" 249 7338 7340 "src/write.ml" 249 7338 7344
type(
  int
)
ident(
  int_ref next "src/write.ml" 246 7222 7228 "src/write.ml" 246 7222 7232
)
"src/write.ml" 248 7272 7274 "src/write.ml" 249 7338 7344
type(
  int
)
"src/write.ml" 247 7249 7251 "src/write.ml" 249 7338 7344
type(
  int
)
"src/write.ml" 246 7222 7224 "src/write.ml" 249 7338 7344
type(
  int
)
"src/write.ml" 245 7198 7200 "src/write.ml" 249 7338 7344
type(
  int
)
"src/write.ml" 244 7154 7156 "src/write.ml" 249 7338 7344
type(
  int
)
"src/write.ml" 243 7115 7117 "src/write.ml" 249 7338 7344
type(
  int
)
"src/write.ml" 242 7085 7087 "src/write.ml" 249 7338 7344
type(
  int
)
"src/write.ml" 251 7346 7350 "src/write.ml" 251 7346 7370
type(
  ('a -> pos:'b -> 'c -> 'b) -> 'a -> els_pos:'b -> n:int -> 'c array -> 'b
)
ident(
  def bin_write_array_loop "src/write.ml" 258 7566 7566 "src/write.ml" 1 0 -1
)
"src/write.ml" 251 7346 7371 "src/write.ml" 251 7346 7383
type(
  'a -> pos:'b -> 'c -> 'b
)
ident(
  def bin_write_el "src/write.ml" 251 7346 7384 "src/write.ml" 256 7550 7564
)
"src/write.ml" 251 7346 7384 "src/write.ml" 251 7346 7387
type(
  'a
)
ident(
  def buf "src/write.ml" 251 7346 7388 "src/write.ml" 256 7550 7564
)
"src/write.ml" 251 7346 7389 "src/write.ml" 251 7346 7396
type(
  'b
)
ident(
  def els_pos "src/write.ml" 251 7346 7397 "src/write.ml" 256 7550 7564
)
"src/write.ml" 251 7346 7398 "src/write.ml" 251 7346 7399
type(
  int
)
ident(
  def n "src/write.ml" 251 7346 7400 "src/write.ml" 256 7550 7564
)
"src/write.ml" 251 7346 7400 "src/write.ml" 251 7346 7402
type(
  'c array
)
ident(
  def ar "src/write.ml" 252 7405 7407 "src/write.ml" 256 7550 7564
)
"src/write.ml" 252 7405 7411 "src/write.ml" 252 7405 7422
type(
  'b ref
)
ident(
  def els_pos_ref "src/write.ml" 253 7440 7442 "src/write.ml" 256 7550 7564
)
"src/write.ml" 252 7405 7425 "src/write.ml" 252 7405 7428
type(
  'b -> 'b ref
)
ident(
  ext_ref Pervasives.ref
)
"src/write.ml" 252 7405 7429 "src/write.ml" 252 7405 7436
type(
  'b
)
ident(
  int_ref els_pos "src/write.ml" 251 7346 7389 "src/write.ml" 251 7346 7396
)
"src/write.ml" 252 7405 7425 "src/write.ml" 252 7405 7436
type(
  'b ref
)
"src/write.ml" 253 7440 7450 "src/write.ml" 253 7440 7451
type(
  int
)
"src/write.ml" 253 7440 7455 "src/write.ml" 253 7440 7456
type(
  int
)
ident(
  int_ref n "src/write.ml" 251 7346 7398 "src/write.ml" 251 7346 7399
)
"src/write.ml" 253 7440 7457 "src/write.ml" 253 7440 7458
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( - )
)
"src/write.ml" 253 7440 7459 "src/write.ml" 253 7440 7460
type(
  int
)
"src/write.ml" 253 7440 7455 "src/write.ml" 253 7440 7460
type(
  int
)
"src/write.ml" 254 7464 7468 "src/write.ml" 254 7464 7479
type(
  'b ref
)
ident(
  int_ref els_pos_ref "src/write.ml" 252 7405 7411 "src/write.ml" 252 7405 7422
)
"src/write.ml" 254 7464 7480 "src/write.ml" 254 7464 7482
type(
  'b ref -> 'b -> unit
)
ident(
  ext_ref Pervasives.( := )
)
"src/write.ml" 254 7464 7483 "src/write.ml" 254 7464 7495
type(
  'a -> pos:'b -> 'c -> 'b
)
ident(
  int_ref bin_write_el "src/write.ml" 251 7346 7371 "src/write.ml" 251 7346 7383
)
"src/write.ml" 254 7464 7496 "src/write.ml" 254 7464 7499
type(
  'a
)
ident(
  int_ref buf "src/write.ml" 251 7346 7384 "src/write.ml" 251 7346 7387
)
"src/write.ml" 254 7464 7505 "src/write.ml" 254 7464 7506
type(
  'b ref -> 'b
)
ident(
  ext_ref Pervasives.( ! )
)
"src/write.ml" 254 7464 7506 "src/write.ml" 254 7464 7517
type(
  'b ref
)
ident(
  int_ref els_pos_ref "src/write.ml" 252 7405 7411 "src/write.ml" 252 7405 7422
)
"src/write.ml" 254 7464 7505 "src/write.ml" 254 7464 7517
type(
  'b
)
"src/write.ml" 254 7464 7519 "src/write.ml" 254 7464 7535
type(
  'c array -> int -> 'c
)
ident(
  ext_ref Array.unsafe_get
)
"src/write.ml" 254 7464 7536 "src/write.ml" 254 7464 7538
type(
  'c array
)
ident(
  int_ref ar "src/write.ml" 251 7346 7400 "src/write.ml" 251 7346 7402
)
"src/write.ml" 254 7464 7539 "src/write.ml" 254 7464 7540
type(
  int
)
ident(
  int_ref i "src/write.ml" 253 7440 7442 "src/write.ml" 255 7542 7548
)
"src/write.ml" 254 7464 7518 "src/write.ml" 254 7464 7541
type(
  'c
)
"src/write.ml" 254 7464 7483 "src/write.ml" 254 7464 7541
call(
  stack
)
type(
  'b
)
"src/write.ml" 254 7464 7468 "src/write.ml" 254 7464 7541
type(
  unit
)
"src/write.ml" 253 7440 7442 "src/write.ml" 255 7542 7548
type(
  unit
)
"src/write.ml" 256 7550 7552 "src/write.ml" 256 7550 7553
type(
  'b ref -> 'b
)
ident(
  ext_ref Pervasives.( ! )
)
"src/write.ml" 256 7550 7553 "src/write.ml" 256 7550 7564
type(
  'b ref
)
ident(
  int_ref els_pos_ref "src/write.ml" 252 7405 7411 "src/write.ml" 252 7405 7422
)
"src/write.ml" 256 7550 7552 "src/write.ml" 256 7550 7564
type(
  'b
)
"src/write.ml" 253 7440 7442 "src/write.ml" 256 7550 7564
type(
  'b
)
"src/write.ml" 252 7405 7407 "src/write.ml" 256 7550 7564
type(
  'b
)
"src/write.ml" 258 7566 7570 "src/write.ml" 258 7566 7585
type(
  'a writer -> Common.buf -> pos:Common.pos -> 'a array -> Common.pos
)
ident(
  def bin_write_array "src/write.ml" 267 7961 7961 "src/write.ml" 1 0 -1
)
"src/write.ml" 258 7566 7595 "src/write.ml" 258 7566 7607
type(
  a writer
)
ident(
  def bin_write_el "src/write.ml" 258 7566 7608 "src/write.ml" 265 7903 7959
)
"src/write.ml" 258 7566 7608 "src/write.ml" 258 7566 7611
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 258 7566 7612 "src/write.ml" 265 7903 7959
)
"src/write.ml" 258 7566 7613 "src/write.ml" 258 7566 7616
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 258 7566 7617 "src/write.ml" 265 7903 7959
)
"src/write.ml" 258 7566 7617 "src/write.ml" 258 7566 7619
type(
  a array
)
ident(
  def ar "src/write.ml" 259 7622 7624 "src/write.ml" 265 7903 7959
)
"src/write.ml" 259 7622 7628 "src/write.ml" 259 7622 7637
type(
  a writer -> float writer
)
ident(
  ext_ref Obj.magic
)
"src/write.ml" 259 7622 7639 "src/write.ml" 259 7622 7651
type(
  a writer
)
type(
  a writer
)
ident(
  int_ref bin_write_el "src/write.ml" 258 7566 7595 "src/write.ml" 258 7566 7607
)
"src/write.ml" 259 7622 7628 "src/write.ml" 259 7622 7663
type(
  float writer
)
type(
  float writer
)
"src/write.ml" 259 7622 7680 "src/write.ml" 259 7622 7682
type(
  float writer -> float writer -> bool
)
ident(
  ext_ref Pervasives.( == )
)
"src/write.ml" 259 7622 7683 "src/write.ml" 259 7622 7698
type(
  float writer
)
ident(
  int_ref bin_write_float "src/write.ml" 164 4745 4749 "src/write.ml" 164 4745 4764
)
"src/write.ml" 259 7622 7627 "src/write.ml" 259 7622 7698
type(
  bool
)
"src/write.ml" 260 7704 7708 "src/write.ml" 260 7704 7729
type(
  Common.buf -> pos:Common.pos -> float array -> Common.pos
)
ident(
  int_ref bin_write_float_array "src/write.ml" 241 7046 7050 "src/write.ml" 241 7046 7071
)
"src/write.ml" 260 7704 7730 "src/write.ml" 260 7704 7733
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 258 7566 7608 "src/write.ml" 258 7566 7611
)
"src/write.ml" 260 7704 7735 "src/write.ml" 260 7704 7738
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 258 7566 7613 "src/write.ml" 258 7566 7616
)
"src/write.ml" 260 7704 7740 "src/write.ml" 260 7704 7749
type(
  a array -> float array
)
ident(
  ext_ref Obj.magic
)
"src/write.ml" 260 7704 7751 "src/write.ml" 260 7704 7753
type(
  a array
)
type(
  a array
)
ident(
  int_ref ar "src/write.ml" 258 7566 7617 "src/write.ml" 258 7566 7619
)
"src/write.ml" 260 7704 7740 "src/write.ml" 260 7704 7764
type(
  float array
)
type(
  float array
)
"src/write.ml" 260 7704 7708 "src/write.ml" 260 7704 7779
call(
  tail
)
type(
  Common.pos
)
"src/write.ml" 262 7787 7795 "src/write.ml" 262 7787 7796
type(
  int
)
ident(
  def n "src/write.ml" 263 7818 7822 "src/write.ml" 265 7903 7959
)
"src/write.ml" 262 7787 7799 "src/write.ml" 262 7787 7811
type(
  a array -> int
)
ident(
  ext_ref Array.length
)
"src/write.ml" 262 7787 7812 "src/write.ml" 262 7787 7814
type(
  a array
)
ident(
  int_ref ar "src/write.ml" 258 7566 7617 "src/write.ml" 258 7566 7619
)
"src/write.ml" 262 7787 7799 "src/write.ml" 262 7787 7814
type(
  int
)
"src/write.ml" 263 7818 7826 "src/write.ml" 263 7818 7828
type(
  Nat0.t
)
ident(
  def pn "src/write.ml" 264 7855 7859 "src/write.ml" 265 7903 7959
)
"src/write.ml" 263 7818 7831 "src/write.ml" 263 7818 7849
type(
  int -> Nat0.t
)
ident(
  ext_ref Nat0.unsafe_of_int
)
"src/write.ml" 263 7818 7850 "src/write.ml" 263 7818 7851
type(
  int
)
ident(
  int_ref n "src/write.ml" 262 7787 7795 "src/write.ml" 262 7787 7796
)
"src/write.ml" 263 7818 7831 "src/write.ml" 263 7818 7851
type(
  Nat0.t
)
"src/write.ml" 264 7855 7863 "src/write.ml" 264 7855 7870
type(
  int
)
ident(
  def els_pos "src/write.ml" 265 7903 7907 "src/write.ml" 265 7903 7959
)
"src/write.ml" 264 7855 7873 "src/write.ml" 264 7855 7887
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  int_ref bin_write_nat0 "src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
)
"src/write.ml" 264 7855 7888 "src/write.ml" 264 7855 7891
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 258 7566 7608 "src/write.ml" 258 7566 7611
)
"src/write.ml" 264 7855 7893 "src/write.ml" 264 7855 7896
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 258 7566 7613 "src/write.ml" 258 7566 7616
)
"src/write.ml" 264 7855 7897 "src/write.ml" 264 7855 7899
type(
  Nat0.t
)
ident(
  int_ref pn "src/write.ml" 263 7818 7826 "src/write.ml" 263 7818 7828
)
"src/write.ml" 264 7855 7873 "src/write.ml" 264 7855 7899
call(
  stack
)
type(
  int
)
"src/write.ml" 265 7903 7907 "src/write.ml" 265 7903 7927
type(
  a writer ->
  Common.buf -> els_pos:Common.pos -> n:int -> a array -> Common.pos
)
ident(
  int_ref bin_write_array_loop "src/write.ml" 251 7346 7350 "src/write.ml" 251 7346 7370
)
"src/write.ml" 265 7903 7928 "src/write.ml" 265 7903 7940
type(
  a writer
)
ident(
  int_ref bin_write_el "src/write.ml" 258 7566 7595 "src/write.ml" 258 7566 7607
)
"src/write.ml" 265 7903 7941 "src/write.ml" 265 7903 7944
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 258 7566 7608 "src/write.ml" 258 7566 7611
)
"src/write.ml" 265 7903 7946 "src/write.ml" 265 7903 7953
type(
  Common.pos
)
ident(
  int_ref els_pos "src/write.ml" 264 7855 7863 "src/write.ml" 264 7855 7870
)
"src/write.ml" 265 7903 7955 "src/write.ml" 265 7903 7956
type(
  int
)
ident(
  int_ref n "src/write.ml" 262 7787 7795 "src/write.ml" 262 7787 7796
)
"src/write.ml" 265 7903 7957 "src/write.ml" 265 7903 7959
type(
  a array
)
ident(
  int_ref ar "src/write.ml" 258 7566 7617 "src/write.ml" 258 7566 7619
)
"src/write.ml" 265 7903 7907 "src/write.ml" 265 7903 7959
call(
  tail
)
type(
  Common.pos
)
"src/write.ml" 264 7855 7859 "src/write.ml" 265 7903 7959
type(
  Common.pos
)
"src/write.ml" 263 7818 7822 "src/write.ml" 265 7903 7959
type(
  Common.pos
)
"src/write.ml" 262 7787 7791 "src/write.ml" 265 7903 7959
type(
  Common.pos
)
"src/write.ml" 259 7622 7624 "src/write.ml" 265 7903 7959
type(
  Common.pos
)
"src/write.ml" 258 7566 7586 "src/write.ml" 265 7903 7959
type(
  'a writer -> Common.buf -> pos:Common.pos -> 'a array -> Common.pos
)
"src/write.ml" 267 7961 7965 "src/write.ml" 267 7961 7982
type(
  (Common.buf -> pos:int -> 'a -> 'b) ->
  (Common.buf -> pos:'b -> 'c -> int) ->
  Common.buf -> pos:Common.pos -> ('a, 'c) Hashtbl.t -> int
)
ident(
  def bin_write_hashtbl "src/write.ml" 281 8469 8469 "src/write.ml" 1 0 -1
)
"src/write.ml" 267 7961 7983 "src/write.ml" 267 7961 7996
type(
  Common.buf -> pos:int -> 'a -> 'b
)
ident(
  def bin_write_key "src/write.ml" 267 7961 7997 "src/write.ml" 279 8458 8467
)
"src/write.ml" 267 7961 7997 "src/write.ml" 267 7961 8010
type(
  Common.buf -> pos:'b -> 'c -> int
)
ident(
  def bin_write_val "src/write.ml" 267 7961 8011 "src/write.ml" 279 8458 8467
)
"src/write.ml" 267 7961 8011 "src/write.ml" 267 7961 8014
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 267 7961 8015 "src/write.ml" 279 8458 8467
)
"src/write.ml" 267 7961 8016 "src/write.ml" 267 7961 8019
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 267 7961 8020 "src/write.ml" 279 8458 8467
)
"src/write.ml" 267 7961 8020 "src/write.ml" 267 7961 8024
type(
  ('a, 'c) Hashtbl.t
)
ident(
  def htbl "src/write.ml" 268 8027 8029 "src/write.ml" 279 8458 8467
)
"src/write.ml" 268 8027 8033 "src/write.ml" 268 8027 8036
type(
  int
)
ident(
  def len "src/write.ml" 269 8062 8064 "src/write.ml" 279 8458 8467
)
"src/write.ml" 268 8027 8039 "src/write.ml" 268 8027 8053
type(
  ('a, 'c) Hashtbl.t -> int
)
ident(
  ext_ref Hashtbl.length
)
"src/write.ml" 268 8027 8054 "src/write.ml" 268 8027 8058
type(
  ('a, 'c) Hashtbl.t
)
ident(
  int_ref htbl "src/write.ml" 267 7961 8020 "src/write.ml" 267 7961 8024
)
"src/write.ml" 268 8027 8039 "src/write.ml" 268 8027 8058
call(
  stack
)
type(
  int
)
"src/write.ml" 269 8062 8068 "src/write.ml" 269 8062 8072
type(
  Nat0.t
)
ident(
  def plen "src/write.ml" 270 8101 8103 "src/write.ml" 279 8458 8467
)
"src/write.ml" 269 8062 8075 "src/write.ml" 269 8062 8093
type(
  int -> Nat0.t
)
ident(
  ext_ref Nat0.unsafe_of_int
)
"src/write.ml" 269 8062 8094 "src/write.ml" 269 8062 8097
type(
  int
)
ident(
  int_ref len "src/write.ml" 268 8027 8033 "src/write.ml" 268 8027 8036
)
"src/write.ml" 269 8062 8075 "src/write.ml" 269 8062 8097
type(
  Nat0.t
)
"src/write.ml" 270 8101 8107 "src/write.ml" 270 8101 8114
type(
  int
)
ident(
  def els_pos "src/write.ml" 271 8149 8151 "src/write.ml" 279 8458 8467
)
"src/write.ml" 270 8101 8117 "src/write.ml" 270 8101 8131
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  int_ref bin_write_nat0 "src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
)
"src/write.ml" 270 8101 8132 "src/write.ml" 270 8101 8135
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 267 7961 8011 "src/write.ml" 267 7961 8014
)
"src/write.ml" 270 8101 8137 "src/write.ml" 270 8101 8140
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 267 7961 8016 "src/write.ml" 267 7961 8019
)
"src/write.ml" 270 8101 8141 "src/write.ml" 270 8101 8145
type(
  Nat0.t
)
ident(
  int_ref plen "src/write.ml" 269 8062 8068 "src/write.ml" 269 8062 8072
)
"src/write.ml" 270 8101 8117 "src/write.ml" 270 8101 8145
call(
  stack
)
type(
  int
)
"src/write.ml" 271 8149 8155 "src/write.ml" 271 8149 8162
type(
  int ref
)
ident(
  def cnt_ref "src/write.ml" 272 8174 8176 "src/write.ml" 279 8458 8467
)
"src/write.ml" 271 8149 8165 "src/write.ml" 271 8149 8168
type(
  int -> int ref
)
ident(
  ext_ref Pervasives.ref
)
"src/write.ml" 271 8149 8169 "src/write.ml" 271 8149 8170
type(
  int
)
"src/write.ml" 271 8149 8165 "src/write.ml" 271 8149 8170
type(
  int ref
)
"src/write.ml" 272 8174 8180 "src/write.ml" 272 8174 8189
type(
  'a -> 'c -> int -> int
)
ident(
  def coll_htbl "src/write.ml" 277 8326 8328 "src/write.ml" 279 8458 8467
)
"src/write.ml" 272 8174 8190 "src/write.ml" 272 8174 8191
type(
  'a
)
ident(
  def k "src/write.ml" 272 8174 8192 "src/write.ml" 275 8280 8320
)
"src/write.ml" 272 8174 8192 "src/write.ml" 272 8174 8193
type(
  'c
)
ident(
  def v "src/write.ml" 272 8174 8194 "src/write.ml" 275 8280 8320
)
"src/write.ml" 272 8174 8194 "src/write.ml" 272 8174 8201
type(
  int
)
ident(
  def els_pos "src/write.ml" 273 8204 8208 "src/write.ml" 275 8280 8320
)
"src/write.ml" 273 8204 8208 "src/write.ml" 273 8204 8212
type(
  int ref -> unit
)
ident(
  ext_ref Pervasives.incr
)
"src/write.ml" 273 8204 8213 "src/write.ml" 273 8204 8220
type(
  int ref
)
ident(
  int_ref cnt_ref "src/write.ml" 271 8149 8155 "src/write.ml" 271 8149 8162
)
"src/write.ml" 273 8204 8208 "src/write.ml" 273 8204 8220
type(
  unit
)
"src/write.ml" 274 8222 8230 "src/write.ml" 274 8222 8241
type(
  'b
)
ident(
  def new_els_pos "src/write.ml" 275 8280 8284 "src/write.ml" 275 8280 8320
)
"src/write.ml" 274 8222 8244 "src/write.ml" 274 8222 8257
type(
  Common.buf -> pos:int -> 'a -> 'b
)
ident(
  int_ref bin_write_key "src/write.ml" 267 7961 7983 "src/write.ml" 267 7961 7996
)
"src/write.ml" 274 8222 8258 "src/write.ml" 274 8222 8261
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 267 7961 8011 "src/write.ml" 267 7961 8014
)
"src/write.ml" 274 8222 8267 "src/write.ml" 274 8222 8274
type(
  int
)
ident(
  int_ref els_pos "src/write.ml" 272 8174 8194 "src/write.ml" 272 8174 8201
)
"src/write.ml" 274 8222 8275 "src/write.ml" 274 8222 8276
type(
  'a
)
ident(
  int_ref k "src/write.ml" 272 8174 8190 "src/write.ml" 272 8174 8191
)
"src/write.ml" 274 8222 8244 "src/write.ml" 274 8222 8276
call(
  stack
)
type(
  'b
)
"src/write.ml" 275 8280 8284 "src/write.ml" 275 8280 8297
type(
  Common.buf -> pos:'b -> 'c -> int
)
ident(
  int_ref bin_write_val "src/write.ml" 267 7961 7997 "src/write.ml" 267 7961 8010
)
"src/write.ml" 275 8280 8298 "src/write.ml" 275 8280 8301
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 267 7961 8011 "src/write.ml" 267 7961 8014
)
"src/write.ml" 275 8280 8307 "src/write.ml" 275 8280 8318
type(
  'b
)
ident(
  int_ref new_els_pos "src/write.ml" 274 8222 8230 "src/write.ml" 274 8222 8241
)
"src/write.ml" 275 8280 8319 "src/write.ml" 275 8280 8320
type(
  'c
)
ident(
  int_ref v "src/write.ml" 272 8174 8192 "src/write.ml" 272 8174 8193
)
"src/write.ml" 275 8280 8284 "src/write.ml" 275 8280 8320
call(
  tail
)
type(
  int
)
"src/write.ml" 274 8222 8226 "src/write.ml" 275 8280 8320
type(
  int
)
"src/write.ml" 273 8204 8208 "src/write.ml" 275 8280 8320
type(
  int
)
"src/write.ml" 277 8326 8332 "src/write.ml" 277 8326 8339
type(
  int
)
ident(
  def res_pos "src/write.ml" 278 8381 8383 "src/write.ml" 279 8458 8467
)
"src/write.ml" 277 8326 8342 "src/write.ml" 277 8326 8354
type(
  ('a -> 'c -> int -> int) -> ('a, 'c) Hashtbl.t -> int -> int
)
ident(
  ext_ref Hashtbl.fold
)
"src/write.ml" 277 8326 8355 "src/write.ml" 277 8326 8364
type(
  'a -> 'c -> int -> int
)
ident(
  int_ref coll_htbl "src/write.ml" 272 8174 8180 "src/write.ml" 272 8174 8189
)
"src/write.ml" 277 8326 8365 "src/write.ml" 277 8326 8369
type(
  ('a, 'c) Hashtbl.t
)
ident(
  int_ref htbl "src/write.ml" 267 7961 8020 "src/write.ml" 267 7961 8024
)
"src/write.ml" 277 8326 8370 "src/write.ml" 277 8326 8377
type(
  int
)
ident(
  int_ref els_pos "src/write.ml" 270 8101 8107 "src/write.ml" 270 8101 8114
)
"src/write.ml" 277 8326 8342 "src/write.ml" 277 8326 8377
call(
  stack
)
type(
  int
)
"src/write.ml" 278 8381 8386 "src/write.ml" 278 8381 8387
type(
  int ref -> int
)
ident(
  ext_ref Pervasives.( ! )
)
"src/write.ml" 278 8381 8387 "src/write.ml" 278 8381 8394
type(
  int ref
)
ident(
  int_ref cnt_ref "src/write.ml" 271 8149 8155 "src/write.ml" 271 8149 8162
)
"src/write.ml" 278 8381 8386 "src/write.ml" 278 8381 8394
type(
  int
)
"src/write.ml" 278 8381 8395 "src/write.ml" 278 8381 8397
type(
  int -> int -> bool
)
ident(
  ext_ref Pervasives.( <> )
)
"src/write.ml" 278 8381 8398 "src/write.ml" 278 8381 8401
type(
  int
)
ident(
  int_ref len "src/write.ml" 268 8027 8033 "src/write.ml" 268 8027 8036
)
"src/write.ml" 278 8381 8386 "src/write.ml" 278 8381 8401
type(
  bool
)
"src/write.ml" 278 8381 8407 "src/write.ml" 278 8381 8436
type(
  string -> unit
)
ident(
  ext_ref Common.raise_concurrent_modification
)
"src/write.ml" 278 8381 8437 "src/write.ml" 278 8381 8456
type(
  string
)
"src/write.ml" 278 8381 8407 "src/write.ml" 278 8381 8456
call(
  stack
)
type(
  unit
)
"src/write.ml" 278 8381 8383 "src/write.ml" 278 8381 8456
type(
  unit
)
"src/write.ml" 279 8458 8460 "src/write.ml" 279 8458 8467
type(
  int
)
ident(
  int_ref res_pos "src/write.ml" 277 8326 8332 "src/write.ml" 277 8326 8339
)
"src/write.ml" 278 8381 8383 "src/write.ml" 279 8458 8467
type(
  int
)
"src/write.ml" 277 8326 8328 "src/write.ml" 279 8458 8467
type(
  int
)
"src/write.ml" 272 8174 8176 "src/write.ml" 279 8458 8467
type(
  int
)
"src/write.ml" 271 8149 8151 "src/write.ml" 279 8458 8467
type(
  int
)
"src/write.ml" 270 8101 8103 "src/write.ml" 279 8458 8467
type(
  int
)
"src/write.ml" 269 8062 8064 "src/write.ml" 279 8458 8467
type(
  int
)
"src/write.ml" 268 8027 8029 "src/write.ml" 279 8458 8467
type(
  int
)
"src/write.ml" 286 8674 8678 "src/write.ml" 286 8674 8699
type(
  Common.buf -> pos:Common.pos -> Common.vec32 -> int
)
ident(
  def bin_write_float32_vec "src/write.ml" 296 8990 8990 "src/write.ml" 1 0 -1
)
"src/write.ml" 286 8674 8700 "src/write.ml" 286 8674 8703
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 286 8674 8704 "src/write.ml" 294 8982 8988
)
"src/write.ml" 286 8674 8705 "src/write.ml" 286 8674 8708
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 286 8674 8709 "src/write.ml" 294 8982 8988
)
"src/write.ml" 286 8674 8709 "src/write.ml" 286 8674 8710
type(
  Common.vec32
)
ident(
  def v "src/write.ml" 287 8713 8715 "src/write.ml" 294 8982 8988
)
"src/write.ml" 287 8713 8719 "src/write.ml" 287 8713 8722
type(
  int
)
ident(
  def len "src/write.ml" 288 8741 8743 "src/write.ml" 294 8982 8988
)
"src/write.ml" 287 8713 8725 "src/write.ml" 287 8713 8735
type(
  Common.vec32 -> int
)
ident(
  ext_ref Bigarray.Array1.dim
)
"src/write.ml" 287 8713 8736 "src/write.ml" 287 8713 8737
type(
  Common.vec32
)
ident(
  int_ref v "src/write.ml" 286 8674 8709 "src/write.ml" 286 8674 8710
)
"src/write.ml" 287 8713 8725 "src/write.ml" 287 8713 8737
type(
  int
)
"src/write.ml" 288 8741 8747 "src/write.ml" 288 8741 8751
type(
  Nat0.t
)
ident(
  def plen "src/write.ml" 289 8780 8782 "src/write.ml" 294 8982 8988
)
"src/write.ml" 288 8741 8754 "src/write.ml" 288 8741 8772
type(
  int -> Nat0.t
)
ident(
  ext_ref Nat0.unsafe_of_int
)
"src/write.ml" 288 8741 8773 "src/write.ml" 288 8741 8776
type(
  int
)
ident(
  int_ref len "src/write.ml" 287 8713 8719 "src/write.ml" 287 8713 8722
)
"src/write.ml" 288 8741 8754 "src/write.ml" 288 8741 8776
type(
  Nat0.t
)
"src/write.ml" 289 8780 8786 "src/write.ml" 289 8780 8789
type(
  int
)
ident(
  def pos "src/write.ml" 290 8824 8826 "src/write.ml" 294 8982 8988
)
"src/write.ml" 289 8780 8792 "src/write.ml" 289 8780 8806
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  int_ref bin_write_nat0 "src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
)
"src/write.ml" 289 8780 8807 "src/write.ml" 289 8780 8810
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 286 8674 8700 "src/write.ml" 286 8674 8703
)
"src/write.ml" 289 8780 8812 "src/write.ml" 289 8780 8815
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 286 8674 8705 "src/write.ml" 286 8674 8708
)
"src/write.ml" 289 8780 8816 "src/write.ml" 289 8780 8820
type(
  Nat0.t
)
ident(
  int_ref plen "src/write.ml" 288 8741 8747 "src/write.ml" 288 8741 8751
)
"src/write.ml" 289 8780 8792 "src/write.ml" 289 8780 8820
call(
  stack
)
type(
  int
)
"src/write.ml" 290 8824 8830 "src/write.ml" 290 8824 8834
type(
  int
)
ident(
  def size "src/write.ml" 291 8848 8850 "src/write.ml" 294 8982 8988
)
"src/write.ml" 290 8824 8837 "src/write.ml" 290 8824 8840
type(
  int
)
ident(
  int_ref len "src/write.ml" 287 8713 8719 "src/write.ml" 287 8713 8722
)
"src/write.ml" 290 8824 8841 "src/write.ml" 290 8824 8842
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( * )
)
"src/write.ml" 290 8824 8843 "src/write.ml" 290 8824 8844
type(
  int
)
"src/write.ml" 290 8824 8837 "src/write.ml" 290 8824 8844
type(
  int
)
"src/write.ml" 291 8848 8854 "src/write.ml" 291 8848 8858
type(
  int
)
ident(
  def next "src/write.ml" 292 8875 8877 "src/write.ml" 294 8982 8988
)
"src/write.ml" 291 8848 8861 "src/write.ml" 291 8848 8864
type(
  int
)
ident(
  int_ref pos "src/write.ml" 289 8780 8786 "src/write.ml" 289 8780 8789
)
"src/write.ml" 291 8848 8865 "src/write.ml" 291 8848 8866
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 291 8848 8867 "src/write.ml" 291 8848 8871
type(
  int
)
ident(
  int_ref size "src/write.ml" 290 8824 8830 "src/write.ml" 290 8824 8834
)
"src/write.ml" 291 8848 8861 "src/write.ml" 291 8848 8871
type(
  int
)
"src/write.ml" 292 8875 8877 "src/write.ml" 292 8875 8887
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 292 8875 8888 "src/write.ml" 292 8875 8891
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 286 8674 8700 "src/write.ml" 286 8674 8703
)
"src/write.ml" 292 8875 8892 "src/write.ml" 292 8875 8896
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 291 8848 8854 "src/write.ml" 291 8848 8858
)
"src/write.ml" 292 8875 8877 "src/write.ml" 292 8875 8896
call(
  stack
)
type(
  unit
)
"src/write.ml" 293 8898 8900 "src/write.ml" 293 8898 8915
type(
  src_pos:int ->
  src:Common.buf -> dst_pos:int -> dst:Common.buf -> len:int -> unit
)
ident(
  ext_ref Common.unsafe_blit_buf
)
"src/write.ml" 293 8898 8922 "src/write.ml" 293 8898 8934
type(
  Common.vec32 -> Common.buf
)
ident(
  int_ref buf_of_vec32 "src/write.ml" 281 8469 8469 "src/write.ml" 281 8469 8519
)
"src/write.ml" 293 8898 8935 "src/write.ml" 293 8898 8936
type(
  Common.vec32
)
ident(
  int_ref v "src/write.ml" 286 8674 8709 "src/write.ml" 286 8674 8710
)
"src/write.ml" 293 8898 8921 "src/write.ml" 293 8898 8937
type(
  Common.buf
)
"src/write.ml" 293 8898 8947 "src/write.ml" 293 8898 8948
type(
  int
)
"src/write.ml" 293 8898 8954 "src/write.ml" 293 8898 8957
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 286 8674 8700 "src/write.ml" 286 8674 8703
)
"src/write.ml" 293 8898 8967 "src/write.ml" 293 8898 8970
type(
  int
)
ident(
  int_ref pos "src/write.ml" 289 8780 8786 "src/write.ml" 289 8780 8789
)
"src/write.ml" 293 8898 8976 "src/write.ml" 293 8898 8980
type(
  int
)
ident(
  int_ref size "src/write.ml" 290 8824 8830 "src/write.ml" 290 8824 8834
)
"src/write.ml" 293 8898 8900 "src/write.ml" 293 8898 8980
type(
  unit
)
"src/write.ml" 294 8982 8984 "src/write.ml" 294 8982 8988
type(
  int
)
ident(
  int_ref next "src/write.ml" 291 8848 8854 "src/write.ml" 291 8848 8858
)
"src/write.ml" 293 8898 8900 "src/write.ml" 294 8982 8988
type(
  int
)
"src/write.ml" 292 8875 8877 "src/write.ml" 294 8982 8988
type(
  int
)
"src/write.ml" 291 8848 8850 "src/write.ml" 294 8982 8988
type(
  int
)
"src/write.ml" 290 8824 8826 "src/write.ml" 294 8982 8988
type(
  int
)
"src/write.ml" 289 8780 8782 "src/write.ml" 294 8982 8988
type(
  int
)
"src/write.ml" 288 8741 8743 "src/write.ml" 294 8982 8988
type(
  int
)
"src/write.ml" 287 8713 8715 "src/write.ml" 294 8982 8988
type(
  int
)
"src/write.ml" 296 8990 8994 "src/write.ml" 296 8990 9015
type(
  Common.buf -> pos:Common.pos -> Common.vec64 -> int
)
ident(
  def bin_write_float64_vec "src/write.ml" 306 9306 9306 "src/write.ml" 1 0 -1
)
"src/write.ml" 296 8990 9016 "src/write.ml" 296 8990 9019
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 296 8990 9020 "src/write.ml" 304 9298 9304
)
"src/write.ml" 296 8990 9021 "src/write.ml" 296 8990 9024
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 296 8990 9025 "src/write.ml" 304 9298 9304
)
"src/write.ml" 296 8990 9025 "src/write.ml" 296 8990 9026
type(
  Common.vec64
)
ident(
  def v "src/write.ml" 297 9029 9031 "src/write.ml" 304 9298 9304
)
"src/write.ml" 297 9029 9035 "src/write.ml" 297 9029 9038
type(
  int
)
ident(
  def len "src/write.ml" 298 9057 9059 "src/write.ml" 304 9298 9304
)
"src/write.ml" 297 9029 9041 "src/write.ml" 297 9029 9051
type(
  Common.vec64 -> int
)
ident(
  ext_ref Bigarray.Array1.dim
)
"src/write.ml" 297 9029 9052 "src/write.ml" 297 9029 9053
type(
  Common.vec64
)
ident(
  int_ref v "src/write.ml" 296 8990 9025 "src/write.ml" 296 8990 9026
)
"src/write.ml" 297 9029 9041 "src/write.ml" 297 9029 9053
type(
  int
)
"src/write.ml" 298 9057 9063 "src/write.ml" 298 9057 9067
type(
  Nat0.t
)
ident(
  def plen "src/write.ml" 299 9096 9098 "src/write.ml" 304 9298 9304
)
"src/write.ml" 298 9057 9070 "src/write.ml" 298 9057 9088
type(
  int -> Nat0.t
)
ident(
  ext_ref Nat0.unsafe_of_int
)
"src/write.ml" 298 9057 9089 "src/write.ml" 298 9057 9092
type(
  int
)
ident(
  int_ref len "src/write.ml" 297 9029 9035 "src/write.ml" 297 9029 9038
)
"src/write.ml" 298 9057 9070 "src/write.ml" 298 9057 9092
type(
  Nat0.t
)
"src/write.ml" 299 9096 9102 "src/write.ml" 299 9096 9105
type(
  int
)
ident(
  def pos "src/write.ml" 300 9140 9142 "src/write.ml" 304 9298 9304
)
"src/write.ml" 299 9096 9108 "src/write.ml" 299 9096 9122
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  int_ref bin_write_nat0 "src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
)
"src/write.ml" 299 9096 9123 "src/write.ml" 299 9096 9126
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 296 8990 9016 "src/write.ml" 296 8990 9019
)
"src/write.ml" 299 9096 9128 "src/write.ml" 299 9096 9131
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 296 8990 9021 "src/write.ml" 296 8990 9024
)
"src/write.ml" 299 9096 9132 "src/write.ml" 299 9096 9136
type(
  Nat0.t
)
ident(
  int_ref plen "src/write.ml" 298 9057 9063 "src/write.ml" 298 9057 9067
)
"src/write.ml" 299 9096 9108 "src/write.ml" 299 9096 9136
call(
  stack
)
type(
  int
)
"src/write.ml" 300 9140 9146 "src/write.ml" 300 9140 9150
type(
  int
)
ident(
  def size "src/write.ml" 301 9164 9166 "src/write.ml" 304 9298 9304
)
"src/write.ml" 300 9140 9153 "src/write.ml" 300 9140 9156
type(
  int
)
ident(
  int_ref len "src/write.ml" 297 9029 9035 "src/write.ml" 297 9029 9038
)
"src/write.ml" 300 9140 9157 "src/write.ml" 300 9140 9158
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( * )
)
"src/write.ml" 300 9140 9159 "src/write.ml" 300 9140 9160
type(
  int
)
"src/write.ml" 300 9140 9153 "src/write.ml" 300 9140 9160
type(
  int
)
"src/write.ml" 301 9164 9170 "src/write.ml" 301 9164 9174
type(
  int
)
ident(
  def next "src/write.ml" 302 9191 9193 "src/write.ml" 304 9298 9304
)
"src/write.ml" 301 9164 9177 "src/write.ml" 301 9164 9180
type(
  int
)
ident(
  int_ref pos "src/write.ml" 299 9096 9102 "src/write.ml" 299 9096 9105
)
"src/write.ml" 301 9164 9181 "src/write.ml" 301 9164 9182
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 301 9164 9183 "src/write.ml" 301 9164 9187
type(
  int
)
ident(
  int_ref size "src/write.ml" 300 9140 9146 "src/write.ml" 300 9140 9150
)
"src/write.ml" 301 9164 9177 "src/write.ml" 301 9164 9187
type(
  int
)
"src/write.ml" 302 9191 9193 "src/write.ml" 302 9191 9203
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 302 9191 9204 "src/write.ml" 302 9191 9207
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 296 8990 9016 "src/write.ml" 296 8990 9019
)
"src/write.ml" 302 9191 9208 "src/write.ml" 302 9191 9212
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 301 9164 9170 "src/write.ml" 301 9164 9174
)
"src/write.ml" 302 9191 9193 "src/write.ml" 302 9191 9212
call(
  stack
)
type(
  unit
)
"src/write.ml" 303 9214 9216 "src/write.ml" 303 9214 9231
type(
  src_pos:int ->
  src:Common.buf -> dst_pos:int -> dst:Common.buf -> len:int -> unit
)
ident(
  ext_ref Common.unsafe_blit_buf
)
"src/write.ml" 303 9214 9238 "src/write.ml" 303 9214 9250
type(
  Common.vec64 -> Common.buf
)
ident(
  int_ref buf_of_vec64 "src/write.ml" 282 8520 8520 "src/write.ml" 282 8520 8570
)
"src/write.ml" 303 9214 9251 "src/write.ml" 303 9214 9252
type(
  Common.vec64
)
ident(
  int_ref v "src/write.ml" 296 8990 9025 "src/write.ml" 296 8990 9026
)
"src/write.ml" 303 9214 9237 "src/write.ml" 303 9214 9253
type(
  Common.buf
)
"src/write.ml" 303 9214 9263 "src/write.ml" 303 9214 9264
type(
  int
)
"src/write.ml" 303 9214 9270 "src/write.ml" 303 9214 9273
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 296 8990 9016 "src/write.ml" 296 8990 9019
)
"src/write.ml" 303 9214 9283 "src/write.ml" 303 9214 9286
type(
  int
)
ident(
  int_ref pos "src/write.ml" 299 9096 9102 "src/write.ml" 299 9096 9105
)
"src/write.ml" 303 9214 9292 "src/write.ml" 303 9214 9296
type(
  int
)
ident(
  int_ref size "src/write.ml" 300 9140 9146 "src/write.ml" 300 9140 9150
)
"src/write.ml" 303 9214 9216 "src/write.ml" 303 9214 9296
type(
  unit
)
"src/write.ml" 304 9298 9300 "src/write.ml" 304 9298 9304
type(
  int
)
ident(
  int_ref next "src/write.ml" 301 9164 9170 "src/write.ml" 301 9164 9174
)
"src/write.ml" 303 9214 9216 "src/write.ml" 304 9298 9304
type(
  int
)
"src/write.ml" 302 9191 9193 "src/write.ml" 304 9298 9304
type(
  int
)
"src/write.ml" 301 9164 9166 "src/write.ml" 304 9298 9304
type(
  int
)
"src/write.ml" 300 9140 9142 "src/write.ml" 304 9298 9304
type(
  int
)
"src/write.ml" 299 9096 9098 "src/write.ml" 304 9298 9304
type(
  int
)
"src/write.ml" 298 9057 9059 "src/write.ml" 304 9298 9304
type(
  int
)
"src/write.ml" 297 9029 9031 "src/write.ml" 304 9298 9304
type(
  int
)
"src/write.ml" 306 9306 9310 "src/write.ml" 306 9306 9323
type(
  Common.buf -> pos:Common.pos -> Common.vec64 -> int
)
ident(
  def bin_write_vec "src/write.ml" 308 9349 9349 "src/write.ml" 1 0 -1
)
"src/write.ml" 306 9306 9326 "src/write.ml" 306 9306 9347
type(
  Common.buf -> pos:Common.pos -> Common.vec64 -> int
)
ident(
  int_ref bin_write_float64_vec "src/write.ml" 296 8990 8994 "src/write.ml" 296 8990 9015
)
"src/write.ml" 308 9349 9353 "src/write.ml" 308 9349 9374
type(
  Common.buf -> pos:Common.pos -> Common.mat32 -> int
)
ident(
  def bin_write_float32_mat "src/write.ml" 319 9752 9752 "src/write.ml" 1 0 -1
)
"src/write.ml" 308 9349 9375 "src/write.ml" 308 9349 9378
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 308 9349 9379 "src/write.ml" 317 9744 9750
)
"src/write.ml" 308 9349 9380 "src/write.ml" 308 9349 9383
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 308 9349 9384 "src/write.ml" 317 9744 9750
)
"src/write.ml" 308 9349 9384 "src/write.ml" 308 9349 9385
type(
  Common.mat32
)
ident(
  def m "src/write.ml" 309 9388 9390 "src/write.ml" 317 9744 9750
)
"src/write.ml" 309 9388 9394 "src/write.ml" 309 9388 9398
type(
  int
)
ident(
  def len1 "src/write.ml" 310 9418 9420 "src/write.ml" 317 9744 9750
)
"src/write.ml" 309 9388 9401 "src/write.ml" 309 9388 9412
type(
  Common.mat32 -> int
)
ident(
  ext_ref Bigarray.Array2.dim1
)
"src/write.ml" 309 9388 9413 "src/write.ml" 309 9388 9414
type(
  Common.mat32
)
ident(
  int_ref m "src/write.ml" 308 9349 9384 "src/write.ml" 308 9349 9385
)
"src/write.ml" 309 9388 9401 "src/write.ml" 309 9388 9414
type(
  int
)
"src/write.ml" 310 9418 9424 "src/write.ml" 310 9418 9428
type(
  int
)
ident(
  def len2 "src/write.ml" 311 9448 9450 "src/write.ml" 317 9744 9750
)
"src/write.ml" 310 9418 9431 "src/write.ml" 310 9418 9442
type(
  Common.mat32 -> int
)
ident(
  ext_ref Bigarray.Array2.dim2
)
"src/write.ml" 310 9418 9443 "src/write.ml" 310 9418 9444
type(
  Common.mat32
)
ident(
  int_ref m "src/write.ml" 308 9349 9384 "src/write.ml" 308 9349 9385
)
"src/write.ml" 310 9418 9431 "src/write.ml" 310 9418 9444
type(
  int
)
"src/write.ml" 311 9448 9454 "src/write.ml" 311 9448 9457
type(
  int
)
ident(
  def pos "src/write.ml" 312 9513 9515 "src/write.ml" 317 9744 9750
)
"src/write.ml" 311 9448 9460 "src/write.ml" 311 9448 9474
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  int_ref bin_write_nat0 "src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
)
"src/write.ml" 311 9448 9475 "src/write.ml" 311 9448 9478
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 308 9349 9375 "src/write.ml" 308 9349 9378
)
"src/write.ml" 311 9448 9480 "src/write.ml" 311 9448 9483
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 308 9349 9380 "src/write.ml" 308 9349 9383
)
"src/write.ml" 311 9448 9485 "src/write.ml" 311 9448 9503
type(
  int -> Nat0.t
)
ident(
  ext_ref Nat0.unsafe_of_int
)
"src/write.ml" 311 9448 9504 "src/write.ml" 311 9448 9508
type(
  int
)
ident(
  int_ref len1 "src/write.ml" 309 9388 9394 "src/write.ml" 309 9388 9398
)
"src/write.ml" 311 9448 9484 "src/write.ml" 311 9448 9509
type(
  Nat0.t
)
"src/write.ml" 311 9448 9460 "src/write.ml" 311 9448 9509
call(
  stack
)
type(
  int
)
"src/write.ml" 312 9513 9519 "src/write.ml" 312 9513 9522
type(
  int
)
ident(
  def pos "src/write.ml" 313 9578 9580 "src/write.ml" 317 9744 9750
)
"src/write.ml" 312 9513 9525 "src/write.ml" 312 9513 9539
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  int_ref bin_write_nat0 "src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
)
"src/write.ml" 312 9513 9540 "src/write.ml" 312 9513 9543
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 308 9349 9375 "src/write.ml" 308 9349 9378
)
"src/write.ml" 312 9513 9545 "src/write.ml" 312 9513 9548
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 311 9448 9454 "src/write.ml" 311 9448 9457
)
"src/write.ml" 312 9513 9550 "src/write.ml" 312 9513 9568
type(
  int -> Nat0.t
)
ident(
  ext_ref Nat0.unsafe_of_int
)
"src/write.ml" 312 9513 9569 "src/write.ml" 312 9513 9573
type(
  int
)
ident(
  int_ref len2 "src/write.ml" 310 9418 9424 "src/write.ml" 310 9418 9428
)
"src/write.ml" 312 9513 9549 "src/write.ml" 312 9513 9574
type(
  Nat0.t
)
"src/write.ml" 312 9513 9525 "src/write.ml" 312 9513 9574
call(
  stack
)
type(
  int
)
"src/write.ml" 313 9578 9584 "src/write.ml" 313 9578 9588
type(
  int
)
ident(
  def size "src/write.ml" 314 9610 9612 "src/write.ml" 317 9744 9750
)
"src/write.ml" 313 9578 9591 "src/write.ml" 313 9578 9595
type(
  int
)
ident(
  int_ref len1 "src/write.ml" 309 9388 9394 "src/write.ml" 309 9388 9398
)
"src/write.ml" 313 9578 9596 "src/write.ml" 313 9578 9597
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( * )
)
"src/write.ml" 313 9578 9598 "src/write.ml" 313 9578 9602
type(
  int
)
ident(
  int_ref len2 "src/write.ml" 310 9418 9424 "src/write.ml" 310 9418 9428
)
"src/write.ml" 313 9578 9591 "src/write.ml" 313 9578 9602
type(
  int
)
"src/write.ml" 313 9578 9603 "src/write.ml" 313 9578 9604
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( * )
)
"src/write.ml" 313 9578 9605 "src/write.ml" 313 9578 9606
type(
  int
)
"src/write.ml" 313 9578 9591 "src/write.ml" 313 9578 9606
type(
  int
)
"src/write.ml" 314 9610 9616 "src/write.ml" 314 9610 9620
type(
  int
)
ident(
  def next "src/write.ml" 315 9637 9639 "src/write.ml" 317 9744 9750
)
"src/write.ml" 314 9610 9623 "src/write.ml" 314 9610 9626
type(
  int
)
ident(
  int_ref pos "src/write.ml" 312 9513 9519 "src/write.ml" 312 9513 9522
)
"src/write.ml" 314 9610 9627 "src/write.ml" 314 9610 9628
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 314 9610 9629 "src/write.ml" 314 9610 9633
type(
  int
)
ident(
  int_ref size "src/write.ml" 313 9578 9584 "src/write.ml" 313 9578 9588
)
"src/write.ml" 314 9610 9623 "src/write.ml" 314 9610 9633
type(
  int
)
"src/write.ml" 315 9637 9639 "src/write.ml" 315 9637 9649
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 315 9637 9650 "src/write.ml" 315 9637 9653
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 308 9349 9375 "src/write.ml" 308 9349 9378
)
"src/write.ml" 315 9637 9654 "src/write.ml" 315 9637 9658
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 314 9610 9616 "src/write.ml" 314 9610 9620
)
"src/write.ml" 315 9637 9639 "src/write.ml" 315 9637 9658
call(
  stack
)
type(
  unit
)
"src/write.ml" 316 9660 9662 "src/write.ml" 316 9660 9677
type(
  src_pos:int ->
  src:Common.buf -> dst_pos:int -> dst:Common.buf -> len:int -> unit
)
ident(
  ext_ref Common.unsafe_blit_buf
)
"src/write.ml" 316 9660 9684 "src/write.ml" 316 9660 9696
type(
  Common.mat32 -> Common.buf
)
ident(
  int_ref buf_of_mat32 "src/write.ml" 283 8571 8571 "src/write.ml" 283 8571 8621
)
"src/write.ml" 316 9660 9697 "src/write.ml" 316 9660 9698
type(
  Common.mat32
)
ident(
  int_ref m "src/write.ml" 308 9349 9384 "src/write.ml" 308 9349 9385
)
"src/write.ml" 316 9660 9683 "src/write.ml" 316 9660 9699
type(
  Common.buf
)
"src/write.ml" 316 9660 9709 "src/write.ml" 316 9660 9710
type(
  int
)
"src/write.ml" 316 9660 9716 "src/write.ml" 316 9660 9719
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 308 9349 9375 "src/write.ml" 308 9349 9378
)
"src/write.ml" 316 9660 9729 "src/write.ml" 316 9660 9732
type(
  int
)
ident(
  int_ref pos "src/write.ml" 312 9513 9519 "src/write.ml" 312 9513 9522
)
"src/write.ml" 316 9660 9738 "src/write.ml" 316 9660 9742
type(
  int
)
ident(
  int_ref size "src/write.ml" 313 9578 9584 "src/write.ml" 313 9578 9588
)
"src/write.ml" 316 9660 9662 "src/write.ml" 316 9660 9742
type(
  unit
)
"src/write.ml" 317 9744 9746 "src/write.ml" 317 9744 9750
type(
  int
)
ident(
  int_ref next "src/write.ml" 314 9610 9616 "src/write.ml" 314 9610 9620
)
"src/write.ml" 316 9660 9662 "src/write.ml" 317 9744 9750
type(
  int
)
"src/write.ml" 315 9637 9639 "src/write.ml" 317 9744 9750
type(
  int
)
"src/write.ml" 314 9610 9612 "src/write.ml" 317 9744 9750
type(
  int
)
"src/write.ml" 313 9578 9580 "src/write.ml" 317 9744 9750
type(
  int
)
"src/write.ml" 312 9513 9515 "src/write.ml" 317 9744 9750
type(
  int
)
"src/write.ml" 311 9448 9450 "src/write.ml" 317 9744 9750
type(
  int
)
"src/write.ml" 310 9418 9420 "src/write.ml" 317 9744 9750
type(
  int
)
"src/write.ml" 309 9388 9390 "src/write.ml" 317 9744 9750
type(
  int
)
"src/write.ml" 319 9752 9756 "src/write.ml" 319 9752 9777
type(
  Common.buf -> pos:Common.pos -> Common.mat64 -> int
)
ident(
  def bin_write_float64_mat "src/write.ml" 330 10155 10155 "src/write.ml" 1 0 -1
)
"src/write.ml" 319 9752 9778 "src/write.ml" 319 9752 9781
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 319 9752 9782 "src/write.ml" 328 10147 10153
)
"src/write.ml" 319 9752 9783 "src/write.ml" 319 9752 9786
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 319 9752 9787 "src/write.ml" 328 10147 10153
)
"src/write.ml" 319 9752 9787 "src/write.ml" 319 9752 9788
type(
  Common.mat64
)
ident(
  def m "src/write.ml" 320 9791 9793 "src/write.ml" 328 10147 10153
)
"src/write.ml" 320 9791 9797 "src/write.ml" 320 9791 9801
type(
  int
)
ident(
  def len1 "src/write.ml" 321 9821 9823 "src/write.ml" 328 10147 10153
)
"src/write.ml" 320 9791 9804 "src/write.ml" 320 9791 9815
type(
  Common.mat64 -> int
)
ident(
  ext_ref Bigarray.Array2.dim1
)
"src/write.ml" 320 9791 9816 "src/write.ml" 320 9791 9817
type(
  Common.mat64
)
ident(
  int_ref m "src/write.ml" 319 9752 9787 "src/write.ml" 319 9752 9788
)
"src/write.ml" 320 9791 9804 "src/write.ml" 320 9791 9817
type(
  int
)
"src/write.ml" 321 9821 9827 "src/write.ml" 321 9821 9831
type(
  int
)
ident(
  def len2 "src/write.ml" 322 9851 9853 "src/write.ml" 328 10147 10153
)
"src/write.ml" 321 9821 9834 "src/write.ml" 321 9821 9845
type(
  Common.mat64 -> int
)
ident(
  ext_ref Bigarray.Array2.dim2
)
"src/write.ml" 321 9821 9846 "src/write.ml" 321 9821 9847
type(
  Common.mat64
)
ident(
  int_ref m "src/write.ml" 319 9752 9787 "src/write.ml" 319 9752 9788
)
"src/write.ml" 321 9821 9834 "src/write.ml" 321 9821 9847
type(
  int
)
"src/write.ml" 322 9851 9857 "src/write.ml" 322 9851 9860
type(
  int
)
ident(
  def pos "src/write.ml" 323 9916 9918 "src/write.ml" 328 10147 10153
)
"src/write.ml" 322 9851 9863 "src/write.ml" 322 9851 9877
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  int_ref bin_write_nat0 "src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
)
"src/write.ml" 322 9851 9878 "src/write.ml" 322 9851 9881
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 319 9752 9778 "src/write.ml" 319 9752 9781
)
"src/write.ml" 322 9851 9883 "src/write.ml" 322 9851 9886
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 319 9752 9783 "src/write.ml" 319 9752 9786
)
"src/write.ml" 322 9851 9888 "src/write.ml" 322 9851 9906
type(
  int -> Nat0.t
)
ident(
  ext_ref Nat0.unsafe_of_int
)
"src/write.ml" 322 9851 9907 "src/write.ml" 322 9851 9911
type(
  int
)
ident(
  int_ref len1 "src/write.ml" 320 9791 9797 "src/write.ml" 320 9791 9801
)
"src/write.ml" 322 9851 9887 "src/write.ml" 322 9851 9912
type(
  Nat0.t
)
"src/write.ml" 322 9851 9863 "src/write.ml" 322 9851 9912
call(
  stack
)
type(
  int
)
"src/write.ml" 323 9916 9922 "src/write.ml" 323 9916 9925
type(
  int
)
ident(
  def pos "src/write.ml" 324 9981 9983 "src/write.ml" 328 10147 10153
)
"src/write.ml" 323 9916 9928 "src/write.ml" 323 9916 9942
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  int_ref bin_write_nat0 "src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
)
"src/write.ml" 323 9916 9943 "src/write.ml" 323 9916 9946
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 319 9752 9778 "src/write.ml" 319 9752 9781
)
"src/write.ml" 323 9916 9948 "src/write.ml" 323 9916 9951
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 322 9851 9857 "src/write.ml" 322 9851 9860
)
"src/write.ml" 323 9916 9953 "src/write.ml" 323 9916 9971
type(
  int -> Nat0.t
)
ident(
  ext_ref Nat0.unsafe_of_int
)
"src/write.ml" 323 9916 9972 "src/write.ml" 323 9916 9976
type(
  int
)
ident(
  int_ref len2 "src/write.ml" 321 9821 9827 "src/write.ml" 321 9821 9831
)
"src/write.ml" 323 9916 9952 "src/write.ml" 323 9916 9977
type(
  Nat0.t
)
"src/write.ml" 323 9916 9928 "src/write.ml" 323 9916 9977
call(
  stack
)
type(
  int
)
"src/write.ml" 324 9981 9987 "src/write.ml" 324 9981 9991
type(
  int
)
ident(
  def size "src/write.ml" 325 10013 10015 "src/write.ml" 328 10147 10153
)
"src/write.ml" 324 9981 9994 "src/write.ml" 324 9981 9998
type(
  int
)
ident(
  int_ref len1 "src/write.ml" 320 9791 9797 "src/write.ml" 320 9791 9801
)
"src/write.ml" 324 9981 9999 "src/write.ml" 324 9981 10000
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( * )
)
"src/write.ml" 324 9981 10001 "src/write.ml" 324 9981 10005
type(
  int
)
ident(
  int_ref len2 "src/write.ml" 321 9821 9827 "src/write.ml" 321 9821 9831
)
"src/write.ml" 324 9981 9994 "src/write.ml" 324 9981 10005
type(
  int
)
"src/write.ml" 324 9981 10006 "src/write.ml" 324 9981 10007
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( * )
)
"src/write.ml" 324 9981 10008 "src/write.ml" 324 9981 10009
type(
  int
)
"src/write.ml" 324 9981 9994 "src/write.ml" 324 9981 10009
type(
  int
)
"src/write.ml" 325 10013 10019 "src/write.ml" 325 10013 10023
type(
  int
)
ident(
  def next "src/write.ml" 326 10040 10042 "src/write.ml" 328 10147 10153
)
"src/write.ml" 325 10013 10026 "src/write.ml" 325 10013 10029
type(
  int
)
ident(
  int_ref pos "src/write.ml" 323 9916 9922 "src/write.ml" 323 9916 9925
)
"src/write.ml" 325 10013 10030 "src/write.ml" 325 10013 10031
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 325 10013 10032 "src/write.ml" 325 10013 10036
type(
  int
)
ident(
  int_ref size "src/write.ml" 324 9981 9987 "src/write.ml" 324 9981 9991
)
"src/write.ml" 325 10013 10026 "src/write.ml" 325 10013 10036
type(
  int
)
"src/write.ml" 326 10040 10042 "src/write.ml" 326 10040 10052
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 326 10040 10053 "src/write.ml" 326 10040 10056
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 319 9752 9778 "src/write.ml" 319 9752 9781
)
"src/write.ml" 326 10040 10057 "src/write.ml" 326 10040 10061
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 325 10013 10019 "src/write.ml" 325 10013 10023
)
"src/write.ml" 326 10040 10042 "src/write.ml" 326 10040 10061
call(
  stack
)
type(
  unit
)
"src/write.ml" 327 10063 10065 "src/write.ml" 327 10063 10080
type(
  src_pos:int ->
  src:Common.buf -> dst_pos:int -> dst:Common.buf -> len:int -> unit
)
ident(
  ext_ref Common.unsafe_blit_buf
)
"src/write.ml" 327 10063 10087 "src/write.ml" 327 10063 10099
type(
  Common.mat64 -> Common.buf
)
ident(
  int_ref buf_of_mat64 "src/write.ml" 284 8622 8622 "src/write.ml" 284 8622 8672
)
"src/write.ml" 327 10063 10100 "src/write.ml" 327 10063 10101
type(
  Common.mat64
)
ident(
  int_ref m "src/write.ml" 319 9752 9787 "src/write.ml" 319 9752 9788
)
"src/write.ml" 327 10063 10086 "src/write.ml" 327 10063 10102
type(
  Common.buf
)
"src/write.ml" 327 10063 10112 "src/write.ml" 327 10063 10113
type(
  int
)
"src/write.ml" 327 10063 10119 "src/write.ml" 327 10063 10122
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 319 9752 9778 "src/write.ml" 319 9752 9781
)
"src/write.ml" 327 10063 10132 "src/write.ml" 327 10063 10135
type(
  int
)
ident(
  int_ref pos "src/write.ml" 323 9916 9922 "src/write.ml" 323 9916 9925
)
"src/write.ml" 327 10063 10141 "src/write.ml" 327 10063 10145
type(
  int
)
ident(
  int_ref size "src/write.ml" 324 9981 9987 "src/write.ml" 324 9981 9991
)
"src/write.ml" 327 10063 10065 "src/write.ml" 327 10063 10145
type(
  unit
)
"src/write.ml" 328 10147 10149 "src/write.ml" 328 10147 10153
type(
  int
)
ident(
  int_ref next "src/write.ml" 325 10013 10019 "src/write.ml" 325 10013 10023
)
"src/write.ml" 327 10063 10065 "src/write.ml" 328 10147 10153
type(
  int
)
"src/write.ml" 326 10040 10042 "src/write.ml" 328 10147 10153
type(
  int
)
"src/write.ml" 325 10013 10015 "src/write.ml" 328 10147 10153
type(
  int
)
"src/write.ml" 324 9981 9983 "src/write.ml" 328 10147 10153
type(
  int
)
"src/write.ml" 323 9916 9918 "src/write.ml" 328 10147 10153
type(
  int
)
"src/write.ml" 322 9851 9853 "src/write.ml" 328 10147 10153
type(
  int
)
"src/write.ml" 321 9821 9823 "src/write.ml" 328 10147 10153
type(
  int
)
"src/write.ml" 320 9791 9793 "src/write.ml" 328 10147 10153
type(
  int
)
"src/write.ml" 330 10155 10159 "src/write.ml" 330 10155 10172
type(
  Common.buf -> pos:Common.pos -> Common.mat64 -> int
)
ident(
  def bin_write_mat "src/write.ml" 332 10198 10198 "src/write.ml" 1 0 -1
)
"src/write.ml" 330 10155 10175 "src/write.ml" 330 10155 10196
type(
  Common.buf -> pos:Common.pos -> Common.mat64 -> int
)
ident(
  int_ref bin_write_float64_mat "src/write.ml" 319 9752 9756 "src/write.ml" 319 9752 9777
)
"src/write.ml" 332 10198 10202 "src/write.ml" 332 10198 10221
type(
  Common.buf -> pos:Common.pos -> Common.buf -> int
)
ident(
  def bin_write_bigstring "src/write.ml" 341 10467 10467 "src/write.ml" 1 0 -1
)
"src/write.ml" 332 10198 10222 "src/write.ml" 332 10198 10225
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 332 10198 10226 "src/write.ml" 339 10459 10465
)
"src/write.ml" 332 10198 10227 "src/write.ml" 332 10198 10230
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 332 10198 10231 "src/write.ml" 339 10459 10465
)
"src/write.ml" 332 10198 10231 "src/write.ml" 332 10198 10232
type(
  Common.buf
)
ident(
  def s "src/write.ml" 333 10235 10237 "src/write.ml" 339 10459 10465
)
"src/write.ml" 333 10235 10241 "src/write.ml" 333 10235 10244
type(
  int
)
ident(
  def len "src/write.ml" 334 10263 10265 "src/write.ml" 339 10459 10465
)
"src/write.ml" 333 10235 10247 "src/write.ml" 333 10235 10257
type(
  Common.buf -> int
)
ident(
  ext_ref Bigarray.Array1.dim
)
"src/write.ml" 333 10235 10258 "src/write.ml" 333 10235 10259
type(
  Common.buf
)
ident(
  int_ref s "src/write.ml" 332 10198 10231 "src/write.ml" 332 10198 10232
)
"src/write.ml" 333 10235 10247 "src/write.ml" 333 10235 10259
type(
  int
)
"src/write.ml" 334 10263 10269 "src/write.ml" 334 10263 10273
type(
  Nat0.t
)
ident(
  def plen "src/write.ml" 335 10302 10304 "src/write.ml" 339 10459 10465
)
"src/write.ml" 334 10263 10276 "src/write.ml" 334 10263 10294
type(
  int -> Nat0.t
)
ident(
  ext_ref Nat0.unsafe_of_int
)
"src/write.ml" 334 10263 10295 "src/write.ml" 334 10263 10298
type(
  int
)
ident(
  int_ref len "src/write.ml" 333 10235 10241 "src/write.ml" 333 10235 10244
)
"src/write.ml" 334 10263 10276 "src/write.ml" 334 10263 10298
type(
  Nat0.t
)
"src/write.ml" 335 10302 10308 "src/write.ml" 335 10302 10311
type(
  int
)
ident(
  def pos "src/write.ml" 336 10346 10348 "src/write.ml" 339 10459 10465
)
"src/write.ml" 335 10302 10314 "src/write.ml" 335 10302 10328
type(
  Common.buf -> pos:Common.pos -> Nat0.t -> int
)
ident(
  int_ref bin_write_nat0 "src/write.ml" 135 3920 3924 "src/write.ml" 135 3920 3938
)
"src/write.ml" 335 10302 10329 "src/write.ml" 335 10302 10332
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 332 10198 10222 "src/write.ml" 332 10198 10225
)
"src/write.ml" 335 10302 10334 "src/write.ml" 335 10302 10337
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 332 10198 10227 "src/write.ml" 332 10198 10230
)
"src/write.ml" 335 10302 10338 "src/write.ml" 335 10302 10342
type(
  Nat0.t
)
ident(
  int_ref plen "src/write.ml" 334 10263 10269 "src/write.ml" 334 10263 10273
)
"src/write.ml" 335 10302 10314 "src/write.ml" 335 10302 10342
call(
  stack
)
type(
  int
)
"src/write.ml" 336 10346 10352 "src/write.ml" 336 10346 10356
type(
  int
)
ident(
  def next "src/write.ml" 337 10372 10374 "src/write.ml" 339 10459 10465
)
"src/write.ml" 336 10346 10359 "src/write.ml" 336 10346 10362
type(
  int
)
ident(
  int_ref pos "src/write.ml" 335 10302 10308 "src/write.ml" 335 10302 10311
)
"src/write.ml" 336 10346 10363 "src/write.ml" 336 10346 10364
type(
  int -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 336 10346 10365 "src/write.ml" 336 10346 10368
type(
  int
)
ident(
  int_ref len "src/write.ml" 333 10235 10241 "src/write.ml" 333 10235 10244
)
"src/write.ml" 336 10346 10359 "src/write.ml" 336 10346 10368
type(
  int
)
"src/write.ml" 337 10372 10374 "src/write.ml" 337 10372 10384
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 337 10372 10385 "src/write.ml" 337 10372 10388
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 332 10198 10222 "src/write.ml" 332 10198 10225
)
"src/write.ml" 337 10372 10389 "src/write.ml" 337 10372 10393
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 336 10346 10352 "src/write.ml" 336 10346 10356
)
"src/write.ml" 337 10372 10374 "src/write.ml" 337 10372 10393
call(
  stack
)
type(
  unit
)
"src/write.ml" 338 10395 10397 "src/write.ml" 338 10395 10412
type(
  src_pos:int ->
  src:Common.buf -> dst_pos:int -> dst:Common.buf -> len:int -> unit
)
ident(
  ext_ref Common.unsafe_blit_buf
)
"src/write.ml" 338 10395 10418 "src/write.ml" 338 10395 10419
type(
  Common.buf
)
ident(
  int_ref s "src/write.ml" 332 10198 10231 "src/write.ml" 332 10198 10232
)
"src/write.ml" 338 10395 10429 "src/write.ml" 338 10395 10430
type(
  int
)
"src/write.ml" 338 10395 10436 "src/write.ml" 338 10395 10439
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 332 10198 10222 "src/write.ml" 332 10198 10225
)
"src/write.ml" 338 10395 10449 "src/write.ml" 338 10395 10452
type(
  int
)
ident(
  int_ref pos "src/write.ml" 335 10302 10308 "src/write.ml" 335 10302 10311
)
"src/write.ml" 338 10395 10454 "src/write.ml" 338 10395 10457
type(
  int
)
ident(
  int_ref len "src/write.ml" 333 10235 10241 "src/write.ml" 333 10235 10244
)
"src/write.ml" 338 10395 10397 "src/write.ml" 338 10395 10457
type(
  unit
)
"src/write.ml" 339 10459 10461 "src/write.ml" 339 10459 10465
type(
  int
)
ident(
  int_ref next "src/write.ml" 336 10346 10352 "src/write.ml" 336 10346 10356
)
"src/write.ml" 338 10395 10397 "src/write.ml" 339 10459 10465
type(
  int
)
"src/write.ml" 337 10372 10374 "src/write.ml" 339 10459 10465
type(
  int
)
"src/write.ml" 336 10346 10348 "src/write.ml" 339 10459 10465
type(
  int
)
"src/write.ml" 335 10302 10304 "src/write.ml" 339 10459 10465
type(
  int
)
"src/write.ml" 334 10263 10265 "src/write.ml" 339 10459 10465
type(
  int
)
"src/write.ml" 333 10235 10237 "src/write.ml" 339 10459 10465
type(
  int
)
"src/write.ml" 341 10467 10471 "src/write.ml" 341 10467 10492
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  def bin_write_variant_int "src/write.ml" 348 10660 10660 "src/write.ml" 1 0 -1
)
"src/write.ml" 341 10467 10493 "src/write.ml" 341 10467 10496
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 341 10467 10497 "src/write.ml" 346 10652 10658
)
"src/write.ml" 341 10467 10498 "src/write.ml" 341 10467 10501
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 341 10467 10502 "src/write.ml" 346 10652 10658
)
"src/write.ml" 341 10467 10502 "src/write.ml" 341 10467 10503
type(
  int
)
ident(
  def x "src/write.ml" 342 10506 10508 "src/write.ml" 346 10652 10658
)
"src/write.ml" 342 10506 10508 "src/write.ml" 342 10506 10518
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 342 10506 10519 "src/write.ml" 342 10506 10522
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 341 10467 10498 "src/write.ml" 341 10467 10501
)
"src/write.ml" 342 10506 10508 "src/write.ml" 342 10506 10522
call(
  stack
)
type(
  unit
)
"src/write.ml" 343 10524 10530 "src/write.ml" 343 10524 10534
type(
  int
)
ident(
  def next "src/write.ml" 344 10548 10550 "src/write.ml" 346 10652 10658
)
"src/write.ml" 343 10524 10537 "src/write.ml" 343 10524 10540
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 341 10467 10498 "src/write.ml" 341 10467 10501
)
"src/write.ml" 343 10524 10541 "src/write.ml" 343 10524 10542
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 343 10524 10543 "src/write.ml" 343 10524 10544
type(
  int
)
"src/write.ml" 343 10524 10537 "src/write.ml" 343 10524 10544
type(
  int
)
"src/write.ml" 344 10548 10550 "src/write.ml" 344 10548 10560
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 344 10548 10561 "src/write.ml" 344 10548 10564
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 341 10467 10493 "src/write.ml" 341 10467 10496
)
"src/write.ml" 344 10548 10565 "src/write.ml" 344 10548 10569
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 343 10524 10530 "src/write.ml" 343 10524 10534
)
"src/write.ml" 344 10548 10550 "src/write.ml" 344 10548 10569
call(
  stack
)
type(
  unit
)
"src/write.ml" 345 10571 10573 "src/write.ml" 345 10571 10587
type(
  Common.buf -> Common.pos -> int32 -> unit
)
ident(
  int_ref unsafe_set32le "src/write.ml" 51 1912 1916 "src/write.ml" 51 1912 1930
)
"src/write.ml" 345 10571 10588 "src/write.ml" 345 10571 10591
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 341 10467 10493 "src/write.ml" 341 10467 10496
)
"src/write.ml" 345 10571 10592 "src/write.ml" 345 10571 10595
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 341 10467 10498 "src/write.ml" 341 10467 10501
)
"src/write.ml" 345 10571 10597 "src/write.ml" 345 10571 10608
type(
  int32 -> int32 -> int32
)
ident(
  ext_ref Int32.logor
)
"src/write.ml" 345 10571 10610 "src/write.ml" 345 10571 10626
type(
  int32 -> int -> int32
)
ident(
  ext_ref Int32.shift_left
)
"src/write.ml" 345 10571 10628 "src/write.ml" 345 10571 10640
type(
  int -> int32
)
ident(
  ext_ref Int32.of_int
)
"src/write.ml" 345 10571 10641 "src/write.ml" 345 10571 10642
type(
  int
)
ident(
  int_ref x "src/write.ml" 341 10467 10502 "src/write.ml" 341 10467 10503
)
"src/write.ml" 345 10571 10627 "src/write.ml" 345 10571 10643
type(
  int32
)
"src/write.ml" 345 10571 10644 "src/write.ml" 345 10571 10645
type(
  int
)
"src/write.ml" 345 10571 10609 "src/write.ml" 345 10571 10646
type(
  int32
)
"src/write.ml" 345 10571 10647 "src/write.ml" 345 10571 10649
type(
  int32
)
"src/write.ml" 345 10571 10596 "src/write.ml" 345 10571 10650
type(
  int32
)
"src/write.ml" 345 10571 10573 "src/write.ml" 345 10571 10650
call(
  stack
)
type(
  unit
)
"src/write.ml" 346 10652 10654 "src/write.ml" 346 10652 10658
type(
  int
)
ident(
  int_ref next "src/write.ml" 343 10524 10530 "src/write.ml" 343 10524 10534
)
"src/write.ml" 345 10571 10573 "src/write.ml" 346 10652 10658
type(
  int
)
"src/write.ml" 344 10548 10550 "src/write.ml" 346 10652 10658
type(
  int
)
"src/write.ml" 343 10524 10526 "src/write.ml" 346 10652 10658
type(
  int
)
"src/write.ml" 342 10506 10508 "src/write.ml" 346 10652 10658
type(
  int
)
"src/write.ml" 348 10660 10664 "src/write.ml" 348 10660 10682
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  def bin_write_int_8bit "src/write.ml" 354 10771 10771 "src/write.ml" 1 0 -1
)
"src/write.ml" 348 10660 10683 "src/write.ml" 348 10660 10686
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 348 10660 10687 "src/write.ml" 352 10760 10769
)
"src/write.ml" 348 10660 10688 "src/write.ml" 348 10660 10691
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 348 10660 10692 "src/write.ml" 352 10760 10769
)
"src/write.ml" 348 10660 10692 "src/write.ml" 348 10660 10693
type(
  int
)
ident(
  def n "src/write.ml" 349 10696 10698 "src/write.ml" 352 10760 10769
)
"src/write.ml" 349 10696 10698 "src/write.ml" 349 10696 10708
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 349 10696 10709 "src/write.ml" 349 10696 10712
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 348 10660 10688 "src/write.ml" 348 10660 10691
)
"src/write.ml" 349 10696 10698 "src/write.ml" 349 10696 10712
call(
  stack
)
type(
  unit
)
"src/write.ml" 350 10714 10716 "src/write.ml" 350 10714 10725
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_pos
)
"src/write.ml" 350 10714 10726 "src/write.ml" 350 10714 10729
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 348 10660 10683 "src/write.ml" 348 10660 10686
)
"src/write.ml" 350 10714 10730 "src/write.ml" 350 10714 10733
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 348 10660 10688 "src/write.ml" 348 10660 10691
)
"src/write.ml" 350 10714 10716 "src/write.ml" 350 10714 10733
call(
  stack
)
type(
  unit
)
"src/write.ml" 351 10735 10737 "src/write.ml" 351 10735 10748
type(
  Common.buf -> Common.pos -> int -> unit
)
ident(
  int_ref unsafe_set8 "src/write.ml" 18 862 862 "src/write.ml" 18 862 936
)
"src/write.ml" 351 10735 10749 "src/write.ml" 351 10735 10752
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 348 10660 10683 "src/write.ml" 348 10660 10686
)
"src/write.ml" 351 10735 10753 "src/write.ml" 351 10735 10756
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 348 10660 10688 "src/write.ml" 348 10660 10691
)
"src/write.ml" 351 10735 10757 "src/write.ml" 351 10735 10758
type(
  int
)
ident(
  int_ref n "src/write.ml" 348 10660 10692 "src/write.ml" 348 10660 10693
)
"src/write.ml" 351 10735 10737 "src/write.ml" 351 10735 10758
type(
  unit
)
"src/write.ml" 352 10760 10762 "src/write.ml" 352 10760 10765
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 348 10660 10688 "src/write.ml" 348 10660 10691
)
"src/write.ml" 352 10760 10766 "src/write.ml" 352 10760 10767
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 352 10760 10768 "src/write.ml" 352 10760 10769
type(
  int
)
"src/write.ml" 352 10760 10762 "src/write.ml" 352 10760 10769
type(
  int
)
"src/write.ml" 351 10735 10737 "src/write.ml" 352 10760 10769
type(
  int
)
"src/write.ml" 350 10714 10716 "src/write.ml" 352 10760 10769
type(
  int
)
"src/write.ml" 349 10696 10698 "src/write.ml" 352 10760 10769
type(
  int
)
"src/write.ml" 354 10771 10775 "src/write.ml" 354 10771 10794
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  def bin_write_int_16bit "src/write.ml" 361 10909 10909 "src/write.ml" 1 0 -1
)
"src/write.ml" 354 10771 10795 "src/write.ml" 354 10771 10798
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 354 10771 10799 "src/write.ml" 359 10901 10907
)
"src/write.ml" 354 10771 10800 "src/write.ml" 354 10771 10803
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 354 10771 10804 "src/write.ml" 359 10901 10907
)
"src/write.ml" 354 10771 10804 "src/write.ml" 354 10771 10805
type(
  int
)
ident(
  def n "src/write.ml" 355 10808 10810 "src/write.ml" 359 10901 10907
)
"src/write.ml" 355 10808 10810 "src/write.ml" 355 10808 10820
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 355 10808 10821 "src/write.ml" 355 10808 10824
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 354 10771 10800 "src/write.ml" 354 10771 10803
)
"src/write.ml" 355 10808 10810 "src/write.ml" 355 10808 10824
call(
  stack
)
type(
  unit
)
"src/write.ml" 356 10826 10832 "src/write.ml" 356 10826 10836
type(
  int
)
ident(
  def next "src/write.ml" 357 10850 10852 "src/write.ml" 359 10901 10907
)
"src/write.ml" 356 10826 10839 "src/write.ml" 356 10826 10842
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 354 10771 10800 "src/write.ml" 354 10771 10803
)
"src/write.ml" 356 10826 10843 "src/write.ml" 356 10826 10844
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 356 10826 10845 "src/write.ml" 356 10826 10846
type(
  int
)
"src/write.ml" 356 10826 10839 "src/write.ml" 356 10826 10846
type(
  int
)
"src/write.ml" 357 10850 10852 "src/write.ml" 357 10850 10862
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 357 10850 10863 "src/write.ml" 357 10850 10866
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 354 10771 10795 "src/write.ml" 354 10771 10798
)
"src/write.ml" 357 10850 10867 "src/write.ml" 357 10850 10871
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 356 10826 10832 "src/write.ml" 356 10826 10836
)
"src/write.ml" 357 10850 10852 "src/write.ml" 357 10850 10871
call(
  stack
)
type(
  unit
)
"src/write.ml" 358 10873 10875 "src/write.ml" 358 10873 10889
type(
  Common.buf -> Common.pos -> int -> unit
)
ident(
  int_ref unsafe_set16le "src/write.ml" 46 1787 1791 "src/write.ml" 46 1787 1805
)
"src/write.ml" 358 10873 10890 "src/write.ml" 358 10873 10893
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 354 10771 10795 "src/write.ml" 354 10771 10798
)
"src/write.ml" 358 10873 10894 "src/write.ml" 358 10873 10897
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 354 10771 10800 "src/write.ml" 354 10771 10803
)
"src/write.ml" 358 10873 10898 "src/write.ml" 358 10873 10899
type(
  int
)
ident(
  int_ref n "src/write.ml" 354 10771 10804 "src/write.ml" 354 10771 10805
)
"src/write.ml" 358 10873 10875 "src/write.ml" 358 10873 10899
call(
  stack
)
type(
  unit
)
"src/write.ml" 359 10901 10903 "src/write.ml" 359 10901 10907
type(
  int
)
ident(
  int_ref next "src/write.ml" 356 10826 10832 "src/write.ml" 356 10826 10836
)
"src/write.ml" 358 10873 10875 "src/write.ml" 359 10901 10907
type(
  int
)
"src/write.ml" 357 10850 10852 "src/write.ml" 359 10901 10907
type(
  int
)
"src/write.ml" 356 10826 10828 "src/write.ml" 359 10901 10907
type(
  int
)
"src/write.ml" 355 10808 10810 "src/write.ml" 359 10901 10907
type(
  int
)
"src/write.ml" 361 10909 10913 "src/write.ml" 361 10909 10932
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  def bin_write_int_32bit "src/write.ml" 368 11062 11062 "src/write.ml" 1 0 -1
)
"src/write.ml" 361 10909 10933 "src/write.ml" 361 10909 10936
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 361 10909 10937 "src/write.ml" 366 11054 11060
)
"src/write.ml" 361 10909 10938 "src/write.ml" 361 10909 10941
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 361 10909 10942 "src/write.ml" 366 11054 11060
)
"src/write.ml" 361 10909 10942 "src/write.ml" 361 10909 10943
type(
  int
)
ident(
  def n "src/write.ml" 362 10946 10948 "src/write.ml" 366 11054 11060
)
"src/write.ml" 362 10946 10948 "src/write.ml" 362 10946 10958
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 362 10946 10959 "src/write.ml" 362 10946 10962
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 361 10909 10938 "src/write.ml" 361 10909 10941
)
"src/write.ml" 362 10946 10948 "src/write.ml" 362 10946 10962
call(
  stack
)
type(
  unit
)
"src/write.ml" 363 10964 10970 "src/write.ml" 363 10964 10974
type(
  int
)
ident(
  def next "src/write.ml" 364 10988 10990 "src/write.ml" 366 11054 11060
)
"src/write.ml" 363 10964 10977 "src/write.ml" 363 10964 10980
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 361 10909 10938 "src/write.ml" 361 10909 10941
)
"src/write.ml" 363 10964 10981 "src/write.ml" 363 10964 10982
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 363 10964 10983 "src/write.ml" 363 10964 10984
type(
  int
)
"src/write.ml" 363 10964 10977 "src/write.ml" 363 10964 10984
type(
  int
)
"src/write.ml" 364 10988 10990 "src/write.ml" 364 10988 11000
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 364 10988 11001 "src/write.ml" 364 10988 11004
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 361 10909 10933 "src/write.ml" 361 10909 10936
)
"src/write.ml" 364 10988 11005 "src/write.ml" 364 10988 11009
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 363 10964 10970 "src/write.ml" 363 10964 10974
)
"src/write.ml" 364 10988 10990 "src/write.ml" 364 10988 11009
call(
  stack
)
type(
  unit
)
"src/write.ml" 365 11011 11013 "src/write.ml" 365 11011 11027
type(
  Common.buf -> Common.pos -> int32 -> unit
)
ident(
  int_ref unsafe_set32le "src/write.ml" 51 1912 1916 "src/write.ml" 51 1912 1930
)
"src/write.ml" 365 11011 11028 "src/write.ml" 365 11011 11031
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 361 10909 10933 "src/write.ml" 361 10909 10936
)
"src/write.ml" 365 11011 11032 "src/write.ml" 365 11011 11035
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 361 10909 10938 "src/write.ml" 361 10909 10941
)
"src/write.ml" 365 11011 11037 "src/write.ml" 365 11011 11049
type(
  int -> int32
)
ident(
  ext_ref Int32.of_int
)
"src/write.ml" 365 11011 11050 "src/write.ml" 365 11011 11051
type(
  int
)
ident(
  int_ref n "src/write.ml" 361 10909 10942 "src/write.ml" 361 10909 10943
)
"src/write.ml" 365 11011 11036 "src/write.ml" 365 11011 11052
type(
  int32
)
"src/write.ml" 365 11011 11013 "src/write.ml" 365 11011 11052
call(
  stack
)
type(
  unit
)
"src/write.ml" 366 11054 11056 "src/write.ml" 366 11054 11060
type(
  int
)
ident(
  int_ref next "src/write.ml" 363 10964 10970 "src/write.ml" 363 10964 10974
)
"src/write.ml" 365 11011 11013 "src/write.ml" 366 11054 11060
type(
  int
)
"src/write.ml" 364 10988 10990 "src/write.ml" 366 11054 11060
type(
  int
)
"src/write.ml" 363 10964 10966 "src/write.ml" 366 11054 11060
type(
  int
)
"src/write.ml" 362 10946 10948 "src/write.ml" 366 11054 11060
type(
  int
)
"src/write.ml" 368 11062 11066 "src/write.ml" 368 11062 11085
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  def bin_write_int_64bit "src/write.ml" 375 11215 11215 "src/write.ml" 1 0 -1
)
"src/write.ml" 368 11062 11086 "src/write.ml" 368 11062 11089
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 368 11062 11090 "src/write.ml" 373 11207 11213
)
"src/write.ml" 368 11062 11091 "src/write.ml" 368 11062 11094
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 368 11062 11095 "src/write.ml" 373 11207 11213
)
"src/write.ml" 368 11062 11095 "src/write.ml" 368 11062 11096
type(
  int
)
ident(
  def n "src/write.ml" 369 11099 11101 "src/write.ml" 373 11207 11213
)
"src/write.ml" 369 11099 11101 "src/write.ml" 369 11099 11111
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 369 11099 11112 "src/write.ml" 369 11099 11115
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 368 11062 11091 "src/write.ml" 368 11062 11094
)
"src/write.ml" 369 11099 11101 "src/write.ml" 369 11099 11115
call(
  stack
)
type(
  unit
)
"src/write.ml" 370 11117 11123 "src/write.ml" 370 11117 11127
type(
  int
)
ident(
  def next "src/write.ml" 371 11141 11143 "src/write.ml" 373 11207 11213
)
"src/write.ml" 370 11117 11130 "src/write.ml" 370 11117 11133
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 368 11062 11091 "src/write.ml" 368 11062 11094
)
"src/write.ml" 370 11117 11134 "src/write.ml" 370 11117 11135
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 370 11117 11136 "src/write.ml" 370 11117 11137
type(
  int
)
"src/write.ml" 370 11117 11130 "src/write.ml" 370 11117 11137
type(
  int
)
"src/write.ml" 371 11141 11143 "src/write.ml" 371 11141 11153
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 371 11141 11154 "src/write.ml" 371 11141 11157
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 368 11062 11086 "src/write.ml" 368 11062 11089
)
"src/write.ml" 371 11141 11158 "src/write.ml" 371 11141 11162
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 370 11117 11123 "src/write.ml" 370 11117 11127
)
"src/write.ml" 371 11141 11143 "src/write.ml" 371 11141 11162
call(
  stack
)
type(
  unit
)
"src/write.ml" 372 11164 11166 "src/write.ml" 372 11164 11180
type(
  Common.buf -> Common.pos -> int64 -> unit
)
ident(
  int_ref unsafe_set64le "src/write.ml" 56 2037 2041 "src/write.ml" 56 2037 2055
)
"src/write.ml" 372 11164 11181 "src/write.ml" 372 11164 11184
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 368 11062 11086 "src/write.ml" 368 11062 11089
)
"src/write.ml" 372 11164 11185 "src/write.ml" 372 11164 11188
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 368 11062 11091 "src/write.ml" 368 11062 11094
)
"src/write.ml" 372 11164 11190 "src/write.ml" 372 11164 11202
type(
  int -> int64
)
ident(
  ext_ref Int64.of_int
)
"src/write.ml" 372 11164 11203 "src/write.ml" 372 11164 11204
type(
  int
)
ident(
  int_ref n "src/write.ml" 368 11062 11095 "src/write.ml" 368 11062 11096
)
"src/write.ml" 372 11164 11189 "src/write.ml" 372 11164 11205
type(
  int64
)
"src/write.ml" 372 11164 11166 "src/write.ml" 372 11164 11205
call(
  stack
)
type(
  unit
)
"src/write.ml" 373 11207 11209 "src/write.ml" 373 11207 11213
type(
  int
)
ident(
  int_ref next "src/write.ml" 370 11117 11123 "src/write.ml" 370 11117 11127
)
"src/write.ml" 372 11164 11166 "src/write.ml" 373 11207 11213
type(
  int
)
"src/write.ml" 371 11141 11143 "src/write.ml" 373 11207 11213
type(
  int
)
"src/write.ml" 370 11117 11119 "src/write.ml" 373 11207 11213
type(
  int
)
"src/write.ml" 369 11099 11101 "src/write.ml" 373 11207 11213
type(
  int
)
"src/write.ml" 375 11215 11219 "src/write.ml" 375 11215 11239
type(
  Common.buf -> pos:Common.pos -> int64 -> int
)
ident(
  def bin_write_int64_bits "src/write.ml" 382 11354 11354 "src/write.ml" 1 0 -1
)
"src/write.ml" 375 11215 11240 "src/write.ml" 375 11215 11243
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 375 11215 11244 "src/write.ml" 380 11346 11352
)
"src/write.ml" 375 11215 11245 "src/write.ml" 375 11215 11248
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 375 11215 11249 "src/write.ml" 380 11346 11352
)
"src/write.ml" 375 11215 11249 "src/write.ml" 375 11215 11250
type(
  int64
)
ident(
  def n "src/write.ml" 376 11253 11255 "src/write.ml" 380 11346 11352
)
"src/write.ml" 376 11253 11255 "src/write.ml" 376 11253 11265
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 376 11253 11266 "src/write.ml" 376 11253 11269
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 375 11215 11245 "src/write.ml" 375 11215 11248
)
"src/write.ml" 376 11253 11255 "src/write.ml" 376 11253 11269
call(
  stack
)
type(
  unit
)
"src/write.ml" 377 11271 11277 "src/write.ml" 377 11271 11281
type(
  int
)
ident(
  def next "src/write.ml" 378 11295 11297 "src/write.ml" 380 11346 11352
)
"src/write.ml" 377 11271 11284 "src/write.ml" 377 11271 11287
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 375 11215 11245 "src/write.ml" 375 11215 11248
)
"src/write.ml" 377 11271 11288 "src/write.ml" 377 11271 11289
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 377 11271 11290 "src/write.ml" 377 11271 11291
type(
  int
)
"src/write.ml" 377 11271 11284 "src/write.ml" 377 11271 11291
type(
  int
)
"src/write.ml" 378 11295 11297 "src/write.ml" 378 11295 11307
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 378 11295 11308 "src/write.ml" 378 11295 11311
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 375 11215 11240 "src/write.ml" 375 11215 11243
)
"src/write.ml" 378 11295 11312 "src/write.ml" 378 11295 11316
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 377 11271 11277 "src/write.ml" 377 11271 11281
)
"src/write.ml" 378 11295 11297 "src/write.ml" 378 11295 11316
call(
  stack
)
type(
  unit
)
"src/write.ml" 379 11318 11320 "src/write.ml" 379 11318 11334
type(
  Common.buf -> Common.pos -> int64 -> unit
)
ident(
  int_ref unsafe_set64le "src/write.ml" 56 2037 2041 "src/write.ml" 56 2037 2055
)
"src/write.ml" 379 11318 11335 "src/write.ml" 379 11318 11338
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 375 11215 11240 "src/write.ml" 375 11215 11243
)
"src/write.ml" 379 11318 11339 "src/write.ml" 379 11318 11342
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 375 11215 11245 "src/write.ml" 375 11215 11248
)
"src/write.ml" 379 11318 11343 "src/write.ml" 379 11318 11344
type(
  int64
)
ident(
  int_ref n "src/write.ml" 375 11215 11249 "src/write.ml" 375 11215 11250
)
"src/write.ml" 379 11318 11320 "src/write.ml" 379 11318 11344
call(
  stack
)
type(
  unit
)
"src/write.ml" 380 11346 11348 "src/write.ml" 380 11346 11352
type(
  int
)
ident(
  int_ref next "src/write.ml" 377 11271 11277 "src/write.ml" 377 11271 11281
)
"src/write.ml" 379 11318 11320 "src/write.ml" 380 11346 11352
type(
  int
)
"src/write.ml" 378 11295 11297 "src/write.ml" 380 11346 11352
type(
  int
)
"src/write.ml" 377 11271 11273 "src/write.ml" 380 11346 11352
type(
  int
)
"src/write.ml" 376 11253 11255 "src/write.ml" 380 11346 11352
type(
  int
)
"src/write.ml" 382 11354 11358 "src/write.ml" 382 11354 11381
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  def bin_write_network16_int "src/write.ml" 389 11496 11496 "src/write.ml" 1 0 -1
)
"src/write.ml" 382 11354 11382 "src/write.ml" 382 11354 11385
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 382 11354 11386 "src/write.ml" 387 11488 11494
)
"src/write.ml" 382 11354 11387 "src/write.ml" 382 11354 11390
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 382 11354 11391 "src/write.ml" 387 11488 11494
)
"src/write.ml" 382 11354 11391 "src/write.ml" 382 11354 11392
type(
  int
)
ident(
  def n "src/write.ml" 383 11395 11397 "src/write.ml" 387 11488 11494
)
"src/write.ml" 383 11395 11397 "src/write.ml" 383 11395 11407
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 383 11395 11408 "src/write.ml" 383 11395 11411
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 382 11354 11387 "src/write.ml" 382 11354 11390
)
"src/write.ml" 383 11395 11397 "src/write.ml" 383 11395 11411
call(
  stack
)
type(
  unit
)
"src/write.ml" 384 11413 11419 "src/write.ml" 384 11413 11423
type(
  int
)
ident(
  def next "src/write.ml" 385 11437 11439 "src/write.ml" 387 11488 11494
)
"src/write.ml" 384 11413 11426 "src/write.ml" 384 11413 11429
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 382 11354 11387 "src/write.ml" 382 11354 11390
)
"src/write.ml" 384 11413 11430 "src/write.ml" 384 11413 11431
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 384 11413 11432 "src/write.ml" 384 11413 11433
type(
  int
)
"src/write.ml" 384 11413 11426 "src/write.ml" 384 11413 11433
type(
  int
)
"src/write.ml" 385 11437 11439 "src/write.ml" 385 11437 11449
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 385 11437 11450 "src/write.ml" 385 11437 11453
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 382 11354 11382 "src/write.ml" 382 11354 11385
)
"src/write.ml" 385 11437 11454 "src/write.ml" 385 11437 11458
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 384 11413 11419 "src/write.ml" 384 11413 11423
)
"src/write.ml" 385 11437 11439 "src/write.ml" 385 11437 11458
call(
  stack
)
type(
  unit
)
"src/write.ml" 386 11460 11462 "src/write.ml" 386 11460 11476
type(
  Common.buf -> Common.pos -> int -> unit
)
ident(
  int_ref unsafe_set16be "src/write.ml" 30 1411 1415 "src/write.ml" 30 1411 1429
)
"src/write.ml" 386 11460 11477 "src/write.ml" 386 11460 11480
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 382 11354 11382 "src/write.ml" 382 11354 11385
)
"src/write.ml" 386 11460 11481 "src/write.ml" 386 11460 11484
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 382 11354 11387 "src/write.ml" 382 11354 11390
)
"src/write.ml" 386 11460 11485 "src/write.ml" 386 11460 11486
type(
  int
)
ident(
  int_ref n "src/write.ml" 382 11354 11391 "src/write.ml" 382 11354 11392
)
"src/write.ml" 386 11460 11462 "src/write.ml" 386 11460 11486
call(
  stack
)
type(
  unit
)
"src/write.ml" 387 11488 11490 "src/write.ml" 387 11488 11494
type(
  int
)
ident(
  int_ref next "src/write.ml" 384 11413 11419 "src/write.ml" 384 11413 11423
)
"src/write.ml" 386 11460 11462 "src/write.ml" 387 11488 11494
type(
  int
)
"src/write.ml" 385 11437 11439 "src/write.ml" 387 11488 11494
type(
  int
)
"src/write.ml" 384 11413 11415 "src/write.ml" 387 11488 11494
type(
  int
)
"src/write.ml" 383 11395 11397 "src/write.ml" 387 11488 11494
type(
  int
)
"src/write.ml" 389 11496 11500 "src/write.ml" 389 11496 11523
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  def bin_write_network32_int "src/write.ml" 396 11653 11653 "src/write.ml" 1 0 -1
)
"src/write.ml" 389 11496 11524 "src/write.ml" 389 11496 11527
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 389 11496 11528 "src/write.ml" 394 11645 11651
)
"src/write.ml" 389 11496 11529 "src/write.ml" 389 11496 11532
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 389 11496 11533 "src/write.ml" 394 11645 11651
)
"src/write.ml" 389 11496 11533 "src/write.ml" 389 11496 11534
type(
  int
)
ident(
  def n "src/write.ml" 390 11537 11539 "src/write.ml" 394 11645 11651
)
"src/write.ml" 390 11537 11539 "src/write.ml" 390 11537 11549
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 390 11537 11550 "src/write.ml" 390 11537 11553
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 389 11496 11529 "src/write.ml" 389 11496 11532
)
"src/write.ml" 390 11537 11539 "src/write.ml" 390 11537 11553
call(
  stack
)
type(
  unit
)
"src/write.ml" 391 11555 11561 "src/write.ml" 391 11555 11565
type(
  int
)
ident(
  def next "src/write.ml" 392 11579 11581 "src/write.ml" 394 11645 11651
)
"src/write.ml" 391 11555 11568 "src/write.ml" 391 11555 11571
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 389 11496 11529 "src/write.ml" 389 11496 11532
)
"src/write.ml" 391 11555 11572 "src/write.ml" 391 11555 11573
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 391 11555 11574 "src/write.ml" 391 11555 11575
type(
  int
)
"src/write.ml" 391 11555 11568 "src/write.ml" 391 11555 11575
type(
  int
)
"src/write.ml" 392 11579 11581 "src/write.ml" 392 11579 11591
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 392 11579 11592 "src/write.ml" 392 11579 11595
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 389 11496 11524 "src/write.ml" 389 11496 11527
)
"src/write.ml" 392 11579 11596 "src/write.ml" 392 11579 11600
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 391 11555 11561 "src/write.ml" 391 11555 11565
)
"src/write.ml" 392 11579 11581 "src/write.ml" 392 11579 11600
call(
  stack
)
type(
  unit
)
"src/write.ml" 393 11602 11604 "src/write.ml" 393 11602 11618
type(
  Common.buf -> Common.pos -> int32 -> unit
)
ident(
  int_ref unsafe_set32be "src/write.ml" 35 1536 1540 "src/write.ml" 35 1536 1554
)
"src/write.ml" 393 11602 11619 "src/write.ml" 393 11602 11622
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 389 11496 11524 "src/write.ml" 389 11496 11527
)
"src/write.ml" 393 11602 11623 "src/write.ml" 393 11602 11626
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 389 11496 11529 "src/write.ml" 389 11496 11532
)
"src/write.ml" 393 11602 11628 "src/write.ml" 393 11602 11640
type(
  int -> int32
)
ident(
  ext_ref Int32.of_int
)
"src/write.ml" 393 11602 11641 "src/write.ml" 393 11602 11642
type(
  int
)
ident(
  int_ref n "src/write.ml" 389 11496 11533 "src/write.ml" 389 11496 11534
)
"src/write.ml" 393 11602 11627 "src/write.ml" 393 11602 11643
type(
  int32
)
"src/write.ml" 393 11602 11604 "src/write.ml" 393 11602 11643
call(
  stack
)
type(
  unit
)
"src/write.ml" 394 11645 11647 "src/write.ml" 394 11645 11651
type(
  int
)
ident(
  int_ref next "src/write.ml" 391 11555 11561 "src/write.ml" 391 11555 11565
)
"src/write.ml" 393 11602 11604 "src/write.ml" 394 11645 11651
type(
  int
)
"src/write.ml" 392 11579 11581 "src/write.ml" 394 11645 11651
type(
  int
)
"src/write.ml" 391 11555 11557 "src/write.ml" 394 11645 11651
type(
  int
)
"src/write.ml" 390 11537 11539 "src/write.ml" 394 11645 11651
type(
  int
)
"src/write.ml" 396 11653 11657 "src/write.ml" 396 11653 11682
type(
  Common.buf -> pos:Common.pos -> int32 -> int
)
ident(
  def bin_write_network32_int32 "src/write.ml" 403 11797 11797 "src/write.ml" 1 0 -1
)
"src/write.ml" 396 11653 11683 "src/write.ml" 396 11653 11686
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 396 11653 11687 "src/write.ml" 401 11789 11795
)
"src/write.ml" 396 11653 11688 "src/write.ml" 396 11653 11691
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 396 11653 11692 "src/write.ml" 401 11789 11795
)
"src/write.ml" 396 11653 11692 "src/write.ml" 396 11653 11693
type(
  int32
)
ident(
  def n "src/write.ml" 397 11696 11698 "src/write.ml" 401 11789 11795
)
"src/write.ml" 397 11696 11698 "src/write.ml" 397 11696 11708
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 397 11696 11709 "src/write.ml" 397 11696 11712
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 396 11653 11688 "src/write.ml" 396 11653 11691
)
"src/write.ml" 397 11696 11698 "src/write.ml" 397 11696 11712
call(
  stack
)
type(
  unit
)
"src/write.ml" 398 11714 11720 "src/write.ml" 398 11714 11724
type(
  int
)
ident(
  def next "src/write.ml" 399 11738 11740 "src/write.ml" 401 11789 11795
)
"src/write.ml" 398 11714 11727 "src/write.ml" 398 11714 11730
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 396 11653 11688 "src/write.ml" 396 11653 11691
)
"src/write.ml" 398 11714 11731 "src/write.ml" 398 11714 11732
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 398 11714 11733 "src/write.ml" 398 11714 11734
type(
  int
)
"src/write.ml" 398 11714 11727 "src/write.ml" 398 11714 11734
type(
  int
)
"src/write.ml" 399 11738 11740 "src/write.ml" 399 11738 11750
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 399 11738 11751 "src/write.ml" 399 11738 11754
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 396 11653 11683 "src/write.ml" 396 11653 11686
)
"src/write.ml" 399 11738 11755 "src/write.ml" 399 11738 11759
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 398 11714 11720 "src/write.ml" 398 11714 11724
)
"src/write.ml" 399 11738 11740 "src/write.ml" 399 11738 11759
call(
  stack
)
type(
  unit
)
"src/write.ml" 400 11761 11763 "src/write.ml" 400 11761 11777
type(
  Common.buf -> Common.pos -> int32 -> unit
)
ident(
  int_ref unsafe_set32be "src/write.ml" 35 1536 1540 "src/write.ml" 35 1536 1554
)
"src/write.ml" 400 11761 11778 "src/write.ml" 400 11761 11781
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 396 11653 11683 "src/write.ml" 396 11653 11686
)
"src/write.ml" 400 11761 11782 "src/write.ml" 400 11761 11785
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 396 11653 11688 "src/write.ml" 396 11653 11691
)
"src/write.ml" 400 11761 11786 "src/write.ml" 400 11761 11787
type(
  int32
)
ident(
  int_ref n "src/write.ml" 396 11653 11692 "src/write.ml" 396 11653 11693
)
"src/write.ml" 400 11761 11763 "src/write.ml" 400 11761 11787
call(
  stack
)
type(
  unit
)
"src/write.ml" 401 11789 11791 "src/write.ml" 401 11789 11795
type(
  int
)
ident(
  int_ref next "src/write.ml" 398 11714 11720 "src/write.ml" 398 11714 11724
)
"src/write.ml" 400 11761 11763 "src/write.ml" 401 11789 11795
type(
  int
)
"src/write.ml" 399 11738 11740 "src/write.ml" 401 11789 11795
type(
  int
)
"src/write.ml" 398 11714 11716 "src/write.ml" 401 11789 11795
type(
  int
)
"src/write.ml" 397 11696 11698 "src/write.ml" 401 11789 11795
type(
  int
)
"src/write.ml" 403 11797 11801 "src/write.ml" 403 11797 11824
type(
  Common.buf -> pos:Common.pos -> int -> int
)
ident(
  def bin_write_network64_int "src/write.ml" 410 11954 11954 "src/write.ml" 1 0 -1
)
"src/write.ml" 403 11797 11825 "src/write.ml" 403 11797 11828
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 403 11797 11829 "src/write.ml" 408 11946 11952
)
"src/write.ml" 403 11797 11830 "src/write.ml" 403 11797 11833
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 403 11797 11834 "src/write.ml" 408 11946 11952
)
"src/write.ml" 403 11797 11834 "src/write.ml" 403 11797 11835
type(
  int
)
ident(
  def n "src/write.ml" 404 11838 11840 "src/write.ml" 408 11946 11952
)
"src/write.ml" 404 11838 11840 "src/write.ml" 404 11838 11850
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 404 11838 11851 "src/write.ml" 404 11838 11854
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 403 11797 11830 "src/write.ml" 403 11797 11833
)
"src/write.ml" 404 11838 11840 "src/write.ml" 404 11838 11854
call(
  stack
)
type(
  unit
)
"src/write.ml" 405 11856 11862 "src/write.ml" 405 11856 11866
type(
  int
)
ident(
  def next "src/write.ml" 406 11880 11882 "src/write.ml" 408 11946 11952
)
"src/write.ml" 405 11856 11869 "src/write.ml" 405 11856 11872
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 403 11797 11830 "src/write.ml" 403 11797 11833
)
"src/write.ml" 405 11856 11873 "src/write.ml" 405 11856 11874
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 405 11856 11875 "src/write.ml" 405 11856 11876
type(
  int
)
"src/write.ml" 405 11856 11869 "src/write.ml" 405 11856 11876
type(
  int
)
"src/write.ml" 406 11880 11882 "src/write.ml" 406 11880 11892
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 406 11880 11893 "src/write.ml" 406 11880 11896
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 403 11797 11825 "src/write.ml" 403 11797 11828
)
"src/write.ml" 406 11880 11897 "src/write.ml" 406 11880 11901
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 405 11856 11862 "src/write.ml" 405 11856 11866
)
"src/write.ml" 406 11880 11882 "src/write.ml" 406 11880 11901
call(
  stack
)
type(
  unit
)
"src/write.ml" 407 11903 11905 "src/write.ml" 407 11903 11919
type(
  Common.buf -> Common.pos -> int64 -> unit
)
ident(
  int_ref unsafe_set64be "src/write.ml" 40 1661 1665 "src/write.ml" 40 1661 1679
)
"src/write.ml" 407 11903 11920 "src/write.ml" 407 11903 11923
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 403 11797 11825 "src/write.ml" 403 11797 11828
)
"src/write.ml" 407 11903 11924 "src/write.ml" 407 11903 11927
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 403 11797 11830 "src/write.ml" 403 11797 11833
)
"src/write.ml" 407 11903 11929 "src/write.ml" 407 11903 11941
type(
  int -> int64
)
ident(
  ext_ref Int64.of_int
)
"src/write.ml" 407 11903 11942 "src/write.ml" 407 11903 11943
type(
  int
)
ident(
  int_ref n "src/write.ml" 403 11797 11834 "src/write.ml" 403 11797 11835
)
"src/write.ml" 407 11903 11928 "src/write.ml" 407 11903 11944
type(
  int64
)
"src/write.ml" 407 11903 11905 "src/write.ml" 407 11903 11944
call(
  stack
)
type(
  unit
)
"src/write.ml" 408 11946 11948 "src/write.ml" 408 11946 11952
type(
  int
)
ident(
  int_ref next "src/write.ml" 405 11856 11862 "src/write.ml" 405 11856 11866
)
"src/write.ml" 407 11903 11905 "src/write.ml" 408 11946 11952
type(
  int
)
"src/write.ml" 406 11880 11882 "src/write.ml" 408 11946 11952
type(
  int
)
"src/write.ml" 405 11856 11858 "src/write.ml" 408 11946 11952
type(
  int
)
"src/write.ml" 404 11838 11840 "src/write.ml" 408 11946 11952
type(
  int
)
"src/write.ml" 410 11954 11958 "src/write.ml" 410 11954 11983
type(
  Common.buf -> pos:Common.pos -> int64 -> int
)
ident(
  def bin_write_network64_int64 "src/write.ml" 417 12098 12098 "src/write.ml" 1 0 -1
)
"src/write.ml" 410 11954 11984 "src/write.ml" 410 11954 11987
type(
  Common.buf
)
ident(
  def buf "src/write.ml" 410 11954 11988 "src/write.ml" 415 12090 12096
)
"src/write.ml" 410 11954 11989 "src/write.ml" 410 11954 11992
type(
  Common.pos
)
ident(
  def pos "src/write.ml" 410 11954 11993 "src/write.ml" 415 12090 12096
)
"src/write.ml" 410 11954 11993 "src/write.ml" 410 11954 11994
type(
  int64
)
ident(
  def n "src/write.ml" 411 11997 11999 "src/write.ml" 415 12090 12096
)
"src/write.ml" 411 11997 11999 "src/write.ml" 411 11997 12009
type(
  Common.pos -> unit
)
ident(
  ext_ref Common.assert_pos
)
"src/write.ml" 411 11997 12010 "src/write.ml" 411 11997 12013
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 410 11954 11989 "src/write.ml" 410 11954 11992
)
"src/write.ml" 411 11997 11999 "src/write.ml" 411 11997 12013
call(
  stack
)
type(
  unit
)
"src/write.ml" 412 12015 12021 "src/write.ml" 412 12015 12025
type(
  int
)
ident(
  def next "src/write.ml" 413 12039 12041 "src/write.ml" 415 12090 12096
)
"src/write.ml" 412 12015 12028 "src/write.ml" 412 12015 12031
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 410 11954 11989 "src/write.ml" 410 11954 11992
)
"src/write.ml" 412 12015 12032 "src/write.ml" 412 12015 12033
type(
  Common.pos -> int -> int
)
ident(
  ext_ref Pervasives.( + )
)
"src/write.ml" 412 12015 12034 "src/write.ml" 412 12015 12035
type(
  int
)
"src/write.ml" 412 12015 12028 "src/write.ml" 412 12015 12035
type(
  int
)
"src/write.ml" 413 12039 12041 "src/write.ml" 413 12039 12051
type(
  Common.buf -> Common.pos -> unit
)
ident(
  ext_ref Common.check_next
)
"src/write.ml" 413 12039 12052 "src/write.ml" 413 12039 12055
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 410 11954 11984 "src/write.ml" 410 11954 11987
)
"src/write.ml" 413 12039 12056 "src/write.ml" 413 12039 12060
type(
  Common.pos
)
ident(
  int_ref next "src/write.ml" 412 12015 12021 "src/write.ml" 412 12015 12025
)
"src/write.ml" 413 12039 12041 "src/write.ml" 413 12039 12060
call(
  stack
)
type(
  unit
)
"src/write.ml" 414 12062 12064 "src/write.ml" 414 12062 12078
type(
  Common.buf -> Common.pos -> int64 -> unit
)
ident(
  int_ref unsafe_set64be "src/write.ml" 40 1661 1665 "src/write.ml" 40 1661 1679
)
"src/write.ml" 414 12062 12079 "src/write.ml" 414 12062 12082
type(
  Common.buf
)
ident(
  int_ref buf "src/write.ml" 410 11954 11984 "src/write.ml" 410 11954 11987
)
"src/write.ml" 414 12062 12083 "src/write.ml" 414 12062 12086
type(
  Common.pos
)
ident(
  int_ref pos "src/write.ml" 410 11954 11989 "src/write.ml" 410 11954 11992
)
"src/write.ml" 414 12062 12087 "src/write.ml" 414 12062 12088
type(
  int64
)
ident(
  int_ref n "src/write.ml" 410 11954 11993 "src/write.ml" 410 11954 11994
)
"src/write.ml" 414 12062 12064 "src/write.ml" 414 12062 12088
call(
  stack
)
type(
  unit
)
"src/write.ml" 415 12090 12092 "src/write.ml" 415 12090 12096
type(
  int
)
ident(
  int_ref next "src/write.ml" 412 12015 12021 "src/write.ml" 412 12015 12025
)
"src/write.ml" 414 12062 12064 "src/write.ml" 415 12090 12096
type(
  int
)
"src/write.ml" 413 12039 12041 "src/write.ml" 415 12090 12096
type(
  int
)
"src/write.ml" 412 12015 12017 "src/write.ml" 415 12090 12096
type(
  int
)
"src/write.ml" 411 11997 11999 "src/write.ml" 415 12090 12096
type(
  int
)
"src/write.ml" 417 12098 12102 "src/write.ml" 417 12098 12127
type(
  ('a -> pos:'b -> 'c -> 'b) -> 'a -> pos:'b -> 'c array -> 'b
)
ident(
  def bin_write_array_no_length "src/write.ml" 418 12155 12231 "src/write.ml" 1 0 -1
)
"src/write.ml" 417 12098 12128 "src/write.ml" 417 12098 12140
type(
  'a -> pos:'b -> 'c -> 'b
)
ident(
  def bin_write_el "src/write.ml" 417 12098 12141 "src/write.ml" 418 12155 12231
)
"src/write.ml" 417 12098 12141 "src/write.ml" 417 12098 12144
type(
  'a
)
ident(
  def buf "src/write.ml" 417 12098 12145 "src/write.ml" 418 12155 12231
)
"src/write.ml" 417 12098 12146 "src/write.ml" 417 12098 12149
type(
  'b
)
ident(
  def pos "src/write.ml" 417 12098 12150 "src/write.ml" 418 12155 12231
)
"src/write.ml" 417 12098 12150 "src/write.ml" 417 12098 12152
type(
  'c array
)
ident(
  def ar "src/write.ml" 418 12155 12157 "src/write.ml" 418 12155 12231
)
"src/write.ml" 418 12155 12157 "src/write.ml" 418 12155 12177
type(
  ('a -> pos:'b -> 'c -> 'b) -> 'a -> els_pos:'b -> n:int -> 'c array -> 'b
)
ident(
  int_ref bin_write_array_loop "src/write.ml" 251 7346 7350 "src/write.ml" 251 7346 7370
)
"src/write.ml" 418 12155 12178 "src/write.ml" 418 12155 12190
type(
  'a -> pos:'b -> 'c -> 'b
)
ident(
  int_ref bin_write_el "src/write.ml" 417 12098 12128 "src/write.ml" 417 12098 12140
)
"src/write.ml" 418 12155 12191 "src/write.ml" 418 12155 12194
type(
  'a
)
ident(
  int_ref buf "src/write.ml" 417 12098 12141 "src/write.ml" 417 12098 12144
)
"src/write.ml" 418 12155 12204 "src/write.ml" 418 12155 12207
type(
  'b
)
ident(
  int_ref pos "src/write.ml" 417 12098 12146 "src/write.ml" 417 12098 12149
)
"src/write.ml" 418 12155 12212 "src/write.ml" 418 12155 12224
type(
  'c array -> int
)
ident(
  ext_ref Array.length
)
"src/write.ml" 418 12155 12225 "src/write.ml" 418 12155 12227
type(
  'c array
)
ident(
  int_ref ar "src/write.ml" 417 12098 12150 "src/write.ml" 417 12098 12152
)
"src/write.ml" 418 12155 12211 "src/write.ml" 418 12155 12228
type(
  int
)
"src/write.ml" 418 12155 12229 "src/write.ml" 418 12155 12231
type(
  'c array
)
ident(
  int_ref ar "src/write.ml" 417 12098 12150 "src/write.ml" 417 12098 12152
)
"src/write.ml" 418 12155 12157 "src/write.ml" 418 12155 12231
call(
  tail
)
type(
  'b
)