diff --git a/Setup.hs b/Setup.hs --- a/Setup.hs +++ b/Setup.hs @@ -1,5 +1,4 @@ -import Distribution.ATS -import Distribution.Simple +import Language.ATS.Package -main = defaultMainWithHooks $ - atsUserHooks [ libgmp, intinf, atsPrelude [0,3,8] ] +main :: IO () +main = atsPolyglotBuild diff --git a/ats-deps/contrib/atscntrb-libgmp/CATS/gmp.cats b/ats-deps/contrib/atscntrb-libgmp/CATS/gmp.cats deleted file mode 100644 --- a/ats-deps/contrib/atscntrb-libgmp/CATS/gmp.cats +++ /dev/null @@ -1,327 +0,0 @@ -/* ****** ****** */ -// -// API in ATS for libgmp -// -/* ****** ****** */ - -/* -(* -** ATS/Postiats - Unleashing the Potential of Types! -** Copyright (C) 2011-2013 Hongwei Xi, ATS Trustful Software, Inc. -** All rights reserved -** -** Permission to use, copy, modify, and distribute this software for any -** purpose with or without fee is hereby granted, provided that the above -** copyright notice and this permission notice appear in all copies. -** -** THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES -** WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF -** MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR -** ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES -** WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN -** ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF -** OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. -*) -*/ - -/* ****** ****** */ - -/* -** Author: Hongwei Xi -** Authoremail: gmhwxiATgmailDOTcom -*/ - -/* ****** ****** */ - -#ifndef ATSCNTRB_LIBGMP_GMP_CATS -#define ATSCNTRB_LIBGMP_GMP_CATS - -/* ****** ****** */ - -#include - -/* ****** ****** */ - -typedef -__mpz_struct atscntrb_gmp_mpz ; -typedef atscntrb_gmp_mpz *ptrmpz; - -/* ****** ****** */ -// -// init/clear/realloc -// -#define atscntrb_gmp_mpz_init mpz_init -#define atscntrb_gmp_mpz_init2 mpz_init2 -#define atscntrb_gmp_mpz_clear mpz_clear -#define atscntrb_gmp_mpz_realloc2 mpz_realloc2 -// -/* ****** ****** */ -// -// get-functions -// -#define atscntrb_gmp_mpz_get_int mpz_get_si -#define atscntrb_gmp_mpz_get_uint mpz_get_ui -#define atscntrb_gmp_mpz_get_lint mpz_get_si -#define atscntrb_gmp_mpz_get_ulint mpz_get_ui -#define atscntrb_gmp_mpz_get_double mpz_get_d -#define atscntrb_gmp_mpz_get_str mpz_get_str -#define atscntrb_gmp_mpz_get_str_null(base, mpz) mpz_get_str((char*)0, base, mpz) -// -/* ****** ****** */ -// -// set-functions -// -#define atscntrb_gmp_mpz_set_int mpz_set_si -#define atscntrb_gmp_mpz_set_uint mpz_set_ui -#define atscntrb_gmp_mpz_set_lint mpz_set_si -#define atscntrb_gmp_mpz_set_ulint mpz_set_ui -#define atscntrb_gmp_mpz_set_mpz mpz_set -// -/* ****** ****** */ -// -// init-set functions -// -#define atscntrb_gmp_mpz_init_set_mpz mpz_init_set -#define atscntrb_gmp_mpz_init_set_int mpz_init_set_si -#define atscntrb_gmp_mpz_init_set_uint mpz_init_set_ui -#define atscntrb_gmp_mpz_init_set_lint mpz_init_set_si -#define atscntrb_gmp_mpz_init_set_ulint mpz_init_set_ui -// -/* ****** ****** */ - -#define atscntrb_gmp_mpz_size mpz_size - -/* ****** ****** */ -// -// input-output-functions -// -#define atscntrb_gmp_mpz_inp_str mpz_inp_str -#define atscntrb_gmp_mpz_out_str mpz_out_str -// -/* ****** ****** */ - -ATSinline() -atsvoid_t0ype -atscntrb_gmp_fprint_mpz_base -( - atstype_ref out, atstype_ptr x, atstype_int base -) { - size_t ndigit ; - ndigit = mpz_out_str ((FILE*)out, base, (ptrmpz)x) ; - return ; -} // end of [atscntrb_gmp_fprint_mpz_base] - -#define atscntrb_gmp_fprint_mpz(out, x) \ - atscntrb_gmp_fprint_mpz_base(out, x, 10) - -/* ****** ****** */ -// -#define atscntrb_gmp_mpz_inp_raw mpz_inp_raw -#define atscntrb_gmp_mpz_out_raw mpz_out_raw -// -/* ****** ****** */ - -#define atscntrb_gmp_mpz_odd_p(x) mpz_odd_p((ptrmpz)x) -#define atscntrb_gmp_mpz_even_p(x) mpz_even_p((ptrmpz)x) - -/* ****** ****** */ - -#define atscntrb_gmp_mpz_neg1(x) mpz_neg(x, x) -#define atscntrb_gmp_mpz_neg2(x, y) mpz_neg(x, y) - -/* ****** ****** */ - -#define atscntrb_gmp_mpz_abs1(x) mpz_abs(x, x) -#define atscntrb_gmp_mpz_abs2(x, y) mpz_abs(x, y) - -/* ****** ****** */ -// -// addition-functions -// -ATSinline() -atsvoid_t0ype -mpz_add_si -( - mpz_t rop -, mpz_t op1, atstype_lint op2 -) -{ - if (op2 >= 0) - mpz_add_ui (rop, op1, op2) ; - else - mpz_add_ui (rop, op1, -op2) ; - // end of [if] -} /* end of [mpz_add_si] */ -// -// x := x+y // y+z -// -#define atscntrb_gmp_mpz_add2_mpz(x, y) mpz_add(x, x, y) -#define atscntrb_gmp_mpz_add2_int(x, y) mpz_add_si(x, x, y) -#define atscntrb_gmp_mpz_add2_uint(x, y) mpz_add_ui(x, x, y) -#define atscntrb_gmp_mpz_add2_lint(x, y) mpz_add_si(x, x, y) -#define atscntrb_gmp_mpz_add2_ulint(x, y) mpz_add_ui(x, x, y) -#define atscntrb_gmp_mpz_add3_mpz(x, y, z) mpz_add(x, y, z) -#define atscntrb_gmp_mpz_add3_int(x, y, z) mpz_add_si(x, y, z) -#define atscntrb_gmp_mpz_add3_uint(x, y, z) mpz_add_ui(x, y, z) -#define atscntrb_gmp_mpz_add3_lint(x, y, z) mpz_add_si(x, y, z) -#define atscntrb_gmp_mpz_add3_ulint(x, y, z) mpz_add_ui(x, y, z) -// -/* ****** ****** */ -// -// subtraction-functions -// -ATSinline() -atsvoid_t0ype -mpz_sub_si -( - mpz_t rop -, mpz_t op1, atstype_lint op2 -) -{ - if (op2 >= 0) - mpz_sub_ui (rop, op1, op2) ; - else - mpz_sub_ui (rop, op1, -op2) ; - // end of [if] -} /* end of [mpz_sub_si] */ -// -#define atscntrb_gmp_mpz_sub2_mpz(x, y) mpz_sub(x, x, y) -#define atscntrb_gmp_mpz_sub2_int(x, y) mpz_sub_si(x, x, y) -#define atscntrb_gmp_mpz_sub2_uint(x, y) mpz_sub_ui(x, x, y) -#define atscntrb_gmp_mpz_sub2_lint(x, y) mpz_sub_si(x, x, y) -#define atscntrb_gmp_mpz_sub2_ulint(x, y) mpz_sub_ui(x, x, y) -#define atscntrb_gmp_mpz_sub3_mpz(x, y, z) mpz_sub(x, y, z) -#define atscntrb_gmp_mpz_sub3_int(x, y, z) mpz_sub_si(x, y, z) -#define atscntrb_gmp_mpz_sub3_uint(x, y, z) mpz_sub_ui(x, y, z) -#define atscntrb_gmp_mpz_sub3_lint(x, y, z) mpz_sub_si(x, y, z) -#define atscntrb_gmp_mpz_sub3_ulint(x, y, z) mpz_sub_ui(x, y, z) -// -/* ****** ****** */ -// -// multiplication-functions -// -// x := x * y // y * z -// -#define atscntrb_gmp_mpz_mul2_mpz(x, y) mpz_mul(x, x, y) -#define atscntrb_gmp_mpz_mul2_int(x, y) mpz_mul_si(x, x, y) -#define atscntrb_gmp_mpz_mul2_uint(x, y) mpz_mul_ui(x, x, y) -#define atscntrb_gmp_mpz_mul2_lint(x, y) mpz_mul_si(x, x, y) -#define atscntrb_gmp_mpz_mul2_ulint(x, y) mpz_mul_ui(x, x, y) -#define atscntrb_gmp_mpz_mul3_mpz(x, y, z) mpz_mul(x, y, z) -#define atscntrb_gmp_mpz_mul3_int(x, y, z) mpz_mul_si(x, y, z) -#define atscntrb_gmp_mpz_mul3_uint(x, y, z) mpz_mul_ui(x, y, z) -#define atscntrb_gmp_mpz_mul3_lint(x, y, z) mpz_mul_si(x, y, z) -#define atscntrb_gmp_mpz_mul3_ulint(x, y, z) mpz_mul_ui(x, y, z) -// -#define atscntrb_gmp_mpz_mul3_2exp(x, y, z) mpz_mul_2exp(x, y, z) -// -/* ****** ****** */ -// -// trunc-division-functions -// -#define atscntrb_gmp_mpz_tdiv2_q_mpz(x, y) mpz_tdiv_q(x, x, y) -#define atscntrb_gmp_mpz_tdiv2_q_uint(x, y) mpz_tdiv_q_ui(x, x, y) -#define atscntrb_gmp_mpz_tdiv2_q_ulint(x, y) mpz_tdiv_q_ui(x, x, y) -#define atscntrb_gmp_mpz_tdiv3_q_mpz(x, y, z) mpz_tdiv_q(x, y, z) -#define atscntrb_gmp_mpz_tdiv3_q_uint(x, y, z) mpz_tdiv_q_ui(x, y, z) -#define atscntrb_gmp_mpz_tdiv3_q_ulint(x, y, z) mpz_tdiv_q_ui(x, y, z) -// -#define atscntrb_gmp_mpz_tdiv2_r_mpz(x, y) mpz_tdiv_r(x, x, y) -#define atscntrb_gmp_mpz_tdiv2_r_uint(x, y) mpz_tdiv_r_ui(x, x, y) -#define atscntrb_gmp_mpz_tdiv2_r_ulint(x, y) mpz_tdiv_r_ui(x, x, y) -#define atscntrb_gmp_mpz_tdiv3_r_mpz(x, y, z) mpz_tdiv_r(x, y, z) -#define atscntrb_gmp_mpz_tdiv3_r_uint(x, y, z) mpz_tdiv_r_ui(x, y, z) -#define atscntrb_gmp_mpz_tdiv3_r_ulint(x, y, z) mpz_tdiv_r_ui(x, y, z) -// -#define atscntrb_gmp_mpz_tdiv3_qr_mpz(xq, xr, y) mpz_tdiv_qr(xq, xr, xq, y) -#define atscntrb_gmp_mpz_tdiv3_qr_uint(xq, xr, y) mpz_tdiv_qr_ui(xq, xr, xq, y) -#define atscntrb_gmp_mpz_tdiv3_qr_ulint(xq, xr, y) mpz_tdiv_qr_ui(xq, xr, xq, y) -#define atscntrb_gmp_mpz_tdiv4_qr_mpz(xq, xr, y, z) mpz_tdiv_qr(xq, xr, y, z) -#define atscntrb_gmp_mpz_tdiv4_qr_uint(xq, xr, y, z) mpz_tdiv_qr_ui(xq, xr, y, z) -#define atscntrb_gmp_mpz_tdiv4_qr_ulint(xq, xr, y, z) mpz_tdiv_qr_ui(xq, xr, y, z) -// -/* ****** ****** */ -// -// floor-division-functions -// -#define atscntrb_gmp_mpz_fdiv_uint(x, y) mpz_fdiv_ui(x, y) -#define atscntrb_gmp_mpz_fdiv_ulint(x, y) mpz_fdiv_ui(x, y) -// -#define atscntrb_gmp_mpz_fdiv2_q_mpz(x, y) mpz_fdiv_q(x, x, y) -#define atscntrb_gmp_mpz_fdiv2_q_uint(x, y) mpz_fdiv_q_ui(x, x, y) -#define atscntrb_gmp_mpz_fdiv2_q_ulint(x, y) mpz_fdiv_q_ui(x, x, y) -#define atscntrb_gmp_mpz_fdiv3_q_mpz(x, y, z) mpz_fdiv_q(x, y, z) -#define atscntrb_gmp_mpz_fdiv3_q_uint(x, y, z) mpz_fdiv_q_ui(x, y, z) -#define atscntrb_gmp_mpz_fdiv3_q_ulint(x, y, z) mpz_fdiv_q_ui(x, y, z) -// -#define atscntrb_gmp_mpz_fdiv4_qr_mpz(q, r, dd, dr) mpz_fdiv_qr(q, r, dd, dr) -#define atscntrb_gmp_mpz_fdiv4_qr_ulint(q, r, dd, dr) mpz_fdiv_qr_ui(q, r, dd, dr) -// -/* ****** ****** */ -// -// ceiling-division-functions -// -#define atscntrb_gmp_mpz_cdiv_uint(x, y) mpz_cdiv_ui(x, y) -#define atscntrb_gmp_mpz_cdiv_ulint(x, y) mpz_cdiv_ui(x, y) -// -#define atscntrb_gmp_mpz_cdiv2_q_mpz(x, y) mpz_cdiv_q(x, x, y) -#define atscntrb_gmp_mpz_cdiv2_q_uint(x, y) mpz_cdiv_q_ui(x, x, y) -#define atscntrb_gmp_mpz_cdiv2_q_ulint(x, y) mpz_cdiv_q_ui(x, x, y) -#define atscntrb_gmp_mpz_cdiv3_q_mpz(x, y, z) mpz_cdiv_q(x, y, z) -#define atscntrb_gmp_mpz_cdiv3_q_uint(x, y, z) mpz_cdiv_q_ui(x, y, z) -#define atscntrb_gmp_mpz_cdiv3_q_ulint(x, y, z) mpz_cdiv_q_ui(x, y, z) -// -/* ****** ****** */ -// -// modulo-functions -// -// x := x mod y // y mod z -// -#define atscntrb_gmp_mpz_mod2_mpz(x, y) mpz_mod(x, x, y) -#define atscntrb_gmp_mpz_mod2_uint(x, y) mpz_mod_ui(x, x, y) -#define atscntrb_gmp_mpz_mod2_ulint(x, y) mpz_mod_ui(x, x, y) -#define atscntrb_gmp_mpz_mod3_mpz(x, y, z) mpz_mod(x, y, z) -#define atscntrb_gmp_mpz_mod3_uint(x, y, z) mpz_mod_ui(x, y, z) -#define atscntrb_gmp_mpz_mod3_ulint(x, y, z) mpz_mod_ui(x, y, z) -// -/* ****** ****** */ -// -#define atscntrb_gmp_mpz_addmul3_mpz(x, y, z) mpz_addmul(x, y, z) -#define atscntrb_gmp_mpz_addmul3_uint(x, y, z) mpz_addmul_ui(x, y, z) -#define atscntrb_gmp_mpz_addmul3_ulint(x, y, z) mpz_addmul_ui(x, y, z) -// -#define atscntrb_gmp_mpz_submul3_mpz(x, y, z) mpz_submul(x, y, z) -#define atscntrb_gmp_mpz_submul3_uint(x, y, z) mpz_submul_ui(x, y, z) -#define atscntrb_gmp_mpz_submul3_ulint(x, y, z) mpz_submul_ui(x, y, z) -// -/* ****** ****** */ -// -// comparison-functions -// -#define atscntrb_gmp_mpz_cmp_mpz(x, y) mpz_cmp((ptrmpz)x, y) -#define atscntrb_gmp_mpz_cmp_int(x, y) mpz_cmp_si((ptrmpz)x, y) -#define atscntrb_gmp_mpz_cmp_uint(x, y) mpz_cmp_ui((ptrmpz)x, y) -#define atscntrb_gmp_mpz_cmp_lint(x, y) mpz_cmp_si((ptrmpz)x, y) -#define atscntrb_gmp_mpz_cmp_ulint(x, y) mpz_cmp_ui((ptrmpz)x, y) -// -/* ****** ****** */ -// -// power-functions -// -#define atscntrb_gmp_mpz_pow_uint(pow, base, exp) mpz_pow_ui(pow, base, exp) -#define atscntrb_gmp_mpz_pow_ulint(pow, base, exp) mpz_pow_ui(pow, base, exp) -// -#define atscntrb_gmp_mpz_ui_pow_ui(pow, base, exp) mpz_ui_pow_ui(pow, base, exp) -// -/* ****** ****** */ -// -#define atscntrb_gmp_mpz_fib_uint(res, n) mpz_fib_ui(res, n) -#define atscntrb_gmp_mpz_fib2_uint(res1, res2, n) mpz_fib2_ui(res1, res2, n) -// -/* ****** ****** */ - -#endif // ifndef ATSCNTRB_LIBGMP_GMP_CATS - -/* ****** ****** */ - -/* end of [gmp.cats] */ diff --git a/ats-deps/prelude/ATS2-Postiats-include-0.3.8/ccomp/runtime/pats_ccomp_config.h b/ats-deps/prelude/ATS2-Postiats-include-0.3.8/ccomp/runtime/pats_ccomp_config.h deleted file mode 100644 --- a/ats-deps/prelude/ATS2-Postiats-include-0.3.8/ccomp/runtime/pats_ccomp_config.h +++ /dev/null @@ -1,49 +0,0 @@ -/* ******************************************************************* */ -/* */ -/* Applied Type System */ -/* */ -/* ******************************************************************* */ - -/* -** ATS/Postiats - Unleashing the Potential of Types! -** Copyright (C) 2011-20?? Hongwei Xi, ATS Trustful Software, Inc. -** All rights reserved -** -** ATS is free software; you can redistribute it and/or modify it under -** the terms of the GNU GENERAL PUBLIC LICENSE (GPL) as published by the -** Free Software Foundation; either version 3, or (at your option) any -** later version. -** -** ATS is distributed in the hope that it will be useful, but WITHOUT ANY -** WARRANTY; without even the implied warranty of MERCHANTABILITY or -** FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -** for more details. -** -** You should have received a copy of the GNU General Public License -** along with ATS; see the file COPYING. If not, please write to the -** Free Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA -** 02110-1301, USA. -*/ - -/* ****** ****** */ - -/* -(* Author: Hongwei Xi *) -(* Authoremail: hwxi AT cs DOT bu DOT edu *) -(* Start time: January, 2013 *) -*/ - -/* ****** ****** */ - -#ifndef PATS_CCOMP_CONFIG_H -#define PATS_CCOMP_CONFIG_H - -/* ****** ****** */ - -// HX: it is yet empty - -/* ****** ****** */ - -#endif /* PATS_CCOMP_CONFIG_H */ - -/* end of [pats_ccomp_config.h] */ diff --git a/ats-src/combinatorics-internal.dats b/ats-src/combinatorics-internal.dats --- a/ats-src/combinatorics-internal.dats +++ b/ats-src/combinatorics-internal.dats @@ -1,6 +1,5 @@ -#define ATS_MAINATSFLAG 1 - #include "share/atspre_staload.hats" +#include "contrib/atscntrb-hx-intinf/mydepies.hats" #include "contrib/atscntrb-hx-intinf/mylibies.hats" staload "contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats" diff --git a/ats-src/combinatorics.dats b/ats-src/combinatorics.dats --- a/ats-src/combinatorics.dats +++ b/ats-src/combinatorics.dats @@ -1,13 +1,7 @@ +#define ATS_MAINATSFLAG 1 + #include "share/atspre_staload.hats" #include "ats-src/combinatorics-internal.dats" - -%{^ -#define ATS_MEMALLOC_LIBC -#include "ccomp/runtime/pats_ccomp_memalloc_libc.h" -#include "ccomp/runtime/pats_ccomp_runtime_memalloc.c" -%} - -#define ATS_MAINATSFLAG 1 extern fun choose_ats {n:nat}{ m : nat | m <= n } : (int(n), int(m)) -> Intinf = diff --git a/ats-src/number-theory-internal.dats b/ats-src/number-theory-internal.dats --- a/ats-src/number-theory-internal.dats +++ b/ats-src/number-theory-internal.dats @@ -1,6 +1,7 @@ #include "share/atspre_staload.hats" -#include "ats-src/numerics-internal.dats" +#include "contrib/atscntrb-hx-intinf/mydepies.hats" #include "contrib/atscntrb-hx-intinf/mylibies.hats" +#include "ats-src/numerics-internal.dats" staload "prelude/SATS/integer.sats" staload UN = "prelude/SATS/unsafe.sats" diff --git a/ats-src/number-theory.dats b/ats-src/number-theory.dats --- a/ats-src/number-theory.dats +++ b/ats-src/number-theory.dats @@ -1,14 +1,11 @@ -#include "share/atspre_staload.hats" #include "ats-src/number-theory-internal.dats" -#define ATS_MAINATSFLAG 1 - extern -fun totient_ats { k : nat | k >= 2 } (int(k)) : int = +fun totient_ats { k : nat | k >= 2 }(int(k)) : int = "mac#" extern -fun count_divisors_ats { k : nat | k >= 2 } (int(k)) : int = +fun count_divisors_ats { k : nat | k >= 2 }(int(k)) : int = "mac#" extern diff --git a/ats-src/numerics-internal.dats b/ats-src/numerics-internal.dats --- a/ats-src/numerics-internal.dats +++ b/ats-src/numerics-internal.dats @@ -1,9 +1,3 @@ -#define ATS_MAINATSFLAG 1 - -#define ATS_EXTERN_PREFIX "atscntrb_gmp_" - -#define ATS_EXTERN_STATIC "_atscntrb_gmp_" - #include "share/atspre_staload.hats" #include "contrib/atscntrb-hx-intinf/mylibies.hats" #include "contrib/atscntrb-libgmp/mylibies.hats" diff --git a/ats-src/numerics.dats b/ats-src/numerics.dats --- a/ats-src/numerics.dats +++ b/ats-src/numerics.dats @@ -1,8 +1,7 @@ -#define ATS_MAINATSFLAG 1 +#define ATS_DYNLOADFLAG 0 #include "share/atspre_staload.hats" #include "ats-src/numerics-internal.dats" -#include "contrib/atscntrb-hx-intinf/mylibies.hats" staload "contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats" diff --git a/atspkg.dhall b/atspkg.dhall --- a/atspkg.dhall +++ b/atspkg.dhall @@ -1,7 +1,14 @@ -let pkg = https://raw.githubusercontent.com/vmchale/atspkg/master/dhall/default.dhall +let prelude = https://raw.githubusercontent.com/vmchale/atspkg/master/dhall/atspkg-prelude.dhall -in pkg // - { compiler = [0,3,8] - , version = [0,3,9] - , atsSource = [ "ats-src/combinatorics.dats", "ats-src/number-theory.dats", "ats-src/numerics.dats" ] +in prelude.default // + { libraries = + [ + prelude.lib // + { name = "storable" + , src = [ "ats-src/combinatorics.dats", "ats-src/number-theory.dats", "ats-src/numerics.dats" ] + , libTarget = "dist-newstyle/lib/libnumbertheory.a" + } + ] + , compiler = [0,3,8] + , dependencies = prelude.mapPlainDeps [ "atscntrb-hx-intinf" ] } diff --git a/cbits/combinatorics.c b/cbits/combinatorics.c deleted file mode 100644 --- a/cbits/combinatorics.c +++ /dev/null @@ -1,5092 +0,0 @@ -/* -** -** The C code is generated by [ATS/Postiats-0-3-8] -** The starting compilation time is: 2018-2-23: 4h: 2m -** -*/ - -/* -** include runtime header files -*/ -#ifndef _ATS_CCOMP_HEADER_NONE_ -#include "pats_ccomp_config.h" -#include "pats_ccomp_basics.h" -#include "pats_ccomp_typedefs.h" -#include "pats_ccomp_instrset.h" -#include "pats_ccomp_memalloc.h" -#ifndef _ATS_CCOMP_EXCEPTION_NONE_ -#include "pats_ccomp_memalloca.h" -#include "pats_ccomp_exception.h" -#endif // end of [_ATS_CCOMP_EXCEPTION_NONE_] -#endif /* _ATS_CCOMP_HEADER_NONE_ */ - - -/* -** include prelude cats files -*/ -#ifndef _ATS_CCOMP_PRELUDE_NONE_ -// -#include "prelude/CATS/basics.cats" -#include "prelude/CATS/integer.cats" -#include "prelude/CATS/pointer.cats" -#include "prelude/CATS/integer_long.cats" -#include "prelude/CATS/integer_size.cats" -#include "prelude/CATS/integer_short.cats" -#include "prelude/CATS/bool.cats" -#include "prelude/CATS/char.cats" -#include "prelude/CATS/float.cats" -#include "prelude/CATS/integer_ptr.cats" -#include "prelude/CATS/integer_fixed.cats" -#include "prelude/CATS/memory.cats" -#include "prelude/CATS/string.cats" -#include "prelude/CATS/strptr.cats" -// -#include "prelude/CATS/fprintf.cats" -// -#include "prelude/CATS/filebas.cats" -// -#include "prelude/CATS/list.cats" -#include "prelude/CATS/option.cats" -#include "prelude/CATS/array.cats" -#include "prelude/CATS/arrayptr.cats" -#include "prelude/CATS/arrayref.cats" -#include "prelude/CATS/matrix.cats" -#include "prelude/CATS/matrixptr.cats" -// -#endif /* _ATS_CCOMP_PRELUDE_NONE_ */ -/* -** for user-supplied prelude -*/ -#ifdef _ATS_CCOMP_PRELUDE_USER_ -// -#include _ATS_CCOMP_PRELUDE_USER_ -// -#endif /* _ATS_CCOMP_PRELUDE_USER_ */ -/* -** for user2-supplied prelude -*/ -#ifdef _ATS_CCOMP_PRELUDE_USER2_ -// -#include _ATS_CCOMP_PRELUDE_USER2_ -// -#endif /* _ATS_CCOMP_PRELUDE_USER2_ */ - -/* -staload-prologues(beg) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/basics.dats: 1636(line=50, offs=1) -- 1675(line=50, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 1596(line=49, offs=1) -- 1635(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 1533(line=44, offs=1) -- 1572(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_long.dats: 1602(line=49, offs=1) -- 1641(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_size.dats: 1597(line=49, offs=1) -- 1636(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_short.dats: 1603(line=49, offs=1) -- 1642(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/char.dats: 1610(line=48, offs=1) -- 1649(line=48, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/float.dats: 1636(line=50, offs=1) -- 1675(line=50, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/string.dats: 1631(line=50, offs=1) -- 1670(line=50, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/strptr.dats: 1629(line=50, offs=1) -- 1668(line=50, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/strptr.dats: 1691(line=54, offs=1) -- 1738(line=54, offs=48) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 1596(line=49, offs=1) -- 1635(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_ptr.dats: 1601(line=49, offs=1) -- 1640(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_fixed.dats: 1603(line=49, offs=1) -- 1642(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/memory.dats: 1410(line=38, offs=1) -- 1449(line=39, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 1613(line=49, offs=1) -- 1652(line=50, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 1675(line=54, offs=1) -- 1721(line=55, offs=39) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 1596(line=49, offs=1) -- 1635(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 1744(line=59, offs=1) -- 1789(line=60, offs=38) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/stdio.sats: 1390(line=36, offs=1) -- 1437(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/stdio.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/stdio.sats: 1950(line=69, offs=1) -- 1999(line=71, offs=34) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/types.sats: 1390(line=36, offs=1) -- 1441(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/sys/types.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 1871(line=66, offs=1) -- 1918(line=66, offs=48) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/stat.sats: 1390(line=36, offs=1) -- 1440(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/sys/stat.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/stat.sats: 1756(line=58, offs=1) -- 1805(line=60, offs=34) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/types.sats: 1390(line=36, offs=1) -- 1441(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/sys/types.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 15552(line=879, offs=1) -- 15589(line=880, offs=30) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/stdio.sats: 1390(line=36, offs=1) -- 1437(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/stdio.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/stdio.sats: 1950(line=69, offs=1) -- 1999(line=71, offs=34) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/types.sats: 1390(line=36, offs=1) -- 1441(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/sys/types.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/list.dats: 1529(line=44, offs=1) -- 1568(line=45, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/list.dats: 1569(line=46, offs=1) -- 1615(line=47, offs=39) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/unsafe.dats: 1532(line=44, offs=1) -- 1566(line=44, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/list_vt.dats: 1538(line=44, offs=1) -- 1577(line=45, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/list_vt.dats: 1578(line=46, offs=1) -- 1624(line=47, offs=39) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/unsafe.dats: 1532(line=44, offs=1) -- 1566(line=44, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/SHARE/list_vt_mergesort.dats: 1546(line=44, offs=1) -- 1585(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/SHARE/list_vt_quicksort.dats: 1546(line=44, offs=1) -- 1585(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/array.dats: 1534(line=44, offs=1) -- 1573(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/array.dats: 1574(line=45, offs=1) -- 1616(line=45, offs=43) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/SHARE/array_bsearch.dats: 1531(line=44, offs=1) -- 1570(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/SHARE/array_quicksort.dats: 1531(line=44, offs=1) -- 1570(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/arrayptr.dats: 1532(line=44, offs=1) -- 1571(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/arrayref.dats: 1532(line=44, offs=1) -- 1571(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/matrix.dats: 1535(line=44, offs=1) -- 1574(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/matrixptr.dats: 1538(line=44, offs=1) -- 1577(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/matrixref.dats: 1538(line=44, offs=1) -- 1577(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream.dats: 1523(line=44, offs=1) -- 1562(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 1523(line=44, offs=1) -- 1562(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/tostring.dats: 1528(line=44, offs=1) -- 1567(line=45, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/unsafe.dats: 1532(line=44, offs=1) -- 1566(line=44, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/checkast.dats: 1531(line=44, offs=1) -- 1570(line=45, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1660(line=37, offs=1) -- 1700(line=38, offs=27) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1727(line=42, offs=1) -- 1759(line=42, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1833(line=49, offs=1) -- 1867(line=49, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1868(line=50, offs=1) -- 1908(line=50, offs=41) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1656(line=37, offs=1) -- 1696(line=39, offs=27) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/mydepies.hats: 192(line=16, offs=1) -- 232(line=16, offs=41) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-libgmp/SATS/gmp.sats: 1178(line=38, offs=1) -- 1233(line=43, offs=3) -*/ - -// -#include \ -"atscntrb-libgmp/CATS/gmp.cats" -// -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1813(line=49, offs=1) -- 1845(line=49, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1846(line=50, offs=1) -- 1881(line=50, offs=36) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1657(line=37, offs=1) -- 1689(line=37, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1690(line=38, offs=1) -- 1724(line=38, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -staload-prologues(end) -*/ -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 86(line=4, offs=1) -- 225(line=8, offs=3) -*/ -ATSextcode_beg() -#define ATS_MEMALLOC_LIBC -#include "ccomp/runtime/pats_ccomp_memalloc_libc.h" -#include "ccomp/runtime/pats_ccomp_runtime_memalloc.c" -ATSextcode_end() -/* -typedefs-for-tyrecs-and-tysums(beg) -*/ -/* -typedefs-for-tyrecs-and-tysums(end) -*/ -/* -dynconlst-declaration(beg) -*/ -/* -dynconlst-declaration(end) -*/ -/* -dyncstlst-declaration(beg) -*/ -ATSdyncst_mac(atspre_g1int2int_int_int) -ATSdyncst_mac(atspre_g1int_lt_int) -ATSdyncst_mac(atscntrb_gmp_mpz_add2_mpz) -ATSdyncst_mac(atscntrb_gmp_mpz_mul2_int) -ATSdyncst_mac(atspre_g1int_add_int) -ATSdyncst_mac(atscntrb_gmp_mpz_clear) -ATSdyncst_mac(atspre_ptr_free) -ATSdyncst_mac(atscntrb_gmp_mpz_init_set_int) -ATSdyncst_mac(atspre_ptr_alloc_tsz) -ATSdyncst_mac(atspre_g1int_sub_int) -ATSdyncst_mac(atscntrb_gmp_mpz_tdiv2_q_mpz) -ATSdyncst_mac(atspre_g1int_mul_int) -/* -dyncstlst-declaration(end) -*/ -/* -dynvalist-implementation(beg) -*/ -/* -dynvalist-implementation(end) -*/ -/* -exnconlst-declaration(beg) -*/ -#ifndef _ATS_CCOMP_EXCEPTION_NONE_ -ATSextern() -atsvoid_t0ype -the_atsexncon_initize -( - atstype_exnconptr d2c, atstype_string exnmsg -) ; -#endif // end of [_ATS_CCOMP_EXCEPTION_NONE_] -/* -exnconlst-declaration(end) -*/ -/* -extypelst-declaration(beg) -*/ -/* -extypelst-declaration(end) -*/ -/* -assumelst-declaration(beg) -*/ -#ifndef _ATS_CCOMP_ASSUME_CHECK_NONE_ -#endif // #ifndef(_ATS_CCOMP_ASSUME_CHECK_NONE_) -/* -assumelst-declaration(end) -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -derangements_0(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -loop_1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstkind_type(atstype_ptrk)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__2(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__2__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_intinf1__6(atstkind_type(atstype_ptrk), atsrefarg0_type(atstkind_type(atstype_ptrk))) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_intinf1__6__1(atstkind_type(atstype_ptrk), atsrefarg0_type(atstkind_type(atstype_ptrk))) ; - -#if(0) -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__1(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_intinf1__6__2(atstkind_type(atstype_ptrk), atsrefarg0_type(atstkind_type(atstype_ptrk))) ; - -#if(0) -#if(0) -ATSextern() -atsvoid_t0ype -ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12(atstkind_type(atstype_ptrk)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atsvoid_t0ype -ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__1(atstkind_type(atstype_ptrk)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__2(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15(atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__1(atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17() ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__1() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__2(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__2() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__3(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__3() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__4(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__4() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__5(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__5() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -fact_28(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__6(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__6() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__7(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__7() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__3(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -dfact_34(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__8(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__8() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__9(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__9() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__4(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -permutations_40(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41(atstkind_type(atstype_ptrk), atsrefarg0_type(atstkind_type(atstype_ptrk))) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41__1(atstkind_type(atstype_ptrk), atsrefarg0_type(atstkind_type(atstype_ptrk))) ; - -ATSstatic() -atsvoid_t0ype -ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__2(atstkind_type(atstype_ptrk)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -catalan_44(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -numerator_loop_45(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__10(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__10() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__5(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__11(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__11() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__12(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__12() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41__2(atstkind_type(atstype_ptrk), atsrefarg0_type(atstkind_type(atstype_ptrk))) ; - -ATSstatic() -atsvoid_t0ype -ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__3(atstkind_type(atstype_ptrk)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -choose_55(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -numerator_loop_56(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__13(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__13() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__14(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__14() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__6(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__15(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__15() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__16(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__16() ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41__3(atstkind_type(atstype_ptrk), atsrefarg0_type(atstkind_type(atstype_ptrk))) ; - -ATSstatic() -atsvoid_t0ype -ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__4(atstkind_type(atstype_ptrk)) ; - -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -choose_ats(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -permutations_ats(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -double_factorial_ats(atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -factorial_ats(atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -catalan_ats(atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 280(line=10, offs=4) -- 978(line=34, offs=6) -*/ -/* -local: -global: derangements_0$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -derangements_0(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret0, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp45, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp46, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp51, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 280(line=10, offs=4) -- 978(line=34, offs=6) -*/ -ATSINSflab(__patsflab_derangements_0): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 333(line=11, offs=3) -- 978(line=34, offs=6) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 820(line=29, offs=5) -- 972(line=33, offs=59) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 839(line=30, offs=9) -- 840(line=30, offs=10) -*/ -ATSINSlab(__atstmplab0): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 308(line=10, offs=32) -- 309(line=10, offs=33) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab2) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 840(line=30, offs=10) -- 840(line=30, offs=10) -*/ -ATSINSlab(__atstmplab1): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 844(line=30, offs=14) -- 857(line=30, offs=27) -*/ -ATSINSmove(tmpret0, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__1(ATSPMVi0nt(1))) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 866(line=31, offs=9) -- 867(line=31, offs=10) -*/ -ATSINSlab(__atstmplab2): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 308(line=10, offs=32) -- 309(line=10, offs=33) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab4) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 867(line=31, offs=10) -- 867(line=31, offs=10) -*/ -ATSINSlab(__atstmplab3): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 872(line=31, offs=15) -- 885(line=31, offs=28) -*/ -ATSINSmove(tmpret0, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__2(ATSPMVi0nt(0))) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 894(line=32, offs=9) -- 895(line=32, offs=10) -*/ -ATSINSlab(__atstmplab4): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 308(line=10, offs=32) -- 309(line=10, offs=33) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(2))) { ATSINSgoto(__atstmplab6) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 895(line=32, offs=10) -- 895(line=32, offs=10) -*/ -ATSINSlab(__atstmplab5): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 900(line=32, offs=15) -- 913(line=32, offs=28) -*/ -ATSINSmove(tmpret0, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__3(ATSPMVi0nt(1))) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 923(line=33, offs=10) -- 923(line=33, offs=10) -*/ -ATSINSlab(__atstmplab6): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 933(line=33, offs=20) -- 938(line=33, offs=25) -*/ -ATSINSmove(tmp45, atspre_g1int_sub_int(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 943(line=33, offs=30) -- 956(line=33, offs=43) -*/ -ATSINSmove(tmp46, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__4(ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 958(line=33, offs=45) -- 971(line=33, offs=58) -*/ -ATSINSmove(tmp51, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__5(ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 928(line=33, offs=15) -- 972(line=33, offs=59) -*/ -ATSINSmove(tmpret0, loop_1(tmp45, ATSPMVi0nt(2), tmp46, tmp51)) ; - -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 333(line=11, offs=3) -- 978(line=34, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret0) ; -} /* end of [derangements_0] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 345(line=12, offs=9) -- 810(line=27, offs=12) -*/ -/* -local: loop_1$0(level=1) -global: loop_1$0(level=1) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -loop_1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1, atstkind_type(atstype_ptrk) arg2, atstkind_type(atstype_ptrk) arg3) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy2, atstkind_type(atstype_ptrk)) ; -ATStmpdec(apy3, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpret1, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp2, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmpref7, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref12, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp17, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref18, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp21) ; -ATStmpdec(tmpref26, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -/* -emit_funent_fnxdeclst: -*/ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 345(line=12, offs=9) -- 810(line=27, offs=12) -*/ -ATSINSflab(__patsflab_loop_1): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 469(line=13, offs=10) -- 474(line=13, offs=15) -*/ -ATSINSmove(tmp2, ATSLIB_056_prelude__lt_g1int_int__2__1(arg1, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 466(line=13, offs=7) -- 810(line=27, offs=12) -*/ -ATSif( -tmp2 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 488(line=14, offs=9) -- 632(line=19, offs=12) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 506(line=15, offs=15) -- 507(line=15, offs=16) -*/ -/* -ATSINStmpdec(tmpref7) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 510(line=15, offs=19) -- 537(line=15, offs=46) -*/ -ATSINSmove(tmpref7, ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_intinf1__6__1(arg3, ATSPMVrefarg0(arg2))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 552(line=16, offs=15) -- 553(line=16, offs=16) -*/ -/* -ATSINStmpdec(tmpref12) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 556(line=16, offs=19) -- 577(line=16, offs=40) -*/ -ATSINSmove(tmpref12, ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__1(tmpref7, arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 607(line=18, offs=19) -- 612(line=18, offs=24) -*/ -ATSINSmove(tmp17, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 599(line=18, offs=11) -- 620(line=18, offs=32) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, arg0) ; -ATSINSmove_tlcal(apy1, tmp17) ; -ATSINSmove_tlcal(apy2, tmpref12) ; -ATSINSmove_tlcal(apy3, arg2) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSargmove_tlcal(arg2, apy2) ; -ATSINSargmove_tlcal(arg3, apy3) ; -ATSINSfgoto(__patsflab_loop_1) ; -ATStailcal_end() - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 488(line=14, offs=9) -- 632(line=19, offs=12) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 652(line=21, offs=9) -- 810(line=27, offs=12) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 670(line=22, offs=15) -- 671(line=22, offs=16) -*/ -/* -ATSINStmpdec(tmpref18) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 674(line=22, offs=19) -- 701(line=22, offs=46) -*/ -ATSINSmove(tmpref18, ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_intinf1__6__2(arg3, ATSPMVrefarg0(arg2))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 720(line=23, offs=19) -- 734(line=23, offs=33) -*/ -ATSINSmove_void(tmp21, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__1(arg2)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 750(line=24, offs=15) -- 751(line=24, offs=16) -*/ -/* -ATSINStmpdec(tmpref26) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 754(line=24, offs=19) -- 775(line=24, offs=40) -*/ -ATSINSmove(tmpref26, ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__2(tmpref18, arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 797(line=26, offs=11) -- 798(line=26, offs=12) -*/ -ATSINSmove(tmpret1, tmpref26) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 652(line=21, offs=9) -- 810(line=27, offs=12) -*/ -/* -INSletpop() -*/ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret1) ; -/* -emit_funent_fnxbodylst: -*/ -} /* end of [loop_1] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) -*/ -/* -local: -global: lt_g1int_int$2$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = tk(4697) -tmparg = S2Evar(tk(4697)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__2(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret3, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp4, atstkind_t0ype(atstyvar_type(tk))) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) -*/ -ATSINSflab(__patsflab_lt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) -*/ -ATSINSmove(tmp4, PMVtmpltcst(g1int2int)(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) -*/ -ATSINSmove(tmpret3, PMVtmpltcst(g1int_lt)(arg0, tmp4)) ; - -ATSfunbody_end() -ATSreturn(tmpret3) ; -} /* end of [ATSLIB_056_prelude__lt_g1int_int__2] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) -*/ -/* -local: -global: lt_g1int_int$2$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4697) -tmparg = S2Evar(tk(4697)) -tmpsub = Some(tk(4697) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__2__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret3__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp4__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) -*/ -ATSINSflab(__patsflab_lt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) -*/ -ATSINSmove(tmp4__1, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) -*/ -ATSINSmove(tmpret3__1, atspre_g1int_lt_int(arg0, tmp4__1)) ; - -ATSfunbody_end() -ATSreturn(tmpret3__1) ; -} /* end of [ATSLIB_056_prelude__lt_g1int_int__2__1] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5514(line=298, offs=3) -- 5585(line=303, offs=2) -*/ -/* -local: -global: add_intinf0_intinf1$6$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = -tmparg = -tmpsub = None() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_intinf1__6(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret8, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp9) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5492(line=297, offs=1) -- 5585(line=303, offs=2) -*/ -ATSINSflab(__patsflab_add_intinf0_intinf1): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5523(line=298, offs=12) -- 5585(line=303, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5547(line=301, offs=10) -- 5580(line=301, offs=43) -*/ -ATSINSmove_void(tmp9, atscntrb_gmp_mpz_add2_mpz(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg1, atstkind_type(atstype_ptrk), atslab__2)))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5524(line=298, offs=13) -- 5525(line=298, offs=14) -*/ -ATSINSmove(tmpret8, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5523(line=298, offs=12) -- 5585(line=303, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret8) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_intinf1__6] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5514(line=298, offs=3) -- 5585(line=303, offs=2) -*/ -/* -local: -global: add_intinf0_intinf1$6$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_intinf1__6__1(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret8__1, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp9__1) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5492(line=297, offs=1) -- 5585(line=303, offs=2) -*/ -ATSINSflab(__patsflab_add_intinf0_intinf1): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5523(line=298, offs=12) -- 5585(line=303, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5547(line=301, offs=10) -- 5580(line=301, offs=43) -*/ -ATSINSmove_void(tmp9__1, atscntrb_gmp_mpz_add2_mpz(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg1, atstkind_type(atstype_ptrk), atslab__2)))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5524(line=298, offs=13) -- 5525(line=298, offs=14) -*/ -ATSINSmove(tmpret8__1, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5523(line=298, offs=12) -- 5585(line=303, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret8__1) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_intinf1__6__1] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7394(line=413, offs=3) -- 7461(line=418, offs=2) -*/ -/* -local: -global: mul_intinf0_int$8$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = -tmparg = -tmpsub = None() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret13, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp14) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7376(line=412, offs=1) -- 7461(line=418, offs=2) -*/ -ATSINSflab(__patsflab_mul_intinf0_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7427(line=416, offs=10) -- 7456(line=416, offs=39) -*/ -ATSINSmove_void(tmp14, atscntrb_gmp_mpz_mul2_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7404(line=413, offs=13) -- 7405(line=413, offs=14) -*/ -ATSINSmove(tmpret13, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret13) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7394(line=413, offs=3) -- 7461(line=418, offs=2) -*/ -/* -local: -global: mul_intinf0_int$8$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__1(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret13__1, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp14__1) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7376(line=412, offs=1) -- 7461(line=418, offs=2) -*/ -ATSINSflab(__patsflab_mul_intinf0_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7427(line=416, offs=10) -- 7456(line=416, offs=39) -*/ -ATSINSmove_void(tmp14__1, atscntrb_gmp_mpz_mul2_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7404(line=413, offs=13) -- 7405(line=413, offs=14) -*/ -ATSINSmove(tmpret13__1, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret13__1) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5514(line=298, offs=3) -- 5585(line=303, offs=2) -*/ -/* -local: -global: add_intinf0_intinf1$6$2(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_intinf1__6__2(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret8__2, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp9__2) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5492(line=297, offs=1) -- 5585(line=303, offs=2) -*/ -ATSINSflab(__patsflab_add_intinf0_intinf1): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5523(line=298, offs=12) -- 5585(line=303, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5547(line=301, offs=10) -- 5580(line=301, offs=43) -*/ -ATSINSmove_void(tmp9__2, atscntrb_gmp_mpz_add2_mpz(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg1, atstkind_type(atstype_ptrk), atslab__2)))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5524(line=298, offs=13) -- 5525(line=298, offs=14) -*/ -ATSINSmove(tmpret8__2, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5523(line=298, offs=12) -- 5585(line=303, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret8__2) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_intinf1__6__2] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2888(line=119, offs=12) -- 2987(line=122, offs=4) -*/ -/* -local: -global: intinf_free$12$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = -tmparg = -tmpsub = None() -*/ -atsvoid_t0ype -ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12(atstkind_type(atstype_ptrk) arg0) -{ -/* tmpvardeclst(beg) */ -// ATStmpdec_void(tmpret22) ; -// ATStmpdec_void(tmp23) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2877(line=119, offs=1) -- 2987(line=122, offs=4) -*/ -ATSINSflab(__patsflab_intinf_free): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) -*/ -/* -letpush(beg) -*/ -/* (*nothing*) */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2936(line=121, offs=12) -- 2955(line=121, offs=31) -*/ -ATSINSmove_void(tmp23, atscntrb_gmp_mpz_clear(ATSPMVrefarg1(arg0))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2959(line=121, offs=35) -- 2983(line=121, offs=59) -*/ -ATSINSmove_void(tmpret22, atspre_ptr_free(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn_void(tmpret22) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2888(line=119, offs=12) -- 2987(line=122, offs=4) -*/ -/* -local: -global: intinf_free$12$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atsvoid_t0ype -ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__1(atstkind_type(atstype_ptrk) arg0) -{ -/* tmpvardeclst(beg) */ -// ATStmpdec_void(tmpret22__1) ; -// ATStmpdec_void(tmp23__1) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2877(line=119, offs=1) -- 2987(line=122, offs=4) -*/ -ATSINSflab(__patsflab_intinf_free): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) -*/ -/* -letpush(beg) -*/ -/* (*nothing*) */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2936(line=121, offs=12) -- 2955(line=121, offs=31) -*/ -ATSINSmove_void(tmp23__1, atscntrb_gmp_mpz_clear(ATSPMVrefarg1(arg0))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2959(line=121, offs=35) -- 2983(line=121, offs=59) -*/ -ATSINSmove_void(tmpret22__1, atspre_ptr_free(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn_void(tmpret22__1) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7394(line=413, offs=3) -- 7461(line=418, offs=2) -*/ -/* -local: -global: mul_intinf0_int$8$2(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__2(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret13__2, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp14__2) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7376(line=412, offs=1) -- 7461(line=418, offs=2) -*/ -ATSINSflab(__patsflab_mul_intinf0_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7427(line=416, offs=10) -- 7456(line=416, offs=39) -*/ -ATSINSmove_void(tmp14__2, atscntrb_gmp_mpz_mul2_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7404(line=413, offs=13) -- 7405(line=413, offs=14) -*/ -ATSINSmove(tmpret13__2, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret13__2) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__2] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = -tmparg = -tmpsub = None() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30, PMVtmpltcst(ptr_alloc)()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29, tmp30) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$1(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__1(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__1, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__1, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__1) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__1, ATSLIB_056_prelude__ptr_alloc__17__1()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__1, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__1, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__1, tmp30__1) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__1) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__1] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = None() -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35, atspre_ptr_alloc_tsz(ATSPMVsizeof(atstyvar_type(a)))) ; - -ATSfunbody_end() -ATSreturn(tmpret35) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__1() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__1, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__1, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__1) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$2(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__2(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__2, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__2, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__2) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__2, ATSLIB_056_prelude__ptr_alloc__17__2()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__2, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__2, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__2, tmp30__2) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__2) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__2] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$2(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__2() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__2, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__2, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__2) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__2] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$3(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__3(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__3, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__3, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__3) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__3, ATSLIB_056_prelude__ptr_alloc__17__3()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__3, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__3, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__3, tmp30__3) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__3) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__3] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$3(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__3() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__3, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__3, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__3) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__3] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$4(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__4(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__4, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__4, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__4) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__4, ATSLIB_056_prelude__ptr_alloc__17__4()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__4, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__4, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__4, tmp30__4) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__4) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__4] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$4(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__4() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__4, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__4, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__4) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__4] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$5(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__5(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__5, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__5, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__5) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__5, ATSLIB_056_prelude__ptr_alloc__17__5()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__5, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__5, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__5, tmp30__5) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__5) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__5] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$5(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__5() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__5, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__5, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__5) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__5] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 984(line=36, offs=5) -- 1154(line=40, offs=59) -*/ -/* -local: fact_28$0(level=0) -global: fact_28$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -fact_28(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret56, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp65, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp68, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp69, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -/* -emit_funent_fnxdeclst: -*/ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 984(line=36, offs=5) -- 1154(line=40, offs=59) -*/ -ATSINSflab(__patsflab_fact_28): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1035(line=37, offs=3) -- 1154(line=40, offs=59) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1052(line=38, offs=7) -- 1053(line=38, offs=8) -*/ -ATSINSlab(__atstmplab7): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1004(line=36, offs=25) -- 1005(line=36, offs=26) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab9) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1053(line=38, offs=8) -- 1053(line=38, offs=8) -*/ -ATSINSlab(__atstmplab8): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1057(line=38, offs=12) -- 1070(line=38, offs=25) -*/ -ATSINSmove(tmpret56, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__6(ATSPMVi0nt(1))) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1077(line=39, offs=7) -- 1078(line=39, offs=8) -*/ -ATSINSlab(__atstmplab9): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1004(line=36, offs=25) -- 1005(line=36, offs=26) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab11) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1078(line=39, offs=8) -- 1078(line=39, offs=8) -*/ -ATSINSlab(__atstmplab10): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1082(line=39, offs=12) -- 1095(line=39, offs=25) -*/ -ATSINSmove(tmpret56, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__7(ATSPMVi0nt(1))) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1103(line=40, offs=8) -- 1103(line=40, offs=8) -*/ -ATSINSlab(__atstmplab11): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1143(line=40, offs=48) -- 1148(line=40, offs=53) -*/ -ATSINSmove(tmp69, atspre_g1int_sub_int(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1138(line=40, offs=43) -- 1149(line=40, offs=54) -*/ -ATSINSmove(tmp68, fact_28(tmp69)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1122(line=40, offs=27) -- 1153(line=40, offs=58) -*/ -ATSINSmove(tmp65, ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__3(tmp68, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1108(line=40, offs=13) -- 1154(line=40, offs=59) -*/ -ATSINSmove(tmpret56, ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), tmp65)) ; -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret56) ; -/* -emit_funent_fnxbodylst: -*/ -} /* end of [fact_28] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$6(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__6(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__6, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__6, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__6) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__6, ATSLIB_056_prelude__ptr_alloc__17__6()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__6, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__6, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__6, tmp30__6) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__6) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__6] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$6(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__6() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__6, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__6, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__6) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__6] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$7(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__7(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__7, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__7, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__7) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__7, ATSLIB_056_prelude__ptr_alloc__17__7()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__7, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__7, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__7, tmp30__7) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__7) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__7] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$7(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__7() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__7, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__7, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__7) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__7] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7394(line=413, offs=3) -- 7461(line=418, offs=2) -*/ -/* -local: -global: mul_intinf0_int$8$3(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__3(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret13__3, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp14__3) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7376(line=412, offs=1) -- 7461(line=418, offs=2) -*/ -ATSINSflab(__patsflab_mul_intinf0_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7427(line=416, offs=10) -- 7456(line=416, offs=39) -*/ -ATSINSmove_void(tmp14__3, atscntrb_gmp_mpz_mul2_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7404(line=413, offs=13) -- 7405(line=413, offs=14) -*/ -ATSINSmove(tmpret13__3, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret13__3) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__3] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1230(line=43, offs=5) -- 1438(line=52, offs=8) -*/ -/* -local: dfact_34$0(level=0) -global: dfact_34$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -dfact_34(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret70, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref79, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp80, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref81, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -/* -emit_funent_fnxdeclst: -*/ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1230(line=43, offs=5) -- 1438(line=52, offs=8) -*/ -ATSINSflab(__patsflab_dfact_34): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1276(line=44, offs=3) -- 1438(line=52, offs=8) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1293(line=45, offs=7) -- 1294(line=45, offs=8) -*/ -ATSINSlab(__atstmplab12): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1251(line=43, offs=26) -- 1252(line=43, offs=27) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab14) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1294(line=45, offs=8) -- 1294(line=45, offs=8) -*/ -ATSINSlab(__atstmplab13): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1298(line=45, offs=12) -- 1311(line=45, offs=25) -*/ -ATSINSmove(tmpret70, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__8(ATSPMVi0nt(1))) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1318(line=46, offs=7) -- 1319(line=46, offs=8) -*/ -ATSINSlab(__atstmplab14): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1251(line=43, offs=26) -- 1252(line=43, offs=27) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab16) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1319(line=46, offs=8) -- 1319(line=46, offs=8) -*/ -ATSINSlab(__atstmplab15): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1323(line=46, offs=12) -- 1336(line=46, offs=25) -*/ -ATSINSmove(tmpret70, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__9(ATSPMVi0nt(1))) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1344(line=47, offs=8) -- 1344(line=47, offs=8) -*/ -ATSINSlab(__atstmplab16): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1349(line=47, offs=13) -- 1438(line=52, offs=8) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1363(line=48, offs=11) -- 1364(line=48, offs=12) -*/ -/* -ATSINStmpdec(tmpref79) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1373(line=48, offs=21) -- 1378(line=48, offs=26) -*/ -ATSINSmove(tmp80, atspre_g1int_sub_int(arg0, ATSPMVi0nt(2))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1367(line=48, offs=15) -- 1379(line=48, offs=27) -*/ -ATSINSmove(tmpref79, dfact_34(tmp80)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1390(line=49, offs=11) -- 1391(line=49, offs=12) -*/ -/* -ATSINStmpdec(tmpref81) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1394(line=49, offs=15) -- 1415(line=49, offs=36) -*/ -ATSINSmove(tmpref81, ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__4(tmpref79, arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1429(line=51, offs=7) -- 1430(line=51, offs=8) -*/ -ATSINSmove(tmpret70, tmpref81) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1349(line=47, offs=13) -- 1438(line=52, offs=8) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret70) ; -/* -emit_funent_fnxbodylst: -*/ -} /* end of [dfact_34] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$8(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__8(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__8, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__8, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__8) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__8, ATSLIB_056_prelude__ptr_alloc__17__8()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__8, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__8, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__8, tmp30__8) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__8) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__8] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$8(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__8() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__8, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__8, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__8) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__8] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$9(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__9(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__9, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__9, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__9) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__9, ATSLIB_056_prelude__ptr_alloc__17__9()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__9, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__9, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__9, tmp30__9) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__9) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__9] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$9(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__9() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__9, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__9, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__9) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__9] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7394(line=413, offs=3) -- 7461(line=418, offs=2) -*/ -/* -local: -global: mul_intinf0_int$8$4(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__4(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret13__4, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp14__4) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7376(line=412, offs=1) -- 7461(line=418, offs=2) -*/ -ATSINSflab(__patsflab_mul_intinf0_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7427(line=416, offs=10) -- 7456(line=416, offs=39) -*/ -ATSINSmove_void(tmp14__4, atscntrb_gmp_mpz_mul2_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7404(line=413, offs=13) -- 7405(line=413, offs=14) -*/ -ATSINSmove(tmpret13__4, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret13__4) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__4] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1501(line=55, offs=4) -- 1708(line=63, offs=6) -*/ -/* -local: fact_28$0(level=0) -global: fact_28$0(level=0), permutations_40$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -permutations_40(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret84, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref85, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref86, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp87, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref88, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp93) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1501(line=55, offs=4) -- 1708(line=63, offs=6) -*/ -ATSINSflab(__patsflab_permutations_40): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1579(line=56, offs=3) -- 1708(line=63, offs=6) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1591(line=57, offs=9) -- 1592(line=57, offs=10) -*/ -/* -ATSINStmpdec(tmpref85) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1595(line=57, offs=13) -- 1601(line=57, offs=19) -*/ -ATSINSmove(tmpref85, fact_28(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1611(line=58, offs=9) -- 1612(line=58, offs=10) -*/ -/* -ATSINStmpdec(tmpref86) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1620(line=58, offs=18) -- 1625(line=58, offs=23) -*/ -ATSINSmove(tmp87, atspre_g1int_sub_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1615(line=58, offs=13) -- 1626(line=58, offs=24) -*/ -ATSINSmove(tmpref86, fact_28(tmp87)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1635(line=59, offs=9) -- 1636(line=59, offs=10) -*/ -/* -ATSINStmpdec(tmpref88) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1639(line=59, offs=13) -- 1664(line=59, offs=38) -*/ -ATSINSmove(tmpref88, ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41__1(tmpref85, ATSPMVrefarg0(tmpref86))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1677(line=60, offs=13) -- 1690(line=60, offs=26) -*/ -ATSINSmove_void(tmp93, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__2(tmpref86)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1701(line=62, offs=5) -- 1702(line=62, offs=6) -*/ -ATSINSmove(tmpret84, tmpref88) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1579(line=56, offs=3) -- 1708(line=63, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret84) ; -} /* end of [permutations_40] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9009(line=513, offs=3) -- 9083(line=518, offs=2) -*/ -/* -local: -global: div_intinf0_intinf1$41$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = -tmparg = -tmpsub = None() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret89, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp90) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 8987(line=512, offs=1) -- 9083(line=518, offs=2) -*/ -ATSINSflab(__patsflab_div_intinf0_intinf1): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9018(line=513, offs=12) -- 9083(line=518, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9042(line=516, offs=10) -- 9078(line=516, offs=46) -*/ -ATSINSmove_void(tmp90, atscntrb_gmp_mpz_tdiv2_q_mpz(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg1, atstkind_type(atstype_ptrk), atslab__2)))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9019(line=513, offs=13) -- 9020(line=513, offs=14) -*/ -ATSINSmove(tmpret89, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9018(line=513, offs=12) -- 9083(line=518, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret89) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9009(line=513, offs=3) -- 9083(line=518, offs=2) -*/ -/* -local: -global: div_intinf0_intinf1$41$1(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41__1(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret89__1, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp90__1) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 8987(line=512, offs=1) -- 9083(line=518, offs=2) -*/ -ATSINSflab(__patsflab_div_intinf0_intinf1): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9018(line=513, offs=12) -- 9083(line=518, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9042(line=516, offs=10) -- 9078(line=516, offs=46) -*/ -ATSINSmove_void(tmp90__1, atscntrb_gmp_mpz_tdiv2_q_mpz(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg1, atstkind_type(atstype_ptrk), atslab__2)))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9019(line=513, offs=13) -- 9020(line=513, offs=14) -*/ -ATSINSmove(tmpret89__1, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9018(line=513, offs=12) -- 9083(line=518, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret89__1) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2888(line=119, offs=12) -- 2987(line=122, offs=4) -*/ -/* -local: -global: intinf_free$12$2(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atsvoid_t0ype -ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__2(atstkind_type(atstype_ptrk) arg0) -{ -/* tmpvardeclst(beg) */ -// ATStmpdec_void(tmpret22__2) ; -// ATStmpdec_void(tmp23__2) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2877(line=119, offs=1) -- 2987(line=122, offs=4) -*/ -ATSINSflab(__patsflab_intinf_free): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) -*/ -/* -letpush(beg) -*/ -/* (*nothing*) */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2936(line=121, offs=12) -- 2955(line=121, offs=31) -*/ -ATSINSmove_void(tmp23__2, atscntrb_gmp_mpz_clear(ATSPMVrefarg1(arg0))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2959(line=121, offs=35) -- 2983(line=121, offs=59) -*/ -ATSINSmove_void(tmpret22__2, atspre_ptr_free(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn_void(tmpret22__2) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__2] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1760(line=66, offs=4) -- 2377(line=89, offs=6) -*/ -/* -local: fact_28$0(level=0) -global: fact_28$0(level=0), catalan_44$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -catalan_44(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret96, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref117, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref118, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref119, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp122) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1760(line=66, offs=4) -- 2377(line=89, offs=6) -*/ -ATSINSflab(__patsflab_catalan_44): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1801(line=67, offs=3) -- 2377(line=89, offs=6) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2114(line=78, offs=5) -- 2371(line=88, offs=10) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2133(line=79, offs=9) -- 2134(line=79, offs=10) -*/ -ATSINSlab(__atstmplab20): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1776(line=66, offs=20) -- 1777(line=66, offs=21) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab22) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2134(line=79, offs=10) -- 2134(line=79, offs=10) -*/ -ATSINSlab(__atstmplab21): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2138(line=79, offs=14) -- 2151(line=79, offs=27) -*/ -ATSINSmove(tmpret96, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__11(ATSPMVi0nt(1))) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2160(line=80, offs=9) -- 2161(line=80, offs=10) -*/ -ATSINSlab(__atstmplab22): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1776(line=66, offs=20) -- 1777(line=66, offs=21) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab24) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2161(line=80, offs=10) -- 2161(line=80, offs=10) -*/ -ATSINSlab(__atstmplab23): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2165(line=80, offs=14) -- 2178(line=80, offs=27) -*/ -ATSINSmove(tmpret96, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__12(ATSPMVi0nt(1))) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2188(line=81, offs=10) -- 2188(line=81, offs=10) -*/ -ATSINSlab(__atstmplab24): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2193(line=81, offs=15) -- 2371(line=88, offs=10) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2209(line=82, offs=13) -- 2210(line=82, offs=14) -*/ -/* -ATSINStmpdec(tmpref117) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2213(line=82, offs=17) -- 2229(line=82, offs=33) -*/ -ATSINSmove(tmpref117, numerator_loop_45(arg0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2243(line=83, offs=13) -- 2244(line=83, offs=14) -*/ -/* -ATSINStmpdec(tmpref118) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2247(line=83, offs=17) -- 2253(line=83, offs=23) -*/ -ATSINSmove(tmpref118, fact_28(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2267(line=84, offs=13) -- 2268(line=84, offs=14) -*/ -/* -ATSINStmpdec(tmpref119) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2271(line=84, offs=17) -- 2296(line=84, offs=42) -*/ -ATSINSmove(tmpref119, ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41__2(tmpref117, ATSPMVrefarg0(tmpref118))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2313(line=85, offs=17) -- 2326(line=85, offs=30) -*/ -ATSINSmove_void(tmp122, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__3(tmpref118)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2345(line=87, offs=9) -- 2360(line=87, offs=24) -*/ -ATSINSmove(tmpret96, ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), tmpref119)) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2193(line=81, offs=15) -- 2371(line=88, offs=10) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1801(line=67, offs=3) -- 2377(line=89, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret96) ; -} /* end of [catalan_44] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1813(line=68, offs=9) -- 2104(line=76, offs=12) -*/ -/* -local: numerator_loop_45$0(level=1) -global: numerator_loop_45$0(level=1) -local: n$5115(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -global: n$5115(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -numerator_loop_45(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret97, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp102, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref103, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp104, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref105, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp108, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1813(line=68, offs=9) -- 2104(line=76, offs=12) -*/ -ATSINSflab(__patsflab_numerator_loop_45): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1907(line=69, offs=7) -- 2104(line=76, offs=12) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1928(line=70, offs=11) -- 1929(line=70, offs=12) -*/ -ATSINSlab(__atstmplab17): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1855(line=68, offs=51) -- 1856(line=68, offs=52) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(2))) { ATSINSgoto(__atstmplab19) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1929(line=70, offs=12) -- 1929(line=70, offs=12) -*/ -ATSINSlab(__atstmplab18): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1933(line=70, offs=16) -- 1950(line=70, offs=33) -*/ -ATSINSmove(tmp102, atspre_g1int_add_int(env0, ATSPMVi0nt(2))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1933(line=70, offs=16) -- 1950(line=70, offs=33) -*/ -ATSINSmove(tmpret97, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__10(tmp102)) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1962(line=71, offs=12) -- 1962(line=71, offs=12) -*/ -ATSINSlab(__atstmplab19): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1967(line=71, offs=17) -- 2104(line=76, offs=12) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1985(line=72, offs=15) -- 1986(line=72, offs=16) -*/ -/* -ATSINStmpdec(tmpref103) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2004(line=72, offs=34) -- 2009(line=72, offs=39) -*/ -ATSINSmove(tmp104, atspre_g1int_sub_int(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1989(line=72, offs=19) -- 2010(line=72, offs=40) -*/ -ATSINSmove(tmpref103, numerator_loop_45(env0, tmp104)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2025(line=73, offs=15) -- 2026(line=73, offs=16) -*/ -/* -ATSINStmpdec(tmpref105) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2048(line=73, offs=38) -- 2053(line=73, offs=43) -*/ -ATSINSmove(tmp108, atspre_g1int_add_int(env0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2029(line=73, offs=19) -- 2054(line=73, offs=44) -*/ -ATSINSmove(tmpref105, ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__5(tmpref103, tmp108)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2076(line=75, offs=11) -- 2091(line=75, offs=26) -*/ -ATSINSmove(tmpret97, ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), tmpref105)) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 1967(line=71, offs=17) -- 2104(line=76, offs=12) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret97) ; -} /* end of [numerator_loop_45] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$10(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__10(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__10, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__10, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__10) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__10, ATSLIB_056_prelude__ptr_alloc__17__10()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__10, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__10, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__10, tmp30__10) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__10) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__10] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$10(level=3) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__10() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__10, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__10, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__10) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__10] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7394(line=413, offs=3) -- 7461(line=418, offs=2) -*/ -/* -local: -global: mul_intinf0_int$8$5(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__5(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret13__5, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp14__5) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7376(line=412, offs=1) -- 7461(line=418, offs=2) -*/ -ATSINSflab(__patsflab_mul_intinf0_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7427(line=416, offs=10) -- 7456(line=416, offs=39) -*/ -ATSINSmove_void(tmp14__5, atscntrb_gmp_mpz_mul2_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7404(line=413, offs=13) -- 7405(line=413, offs=14) -*/ -ATSINSmove(tmpret13__5, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret13__5) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__5] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$11(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__11(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__11, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__11, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__11) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__11, ATSLIB_056_prelude__ptr_alloc__17__11()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__11, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__11, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__11, tmp30__11) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__11) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__11] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$11(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__11() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__11, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__11, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__11) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__11] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$12(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__12(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__12, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__12, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__12) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__12, ATSLIB_056_prelude__ptr_alloc__17__12()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__12, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__12, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__12, tmp30__12) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__12) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__12] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$12(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__12() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__12, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__12, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__12) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__12] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9009(line=513, offs=3) -- 9083(line=518, offs=2) -*/ -/* -local: -global: div_intinf0_intinf1$41$2(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41__2(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret89__2, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp90__2) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 8987(line=512, offs=1) -- 9083(line=518, offs=2) -*/ -ATSINSflab(__patsflab_div_intinf0_intinf1): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9018(line=513, offs=12) -- 9083(line=518, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9042(line=516, offs=10) -- 9078(line=516, offs=46) -*/ -ATSINSmove_void(tmp90__2, atscntrb_gmp_mpz_tdiv2_q_mpz(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg1, atstkind_type(atstype_ptrk), atslab__2)))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9019(line=513, offs=13) -- 9020(line=513, offs=14) -*/ -ATSINSmove(tmpret89__2, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9018(line=513, offs=12) -- 9083(line=518, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret89__2) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41__2] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2888(line=119, offs=12) -- 2987(line=122, offs=4) -*/ -/* -local: -global: intinf_free$12$3(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atsvoid_t0ype -ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__3(atstkind_type(atstype_ptrk) arg0) -{ -/* tmpvardeclst(beg) */ -// ATStmpdec_void(tmpret22__3) ; -// ATStmpdec_void(tmp23__3) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2877(line=119, offs=1) -- 2987(line=122, offs=4) -*/ -ATSINSflab(__patsflab_intinf_free): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) -*/ -/* -letpush(beg) -*/ -/* (*nothing*) */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2936(line=121, offs=12) -- 2955(line=121, offs=31) -*/ -ATSINSmove_void(tmp23__3, atscntrb_gmp_mpz_clear(ATSPMVrefarg1(arg0))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2959(line=121, offs=35) -- 2983(line=121, offs=59) -*/ -ATSINSmove_void(tmpret22__3, atspre_ptr_free(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn_void(tmpret22__3) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__3] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2440(line=92, offs=4) -- 3142(line=116, offs=6) -*/ -/* -local: fact_28$0(level=0) -global: fact_28$0(level=0), choose_55$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -choose_55(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret125, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref153, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref154, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref155, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp158) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2440(line=92, offs=4) -- 3142(line=116, offs=6) -*/ -ATSINSflab(__patsflab_choose_55): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2512(line=93, offs=3) -- 3142(line=116, offs=6) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2879(line=105, offs=5) -- 3136(line=115, offs=10) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2898(line=106, offs=9) -- 2899(line=106, offs=10) -*/ -ATSINSlab(__atstmplab30): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2487(line=92, offs=51) -- 2488(line=92, offs=52) -*/ -ATSifnthen(ATSCKpat_int(arg1, ATSPMVint(0))) { ATSINSgoto(__atstmplab32) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2899(line=106, offs=10) -- 2899(line=106, offs=10) -*/ -ATSINSlab(__atstmplab31): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2903(line=106, offs=14) -- 2916(line=106, offs=27) -*/ -ATSINSmove(tmpret125, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__15(ATSPMVi0nt(1))) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2925(line=107, offs=9) -- 2926(line=107, offs=10) -*/ -ATSINSlab(__atstmplab32): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2487(line=92, offs=51) -- 2488(line=92, offs=52) -*/ -ATSifnthen(ATSCKpat_int(arg1, ATSPMVint(1))) { ATSINSgoto(__atstmplab34) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2926(line=107, offs=10) -- 2926(line=107, offs=10) -*/ -ATSINSlab(__atstmplab33): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2930(line=107, offs=14) -- 2942(line=107, offs=26) -*/ -ATSINSmove(tmpret125, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__16(arg0)) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2953(line=108, offs=10) -- 2953(line=108, offs=10) -*/ -ATSINSlab(__atstmplab34): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2958(line=108, offs=15) -- 3136(line=115, offs=10) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2974(line=109, offs=13) -- 2975(line=109, offs=14) -*/ -/* -ATSINStmpdec(tmpref153) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2978(line=109, offs=17) -- 2994(line=109, offs=33) -*/ -ATSINSmove(tmpref153, numerator_loop_56(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 3008(line=110, offs=13) -- 3009(line=110, offs=14) -*/ -/* -ATSINStmpdec(tmpref154) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 3012(line=110, offs=17) -- 3018(line=110, offs=23) -*/ -ATSINSmove(tmpref154, fact_28(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 3032(line=111, offs=13) -- 3033(line=111, offs=14) -*/ -/* -ATSINStmpdec(tmpref155) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 3036(line=111, offs=17) -- 3061(line=111, offs=42) -*/ -ATSINSmove(tmpref155, ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41__3(tmpref153, ATSPMVrefarg0(tmpref154))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 3078(line=112, offs=17) -- 3091(line=112, offs=30) -*/ -ATSINSmove_void(tmp158, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__4(tmpref154)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 3110(line=114, offs=9) -- 3125(line=114, offs=24) -*/ -ATSINSmove(tmpret125, ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), tmpref155)) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2958(line=108, offs=15) -- 3136(line=115, offs=10) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2512(line=93, offs=3) -- 3142(line=116, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret125) ; -} /* end of [choose_55] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2524(line=94, offs=9) -- 2869(line=103, offs=12) -*/ -/* -local: numerator_loop_56$0(level=1) -global: numerator_loop_56$0(level=1) -local: n$5126(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -global: n$5126(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -numerator_loop_56(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret126, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp131, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp136, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp137, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref138, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp139, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref140, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp143, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp144, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2524(line=94, offs=9) -- 2869(line=103, offs=12) -*/ -ATSINSflab(__patsflab_numerator_loop_56): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2618(line=95, offs=7) -- 2869(line=103, offs=12) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2639(line=96, offs=11) -- 2640(line=96, offs=12) -*/ -ATSINSlab(__atstmplab25): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2566(line=94, offs=51) -- 2567(line=94, offs=52) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab27) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2640(line=96, offs=12) -- 2640(line=96, offs=12) -*/ -ATSINSlab(__atstmplab26): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2644(line=96, offs=16) -- 2656(line=96, offs=28) -*/ -ATSINSmove(tmpret126, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__13(env0)) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2668(line=97, offs=11) -- 2669(line=97, offs=12) -*/ -ATSINSlab(__atstmplab27): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2566(line=94, offs=51) -- 2567(line=94, offs=52) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(2))) { ATSINSgoto(__atstmplab29) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2669(line=97, offs=12) -- 2669(line=97, offs=12) -*/ -ATSINSlab(__atstmplab28): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2687(line=97, offs=30) -- 2710(line=97, offs=53) -*/ -ATSINSmove(tmp137, atspre_g1int_sub_int(env0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2687(line=97, offs=30) -- 2710(line=97, offs=53) -*/ -ATSINSmove(tmp136, atspre_g1int_mul_int(tmp137, env0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2687(line=97, offs=30) -- 2710(line=97, offs=53) -*/ -ATSINSmove(tmp131, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__14(tmp136)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2673(line=97, offs=16) -- 2711(line=97, offs=54) -*/ -ATSINSmove(tmpret126, ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), tmp131)) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2723(line=98, offs=12) -- 2723(line=98, offs=12) -*/ -ATSINSlab(__atstmplab29): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2728(line=98, offs=17) -- 2869(line=103, offs=12) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2746(line=99, offs=15) -- 2747(line=99, offs=16) -*/ -/* -ATSINStmpdec(tmpref138) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2765(line=99, offs=34) -- 2770(line=99, offs=39) -*/ -ATSINSmove(tmp139, atspre_g1int_sub_int(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2750(line=99, offs=19) -- 2771(line=99, offs=40) -*/ -ATSINSmove(tmpref138, numerator_loop_56(env0, tmp139)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2786(line=100, offs=15) -- 2787(line=100, offs=16) -*/ -/* -ATSINStmpdec(tmpref140) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2809(line=100, offs=38) -- 2814(line=100, offs=43) -*/ -ATSINSmove(tmp144, atspre_g1int_add_int(env0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2809(line=100, offs=38) -- 2818(line=100, offs=47) -*/ -ATSINSmove(tmp143, atspre_g1int_sub_int(tmp144, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2790(line=100, offs=19) -- 2819(line=100, offs=48) -*/ -ATSINSmove(tmpref140, ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__6(tmpref138, tmp143)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2841(line=102, offs=11) -- 2856(line=102, offs=26) -*/ -ATSINSmove(tmpret126, ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), tmpref140)) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/combinatorics-internal.dats: 2728(line=98, offs=17) -- 2869(line=103, offs=12) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret126) ; -} /* end of [numerator_loop_56] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$13(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__13(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__13, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__13, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__13) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__13, ATSLIB_056_prelude__ptr_alloc__17__13()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__13, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__13, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__13, tmp30__13) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__13) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__13] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$13(level=3) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__13() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__13, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__13, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__13) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__13] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$14(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__14(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__14, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__14, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__14) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__14, ATSLIB_056_prelude__ptr_alloc__17__14()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__14, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__14, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__14, tmp30__14) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__14) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__14] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$14(level=3) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__14() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__14, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__14, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__14) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__14] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7394(line=413, offs=3) -- 7461(line=418, offs=2) -*/ -/* -local: -global: mul_intinf0_int$8$6(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__6(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret13__6, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp14__6) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7376(line=412, offs=1) -- 7461(line=418, offs=2) -*/ -ATSINSflab(__patsflab_mul_intinf0_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7427(line=416, offs=10) -- 7456(line=416, offs=39) -*/ -ATSINSmove_void(tmp14__6, atscntrb_gmp_mpz_mul2_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7404(line=413, offs=13) -- 7405(line=413, offs=14) -*/ -ATSINSmove(tmpret13__6, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret13__6) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__8__6] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$15(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__15(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__15, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__15, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__15) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__15, ATSLIB_056_prelude__ptr_alloc__17__15()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__15, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__15, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__15, tmp30__15) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__15) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__15] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$15(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__15() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__15, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__15, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__15) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__15] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$15$16(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__16(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret29__16, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp30__16, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp31__16) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp30__16, ATSLIB_056_prelude__ptr_alloc__17__16()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp31__16, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp30__16, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret29__16, tmp30__16) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret29__16) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__15__16] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$17$16(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__17__16() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret35__16, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret35__16, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret35__16) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__17__16] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9009(line=513, offs=3) -- 9083(line=518, offs=2) -*/ -/* -local: -global: div_intinf0_intinf1$41$3(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41__3(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret89__3, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp90__3) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 8987(line=512, offs=1) -- 9083(line=518, offs=2) -*/ -ATSINSflab(__patsflab_div_intinf0_intinf1): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9018(line=513, offs=12) -- 9083(line=518, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9042(line=516, offs=10) -- 9078(line=516, offs=46) -*/ -ATSINSmove_void(tmp90__3, atscntrb_gmp_mpz_tdiv2_q_mpz(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg1, atstkind_type(atstype_ptrk), atslab__2)))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9019(line=513, offs=13) -- 9020(line=513, offs=14) -*/ -ATSINSmove(tmpret89__3, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 9018(line=513, offs=12) -- 9083(line=518, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret89__3) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__div_intinf0_intinf1__41__3] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2888(line=119, offs=12) -- 2987(line=122, offs=4) -*/ -/* -local: -global: intinf_free$12$4(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atsvoid_t0ype -ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__4(atstkind_type(atstype_ptrk) arg0) -{ -/* tmpvardeclst(beg) */ -// ATStmpdec_void(tmpret22__4) ; -// ATStmpdec_void(tmp23__4) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2877(line=119, offs=1) -- 2987(line=122, offs=4) -*/ -ATSINSflab(__patsflab_intinf_free): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) -*/ -/* -letpush(beg) -*/ -/* (*nothing*) */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2936(line=121, offs=12) -- 2955(line=121, offs=31) -*/ -ATSINSmove_void(tmp23__4, atscntrb_gmp_mpz_clear(ATSPMVrefarg1(arg0))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2959(line=121, offs=35) -- 2983(line=121, offs=59) -*/ -ATSINSmove_void(tmpret22__4, atspre_ptr_free(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn_void(tmpret22__4) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__12__4] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 660(line=32, offs=22) -- 683(line=33, offs=15) -*/ -/* -local: choose_55$0(level=0) -global: fact_28$0(level=0), choose_55$0(level=0), choose_ats$69$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_type(atstype_ptrk) -choose_ats(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret161, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 649(line=32, offs=11) -- 683(line=33, offs=15) -*/ -ATSINSflab(__patsflab_choose_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 671(line=33, offs=3) -- 683(line=33, offs=15) -*/ -ATSINSmove(tmpret161, choose_55(arg0, arg1)) ; - -ATSfunbody_end() -ATSreturn(tmpret161) ; -} /* end of [choose_ats] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 712(line=35, offs=28) -- 735(line=36, offs=15) -*/ -/* -local: choose_55$0(level=0) -global: fact_28$0(level=0), choose_55$0(level=0), permutations_ats$70$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_type(atstype_ptrk) -permutations_ats(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret162, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 695(line=35, offs=11) -- 735(line=36, offs=15) -*/ -ATSINSflab(__patsflab_permutations_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 723(line=36, offs=3) -- 735(line=36, offs=15) -*/ -ATSINSmove(tmpret162, choose_55(arg0, arg1)) ; - -ATSfunbody_end() -ATSreturn(tmpret162) ; -} /* end of [permutations_ats] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 768(line=38, offs=32) -- 783(line=39, offs=10) -*/ -/* -local: dfact_34$0(level=0) -global: dfact_34$0(level=0), double_factorial_ats$71$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_type(atstype_ptrk) -double_factorial_ats(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret163, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 747(line=38, offs=11) -- 784(line=39, offs=11) -*/ -ATSINSflab(__patsflab_double_factorial_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 776(line=39, offs=3) -- 783(line=39, offs=10) -*/ -ATSINSmove(tmpret163, dfact_34(arg0)) ; - -ATSfunbody_end() -ATSreturn(tmpret163) ; -} /* end of [double_factorial_ats] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 810(line=41, offs=25) -- 824(line=42, offs=9) -*/ -/* -local: fact_28$0(level=0) -global: fact_28$0(level=0), factorial_ats$72$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_type(atstype_ptrk) -factorial_ats(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret164, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 796(line=41, offs=11) -- 825(line=42, offs=10) -*/ -ATSINSflab(__patsflab_factorial_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 818(line=42, offs=3) -- 824(line=42, offs=9) -*/ -ATSINSmove(tmpret164, fact_28(arg0)) ; - -ATSfunbody_end() -ATSreturn(tmpret164) ; -} /* end of [factorial_ats] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 849(line=44, offs=23) -- 866(line=45, offs=12) -*/ -/* -local: catalan_44$0(level=0) -global: fact_28$0(level=0), catalan_44$0(level=0), catalan_ats$73$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_type(atstype_ptrk) -catalan_ats(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret165, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 837(line=44, offs=11) -- 867(line=45, offs=13) -*/ -ATSINSflab(__patsflab_catalan_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/combinatorics.dats: 857(line=45, offs=3) -- 866(line=45, offs=12) -*/ -ATSINSmove(tmpret165, catalan_44(arg0)) ; - -ATSfunbody_end() -ATSreturn(tmpret165) ; -} /* end of [catalan_ats] */ - -/* -** for initialization(dynloading) -*/ -ATSdynloadflag_minit(_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_combinatorics_056_dats__dynloadflag) ; -ATSextern() -atsvoid_t0ype -_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_combinatorics_056_dats__dynload() -{ -ATSfunbody_beg() -ATSdynload(/*void*/) -ATSdynloadflag_sta( -_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_combinatorics_056_dats__dynloadflag -) ; -ATSif( -ATSCKiseqz( -_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_combinatorics_056_dats__dynloadflag -) -) ATSthen() { -ATSdynloadset(_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_combinatorics_056_dats__dynloadflag) ; -/* -dynexnlst-initize(beg) -*/ -/* -dynexnlst-initize(end) -*/ -/* local */ -/* in of [local] */ -/* end of [local] */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn_void(tmpret_void) ; -} /* end of [*_dynload] */ - -/* ****** ****** */ - -/* end-of-compilation-unit */ diff --git a/cbits/number-theory.c b/cbits/number-theory.c deleted file mode 100644 --- a/cbits/number-theory.c +++ /dev/null @@ -1,9381 +0,0 @@ -/* -** -** The C code is generated by [ATS/Postiats-0-3-8] -** The starting compilation time is: 2018-2-23: 4h: 2m -** -*/ - -/* -** include runtime header files -*/ -#ifndef _ATS_CCOMP_HEADER_NONE_ -#include "pats_ccomp_config.h" -#include "pats_ccomp_basics.h" -#include "pats_ccomp_typedefs.h" -#include "pats_ccomp_instrset.h" -#include "pats_ccomp_memalloc.h" -#ifndef _ATS_CCOMP_EXCEPTION_NONE_ -#include "pats_ccomp_memalloca.h" -#include "pats_ccomp_exception.h" -#endif // end of [_ATS_CCOMP_EXCEPTION_NONE_] -#endif /* _ATS_CCOMP_HEADER_NONE_ */ - - -/* -** include prelude cats files -*/ -#ifndef _ATS_CCOMP_PRELUDE_NONE_ -// -#include "prelude/CATS/basics.cats" -#include "prelude/CATS/integer.cats" -#include "prelude/CATS/pointer.cats" -#include "prelude/CATS/integer_long.cats" -#include "prelude/CATS/integer_size.cats" -#include "prelude/CATS/integer_short.cats" -#include "prelude/CATS/bool.cats" -#include "prelude/CATS/char.cats" -#include "prelude/CATS/float.cats" -#include "prelude/CATS/integer_ptr.cats" -#include "prelude/CATS/integer_fixed.cats" -#include "prelude/CATS/memory.cats" -#include "prelude/CATS/string.cats" -#include "prelude/CATS/strptr.cats" -// -#include "prelude/CATS/fprintf.cats" -// -#include "prelude/CATS/filebas.cats" -// -#include "prelude/CATS/list.cats" -#include "prelude/CATS/option.cats" -#include "prelude/CATS/array.cats" -#include "prelude/CATS/arrayptr.cats" -#include "prelude/CATS/arrayref.cats" -#include "prelude/CATS/matrix.cats" -#include "prelude/CATS/matrixptr.cats" -// -#endif /* _ATS_CCOMP_PRELUDE_NONE_ */ -/* -** for user-supplied prelude -*/ -#ifdef _ATS_CCOMP_PRELUDE_USER_ -// -#include _ATS_CCOMP_PRELUDE_USER_ -// -#endif /* _ATS_CCOMP_PRELUDE_USER_ */ -/* -** for user2-supplied prelude -*/ -#ifdef _ATS_CCOMP_PRELUDE_USER2_ -// -#include _ATS_CCOMP_PRELUDE_USER2_ -// -#endif /* _ATS_CCOMP_PRELUDE_USER2_ */ - -/* -staload-prologues(beg) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/basics.dats: 1636(line=50, offs=1) -- 1675(line=50, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 1596(line=49, offs=1) -- 1635(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 1533(line=44, offs=1) -- 1572(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_long.dats: 1602(line=49, offs=1) -- 1641(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_size.dats: 1597(line=49, offs=1) -- 1636(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_short.dats: 1603(line=49, offs=1) -- 1642(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/char.dats: 1610(line=48, offs=1) -- 1649(line=48, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/float.dats: 1636(line=50, offs=1) -- 1675(line=50, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/string.dats: 1631(line=50, offs=1) -- 1670(line=50, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/strptr.dats: 1629(line=50, offs=1) -- 1668(line=50, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/strptr.dats: 1691(line=54, offs=1) -- 1738(line=54, offs=48) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 1596(line=49, offs=1) -- 1635(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_ptr.dats: 1601(line=49, offs=1) -- 1640(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_fixed.dats: 1603(line=49, offs=1) -- 1642(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/memory.dats: 1410(line=38, offs=1) -- 1449(line=39, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 1613(line=49, offs=1) -- 1652(line=50, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 1675(line=54, offs=1) -- 1721(line=55, offs=39) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 1596(line=49, offs=1) -- 1635(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 1744(line=59, offs=1) -- 1789(line=60, offs=38) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/stdio.sats: 1390(line=36, offs=1) -- 1437(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/stdio.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/stdio.sats: 1950(line=69, offs=1) -- 1999(line=71, offs=34) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/types.sats: 1390(line=36, offs=1) -- 1441(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/sys/types.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 1871(line=66, offs=1) -- 1918(line=66, offs=48) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/stat.sats: 1390(line=36, offs=1) -- 1440(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/sys/stat.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/stat.sats: 1756(line=58, offs=1) -- 1805(line=60, offs=34) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/types.sats: 1390(line=36, offs=1) -- 1441(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/sys/types.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 15552(line=879, offs=1) -- 15589(line=880, offs=30) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/stdio.sats: 1390(line=36, offs=1) -- 1437(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/stdio.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/stdio.sats: 1950(line=69, offs=1) -- 1999(line=71, offs=34) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/types.sats: 1390(line=36, offs=1) -- 1441(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/sys/types.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/list.dats: 1529(line=44, offs=1) -- 1568(line=45, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/list.dats: 1569(line=46, offs=1) -- 1615(line=47, offs=39) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/unsafe.dats: 1532(line=44, offs=1) -- 1566(line=44, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/list_vt.dats: 1538(line=44, offs=1) -- 1577(line=45, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/list_vt.dats: 1578(line=46, offs=1) -- 1624(line=47, offs=39) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/unsafe.dats: 1532(line=44, offs=1) -- 1566(line=44, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/SHARE/list_vt_mergesort.dats: 1546(line=44, offs=1) -- 1585(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/SHARE/list_vt_quicksort.dats: 1546(line=44, offs=1) -- 1585(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/array.dats: 1534(line=44, offs=1) -- 1573(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/array.dats: 1574(line=45, offs=1) -- 1616(line=45, offs=43) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/SHARE/array_bsearch.dats: 1531(line=44, offs=1) -- 1570(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/SHARE/array_quicksort.dats: 1531(line=44, offs=1) -- 1570(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/arrayptr.dats: 1532(line=44, offs=1) -- 1571(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/arrayref.dats: 1532(line=44, offs=1) -- 1571(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/matrix.dats: 1535(line=44, offs=1) -- 1574(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/matrixptr.dats: 1538(line=44, offs=1) -- 1577(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/matrixref.dats: 1538(line=44, offs=1) -- 1577(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream.dats: 1523(line=44, offs=1) -- 1562(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 1523(line=44, offs=1) -- 1562(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/tostring.dats: 1528(line=44, offs=1) -- 1567(line=45, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/unsafe.dats: 1532(line=44, offs=1) -- 1566(line=44, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/checkast.dats: 1531(line=44, offs=1) -- 1570(line=45, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1660(line=37, offs=1) -- 1700(line=38, offs=27) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1727(line=42, offs=1) -- 1759(line=42, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1833(line=49, offs=1) -- 1867(line=49, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1868(line=50, offs=1) -- 1908(line=50, offs=41) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1656(line=37, offs=1) -- 1696(line=39, offs=27) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/mydepies.hats: 192(line=16, offs=1) -- 232(line=16, offs=41) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-libgmp/SATS/gmp.sats: 1178(line=38, offs=1) -- 1233(line=43, offs=3) -*/ - -// -#include \ -"atscntrb-libgmp/CATS/gmp.cats" -// -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1813(line=49, offs=1) -- 1845(line=49, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1846(line=50, offs=1) -- 1881(line=50, offs=36) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1657(line=37, offs=1) -- 1689(line=37, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1690(line=38, offs=1) -- 1724(line=38, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-libgmp/SATS/gmp.sats: 1178(line=38, offs=1) -- 1233(line=43, offs=3) -*/ - -// -#include \ -"atscntrb-libgmp/CATS/gmp.cats" -// -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/math.sats: 1380(line=35, offs=1) -- 1426(line=38, offs=3) -*/ - -#include \ -"libats/libc/CATS/math.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1660(line=37, offs=1) -- 1700(line=38, offs=27) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1727(line=42, offs=1) -- 1759(line=42, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1833(line=49, offs=1) -- 1867(line=49, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1868(line=50, offs=1) -- 1908(line=50, offs=41) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1656(line=37, offs=1) -- 1696(line=39, offs=27) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/mydepies.hats: 192(line=16, offs=1) -- 232(line=16, offs=41) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-libgmp/SATS/gmp.sats: 1178(line=38, offs=1) -- 1233(line=43, offs=3) -*/ - -// -#include \ -"atscntrb-libgmp/CATS/gmp.cats" -// -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1813(line=49, offs=1) -- 1845(line=49, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1846(line=50, offs=1) -- 1881(line=50, offs=36) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1657(line=37, offs=1) -- 1689(line=37, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1690(line=38, offs=1) -- 1724(line=38, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -staload-prologues(end) -*/ -/* -typedefs-for-tyrecs-and-tysums(beg) -*/ -typedef -ATSstruct { -atstkind_t0ype(atstype_int) atslab__first ; -atstkind_t0ype(atstype_int) atslab__second ; -} postiats_tyrec_0 ; -typedef -ATSstruct { -#if(0) -int contag ; -#endif -atstkind_t0ype(atstype_int) atslab__0 ; -atstkind_type(atstype_ptrk) atslab__1 ; -} postiats_tysum_1 ; -typedef -ATSstruct { -#if(0) -int contag ; -#endif -atstyvar_type(a) atslab__0 ; -atstkind_type(atstype_ptrk) atslab__1 ; -} postiats_tysum_2 ; -typedef -ATSstruct { -#if(0) -int contag ; -#endif -atstyvar_type(a) atslab__0 ; -atstkind_type(atstype_ptrk) atslab__1 ; -} postiats_tysum_3 ; -typedef -ATSstruct { -#if(0) -int contag ; -#endif -atstyvar_type(a) atslab__0 ; -atstkind_type(atstype_ptrk) atslab__1 ; -} postiats_tysum_4 ; -/* -typedefs-for-tyrecs-and-tysums(end) -*/ -/* -dynconlst-declaration(beg) -*/ -/* -dynconlst-declaration(end) -*/ -/* -dyncstlst-declaration(beg) -*/ -ATSdyncst_mac(atspre_ptr_alloc_tsz) -ATSdyncst_mac(atspre_g0int2uint_int_ulint) -ATSdyncst_mac(atspre_g1int_add_int) -ATSdyncst_mac(atscntrb_gmp_mpz_init) -ATSdyncst_mac(atscntrb_gmp_mpz_fib_uint) -ATSdyncst_mac(atspre_g1int2int_int_int) -ATSdyncst_mac(atspre_g1int_gt_int) -ATSdyncst_mac(atspre_g1int_half_int) -ATSdyncst_mac(atspre_g0int_mod_int) -ATSdyncst_mac(atspre_g0int2int_int_int) -ATSdyncst_mac(atspre_g0int_eq_int) -ATSdyncst_mac(atspre_g0int_mul_int) -ATSdyncst_mac(atspre_g0float2int_float_int) -ATSdyncst_mac(atslib_libats_libc_sqrt_float) -ATSdyncst_mac(atspre_g0int2float_int_float) -ATSdyncst_mac(atspre_g1int_lt_int) -ATSdyncst_mac(atspre_g1int_eq_int) -ATSdyncst_mac(atspre_g0int_div_int) -ATSdyncst_mac(atspre_g1int_gte_int) -ATSdyncst_mac(atspre_g1int_neq_int) -ATSdyncst_mac(atspre_g1int_div_int) -ATSdyncst_mac(atspre_cloptr_free) -ATSdyncst_mac(atspre_lazy_vt_free) -ATSdyncst_mac(atspre_g1int_sub_int) -ATSdyncst_mac(atspre_g0int_half_int) -ATSdyncst_mac(atspre_g1int_mul_int) -ATSdyncst_mac(atspre_g1int_neg_int) -ATSdyncst_mac(atspre_g0int_add_int) -ATSdyncst_mac(atspre_g0int_neq_int) -ATSdyncst_mac(atspre_g0int_sub_int) -ATSdyncst_mac(atscntrb_gmp_mpz_add2_int) -ATSdyncst_mac(atscntrb_gmp_mpz_init_set_int) -/* -dyncstlst-declaration(end) -*/ -/* -dynvalist-implementation(beg) -*/ -/* -dynvalist-implementation(end) -*/ -/* -exnconlst-declaration(beg) -*/ -#ifndef _ATS_CCOMP_EXCEPTION_NONE_ -ATSextern() -atsvoid_t0ype -the_atsexncon_initize -( - atstype_exnconptr d2c, atstype_string exnmsg -) ; -#endif // end of [_ATS_CCOMP_EXCEPTION_NONE_] -/* -exnconlst-declaration(end) -*/ -/* -extypelst-declaration(beg) -*/ -/* -extypelst-declaration(end) -*/ -/* -assumelst-declaration(beg) -*/ -#ifndef _ATS_CCOMP_ASSUME_CHECK_NONE_ -#endif // #ifndef(_ATS_CCOMP_ASSUME_CHECK_NONE_) -/* -assumelst-declaration(end) -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -witness_0(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -fib_gmp_1(atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__2() ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__2__1() ; - -ATSstatic() -atstkind_t0ype(atstype_int) -exp_5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -sqrt_int_17(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -is_prime_20(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -loop_21(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__22(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__22__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g1int_int__26(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g1int_int__26__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -divides_30(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -gcd_32(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -lcm_34(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -divisors_36(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstype_boxed -__patsfun_37(atstype_bool) ; - -ATSstatic() -atstype_boxed -__patsfun_38(atstype_bool) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -loop_39(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gte_g1int_int__40(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gte_g1int_int__40__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__neq_g1int_int__44(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__neq_g1int_int__44__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstype_boxed -__patsfun_48(atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstype_bool) ; - -ATSstatic() -atstype_boxed -__patsfun_49(atstkind_type(atstype_ptrk), atstype_bool) ; - -ATSstatic() -atstype_boxed -__patsfun_50(atstype_bool) ; - -ATSstatic() -atstype_boxed -__patsfun_51(atstkind_t0ype(atstype_int), atstype_bool) ; - -ATSstatic() -atstype_boxed -__patsfun_52(atstype_bool) ; - -ATSstatic() -atstype_boxed -__patsfun_53(atstype_bool) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__6(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstype_boxed -__patsfun_55(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstype_bool) ; - -ATSstatic() -atstype_boxed -__patsfun_56(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstype_bool) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -prime_divisors_57(atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__stream_vt_filter_cloptr__58(atstkind_type(atstype_ptrk), atstype_cloptr) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -#if(0) -ATSstatic() -atstkind_type(atstype_ptrk) -auxmain_59__59(atstkind_type(atstype_ptrk), atstype_cloptr) ; -#endif // end of [TEMPLATE] - -#if(0) -ATSstatic() -atstype_boxed -__patsfun_60__60(atstkind_type(atstype_ptrk), atstype_cloptr, atstype_bool) ; -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__stream_vt_filter_cloptr__58__1(atstkind_type(atstype_ptrk), atstype_cloptr) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -auxmain_59__59__1(atstkind_type(atstype_ptrk), atstype_cloptr) ; - -ATSstatic() -atstype_boxed -__patsfun_60__60__1(atstkind_type(atstype_ptrk), atstype_cloptr, atstype_bool) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -__patsfun_64(atsrefarg1_type(atstkind_t0ype(atstype_int))) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -div_gt_zero_65(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -exp_mod_prime_66(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__7(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -jacobi_72(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -legendre_73(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__8(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__9(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -get_multiplicity_77(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -loop_78(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__10(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -count_divisors_81(atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_int) -ATSLIB_056_prelude__stream_vt_length__82(atstkind_type(atstype_ptrk)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -#if(0) -ATSstatic() -atstkind_t0ype(atstype_int) -loop_83__83(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_int) -ATSLIB_056_prelude__stream_vt_length__82__1(atstkind_type(atstype_ptrk)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -loop_83__83__1(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -sum_divisors_86(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -loop_87(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gte_g1int_int__40__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__11(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__neq_g1int_int__44__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__12(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -is_perfect_93(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__13(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -rip_95(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__neq_g0int_int__96(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__neq_g0int_int__96__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__22__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -prime_factors_101(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -loop_102(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gte_g1int_int__40__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstype_boxed -__patsfun_104(atstkind_t0ype(atstype_int), atstype_bool) ; - -ATSstatic() -atstype_boxed -__patsfun_105(atstype_bool) ; - -ATSstatic() -atstype_boxed -__patsfun_106(atstype_bool) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__14(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__6(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstype_boxed -__patsfun_109(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstype_bool) ; - -ATSstatic() -atstype_boxed -__patsfun_110(atstkind_t0ype(atstype_int), atstype_bool) ; - -ATSstatic() -atstype_boxed -__patsfun_111(atstype_bool) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -little_omega_112(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -loop_113(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gte_g1int_int__40__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__15(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__7(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -totient_117(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -postiats_tyrec_0 -adjust_contents_118(postiats_tyrec_0, atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstyvar_type(res) -ATSLIB_056_prelude__stream_vt_foldleft_cloptr__120(atstkind_type(atstype_ptrk), atstyvar_type(res), atstype_cloptr) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -#if(0) -ATSstatic() -atstyvar_type(res) -loop_121__121(atstkind_type(atstype_ptrk), atstyvar_type(res), atstype_cloptr) ; -#endif // end of [TEMPLATE] - -ATSstatic() -postiats_tyrec_0 -ATSLIB_056_prelude__stream_vt_foldleft_cloptr__120__1(atstkind_type(atstype_ptrk), postiats_tyrec_0, atstype_cloptr) ; - -ATSstatic() -postiats_tyrec_0 -loop_121__121__1(atstkind_type(atstype_ptrk), postiats_tyrec_0, atstype_cloptr) ; - -ATSstatic() -postiats_tyrec_0 -__patsfun_124(postiats_tyrec_0, atsrefarg1_type(atstkind_t0ype(atstype_int))) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -totient_sum_125(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -loop_126(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__22__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__128(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__128__1(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__130(atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__130__1(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__2__2() ; - -#if(0) -ATSextern() -atstkind_t0ype(atstype_int) -sum_divisors_ats(atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -#if(0) -ATSextern() -atstkind_t0ype(atstype_int) -count_divisors_ats(atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -#if(0) -ATSextern() -atstkind_t0ype(atstype_int) -totient_ats(atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -#if(0) -ATSextern() -atstkind_t0ype(atstype_int) -little_omega_ats(atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -is_perfect_ats(atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -#if(0) -ATSextern() -atstkind_t0ype(atstype_int) -jacobi_ats(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -ATSclosurerize_beg(__patsfun_37, (), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -} __patsfun_37__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_37__cfun -( -__patsfun_37__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_37(arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_37__closureinit -( -__patsfun_37__closure_t0ype *p_cenv -) -{ -p_cenv->cfun = __patsfun_37__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_37__closurerize -( -// argumentless -) -{ -return __patsfun_37__closureinit(ATS_MALLOC(sizeof(__patsfun_37__closure_t0ype))) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_38, (), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -} __patsfun_38__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_38__cfun -( -__patsfun_38__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_38(arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_38__closureinit -( -__patsfun_38__closure_t0ype *p_cenv -) -{ -p_cenv->cfun = __patsfun_38__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_38__closurerize -( -// argumentless -) -{ -return __patsfun_38__closureinit(ATS_MALLOC(sizeof(__patsfun_38__closure_t0ype))) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_48, (atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk)), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -atstkind_t0ype(atstype_int) env0 ; -atstkind_type(atstype_ptrk) env1 ; -} __patsfun_48__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_48__cfun -( -__patsfun_48__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_48(p_cenv->env0, p_cenv->env1, arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_48__closureinit -( -__patsfun_48__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0, atstkind_type(atstype_ptrk) env1 -) -{ -p_cenv->env0 = env0 ; -p_cenv->env1 = env1 ; -p_cenv->cfun = __patsfun_48__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_48__closurerize -( -atstkind_t0ype(atstype_int) env0, atstkind_type(atstype_ptrk) env1 -) -{ -return __patsfun_48__closureinit(ATS_MALLOC(sizeof(__patsfun_48__closure_t0ype)), env0, env1) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_49, (atstkind_type(atstype_ptrk)), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -atstkind_type(atstype_ptrk) env0 ; -} __patsfun_49__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_49__cfun -( -__patsfun_49__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_49(p_cenv->env0, arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_49__closureinit -( -__patsfun_49__closure_t0ype *p_cenv, atstkind_type(atstype_ptrk) env0 -) -{ -p_cenv->env0 = env0 ; -p_cenv->cfun = __patsfun_49__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_49__closurerize -( -atstkind_type(atstype_ptrk) env0 -) -{ -return __patsfun_49__closureinit(ATS_MALLOC(sizeof(__patsfun_49__closure_t0ype)), env0) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_50, (), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -} __patsfun_50__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_50__cfun -( -__patsfun_50__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_50(arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_50__closureinit -( -__patsfun_50__closure_t0ype *p_cenv -) -{ -p_cenv->cfun = __patsfun_50__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_50__closurerize -( -// argumentless -) -{ -return __patsfun_50__closureinit(ATS_MALLOC(sizeof(__patsfun_50__closure_t0ype))) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_51, (atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -atstkind_t0ype(atstype_int) env0 ; -} __patsfun_51__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_51__cfun -( -__patsfun_51__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_51(p_cenv->env0, arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_51__closureinit -( -__patsfun_51__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0 -) -{ -p_cenv->env0 = env0 ; -p_cenv->cfun = __patsfun_51__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_51__closurerize -( -atstkind_t0ype(atstype_int) env0 -) -{ -return __patsfun_51__closureinit(ATS_MALLOC(sizeof(__patsfun_51__closure_t0ype)), env0) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_52, (), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -} __patsfun_52__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_52__cfun -( -__patsfun_52__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_52(arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_52__closureinit -( -__patsfun_52__closure_t0ype *p_cenv -) -{ -p_cenv->cfun = __patsfun_52__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_52__closurerize -( -// argumentless -) -{ -return __patsfun_52__closureinit(ATS_MALLOC(sizeof(__patsfun_52__closure_t0ype))) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_53, (), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -} __patsfun_53__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_53__cfun -( -__patsfun_53__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_53(arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_53__closureinit -( -__patsfun_53__closure_t0ype *p_cenv -) -{ -p_cenv->cfun = __patsfun_53__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_53__closurerize -( -// argumentless -) -{ -return __patsfun_53__closureinit(ATS_MALLOC(sizeof(__patsfun_53__closure_t0ype))) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_55, (atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk)), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -atstkind_t0ype(atstype_int) env0 ; -atstkind_t0ype(atstype_int) env1 ; -atstkind_type(atstype_ptrk) env2 ; -} __patsfun_55__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_55__cfun -( -__patsfun_55__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_55(p_cenv->env0, p_cenv->env1, p_cenv->env2, arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_55__closureinit -( -__patsfun_55__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2 -) -{ -p_cenv->env0 = env0 ; -p_cenv->env1 = env1 ; -p_cenv->env2 = env2 ; -p_cenv->cfun = __patsfun_55__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_55__closurerize -( -atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2 -) -{ -return __patsfun_55__closureinit(ATS_MALLOC(sizeof(__patsfun_55__closure_t0ype)), env0, env1, env2) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_56, (atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk)), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -atstkind_t0ype(atstype_int) env0 ; -atstkind_t0ype(atstype_int) env1 ; -atstkind_type(atstype_ptrk) env2 ; -} __patsfun_56__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_56__cfun -( -__patsfun_56__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_56(p_cenv->env0, p_cenv->env1, p_cenv->env2, arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_56__closureinit -( -__patsfun_56__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2 -) -{ -p_cenv->env0 = env0 ; -p_cenv->env1 = env1 ; -p_cenv->env2 = env2 ; -p_cenv->cfun = __patsfun_56__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_56__closurerize -( -atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2 -) -{ -return __patsfun_56__closureinit(ATS_MALLOC(sizeof(__patsfun_56__closure_t0ype)), env0, env1, env2) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_60__60__1, (atstkind_type(atstype_ptrk), atstype_cloptr), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -atstkind_type(atstype_ptrk) env0 ; -atstype_cloptr env1 ; -} __patsfun_60__60__1__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_60__60__1__cfun -( -__patsfun_60__60__1__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_60__60__1(p_cenv->env0, p_cenv->env1, arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_60__60__1__closureinit -( -__patsfun_60__60__1__closure_t0ype *p_cenv, atstkind_type(atstype_ptrk) env0, atstype_cloptr env1 -) -{ -p_cenv->env0 = env0 ; -p_cenv->env1 = env1 ; -p_cenv->cfun = __patsfun_60__60__1__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_60__60__1__closurerize -( -atstkind_type(atstype_ptrk) env0, atstype_cloptr env1 -) -{ -return __patsfun_60__60__1__closureinit(ATS_MALLOC(sizeof(__patsfun_60__60__1__closure_t0ype)), env0, env1) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_64, (), (atsrefarg1_type(atstkind_t0ype(atstype_int))), atstkind_t0ype(atstype_bool)) -typedef -ATSstruct { -atstype_funptr cfun ; -} __patsfun_64__closure_t0ype ; -ATSstatic() -atstkind_t0ype(atstype_bool) -__patsfun_64__cfun -( -__patsfun_64__closure_t0ype *p_cenv, atsrefarg1_type(atstkind_t0ype(atstype_int)) arg0 -) -{ -ATSFCreturn(__patsfun_64(arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_64__closureinit -( -__patsfun_64__closure_t0ype *p_cenv -) -{ -p_cenv->cfun = __patsfun_64__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_64__closurerize -( -// argumentless -) -{ -return __patsfun_64__closureinit(ATS_MALLOC(sizeof(__patsfun_64__closure_t0ype))) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_104, (atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -atstkind_t0ype(atstype_int) env0 ; -} __patsfun_104__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_104__cfun -( -__patsfun_104__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_104(p_cenv->env0, arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_104__closureinit -( -__patsfun_104__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0 -) -{ -p_cenv->env0 = env0 ; -p_cenv->cfun = __patsfun_104__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_104__closurerize -( -atstkind_t0ype(atstype_int) env0 -) -{ -return __patsfun_104__closureinit(ATS_MALLOC(sizeof(__patsfun_104__closure_t0ype)), env0) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_105, (), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -} __patsfun_105__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_105__cfun -( -__patsfun_105__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_105(arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_105__closureinit -( -__patsfun_105__closure_t0ype *p_cenv -) -{ -p_cenv->cfun = __patsfun_105__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_105__closurerize -( -// argumentless -) -{ -return __patsfun_105__closureinit(ATS_MALLOC(sizeof(__patsfun_105__closure_t0ype))) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_106, (), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -} __patsfun_106__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_106__cfun -( -__patsfun_106__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_106(arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_106__closureinit -( -__patsfun_106__closure_t0ype *p_cenv -) -{ -p_cenv->cfun = __patsfun_106__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_106__closurerize -( -// argumentless -) -{ -return __patsfun_106__closureinit(ATS_MALLOC(sizeof(__patsfun_106__closure_t0ype))) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_109, (atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -atstkind_t0ype(atstype_int) env0 ; -atstkind_t0ype(atstype_int) env1 ; -} __patsfun_109__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_109__cfun -( -__patsfun_109__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_109(p_cenv->env0, p_cenv->env1, arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_109__closureinit -( -__patsfun_109__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1 -) -{ -p_cenv->env0 = env0 ; -p_cenv->env1 = env1 ; -p_cenv->cfun = __patsfun_109__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_109__closurerize -( -atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1 -) -{ -return __patsfun_109__closureinit(ATS_MALLOC(sizeof(__patsfun_109__closure_t0ype)), env0, env1) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_110, (atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -atstkind_t0ype(atstype_int) env0 ; -} __patsfun_110__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_110__cfun -( -__patsfun_110__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_110(p_cenv->env0, arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_110__closureinit -( -__patsfun_110__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0 -) -{ -p_cenv->env0 = env0 ; -p_cenv->cfun = __patsfun_110__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_110__closurerize -( -atstkind_t0ype(atstype_int) env0 -) -{ -return __patsfun_110__closureinit(ATS_MALLOC(sizeof(__patsfun_110__closure_t0ype)), env0) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_111, (), (atstype_bool), atstype_boxed) -typedef -ATSstruct { -atstype_funptr cfun ; -} __patsfun_111__closure_t0ype ; -ATSstatic() -atstype_boxed -__patsfun_111__cfun -( -__patsfun_111__closure_t0ype *p_cenv, atstype_bool arg0 -) -{ -ATSFCreturn(__patsfun_111(arg0)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_111__closureinit -( -__patsfun_111__closure_t0ype *p_cenv -) -{ -p_cenv->cfun = __patsfun_111__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_111__closurerize -( -// argumentless -) -{ -return __patsfun_111__closureinit(ATS_MALLOC(sizeof(__patsfun_111__closure_t0ype))) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -ATSclosurerize_beg(__patsfun_124, (), (postiats_tyrec_0, atsrefarg1_type(atstkind_t0ype(atstype_int))), postiats_tyrec_0) -typedef -ATSstruct { -atstype_funptr cfun ; -} __patsfun_124__closure_t0ype ; -ATSstatic() -postiats_tyrec_0 -__patsfun_124__cfun -( -__patsfun_124__closure_t0ype *p_cenv, postiats_tyrec_0 arg0, atsrefarg1_type(atstkind_t0ype(atstype_int)) arg1 -) -{ -ATSFCreturn(__patsfun_124(arg0, arg1)) ; -} /* end of [cfun] */ -ATSstatic() -atstype_cloptr -__patsfun_124__closureinit -( -__patsfun_124__closure_t0ype *p_cenv -) -{ -p_cenv->cfun = __patsfun_124__cfun ; -return p_cenv ; -} /* end of [closureinit] */ -ATSstatic() -atstype_cloptr -__patsfun_124__closurerize -( -// argumentless -) -{ -return __patsfun_124__closureinit(ATS_MALLOC(sizeof(__patsfun_124__closure_t0ype))) ; -} /* end of [closurerize] */ -ATSclosurerize_end() -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 738(line=23, offs=4) -- 789(line=24, offs=14) -*/ -/* -local: -global: witness_0$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -witness_0(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret0, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 738(line=23, offs=4) -- 789(line=24, offs=14) -*/ -ATSINSflab(__patsflab_witness_0): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 778(line=24, offs=3) -- 788(line=24, offs=13) -*/ -ATSINSmove(tmpret0, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), arg0)) ; -ATSfunbody_end() -ATSreturn(tmpret0) ; -} /* end of [witness_0] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 854(line=27, offs=5) -- 1073(line=35, offs=6) -*/ -/* -local: -global: fib_gmp_1$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -fib_gmp_1(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret1, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref2, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref5, atstkind_t0ype(atstype_ulint)) ; -ATStmpdec(tmp6, atstkind_t0ype(atstype_int)) ; -// ATStmpdec_void(tmp7) ; -// ATStmpdec_void(tmp8) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 854(line=27, offs=5) -- 1073(line=35, offs=6) -*/ -ATSINSflab(__patsflab_fib_gmp_1): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 890(line=28, offs=3) -- 1073(line=35, offs=6) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 902(line=29, offs=9) -- 903(line=29, offs=10) -*/ -/* -ATSINStmpdec(tmpref2) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 906(line=29, offs=13) -- 917(line=29, offs=24) -*/ -ATSINSmove(tmpref2, ATSLIB_056_prelude__ptr_alloc__2__1()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 926(line=30, offs=9) -- 927(line=30, offs=10) -*/ -/* -ATSINStmpdec(tmpref5) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 958(line=30, offs=41) -- 963(line=30, offs=46) -*/ -ATSINSmove(tmp6, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 937(line=30, offs=20) -- 964(line=30, offs=47) -*/ -ATSINSmove(tmpref5, atspre_g0int2uint_int_ulint(tmp6)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 978(line=31, offs=14) -- 999(line=31, offs=35) -*/ -ATSINSmove_void(tmp7, atscntrb_gmp_mpz_init(ATSPMVrefarg1(ATSSELrecsin(tmpref2, atstkind_type(atstype_ptrk), atslab__2)))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1013(line=32, offs=14) -- 1041(line=32, offs=42) -*/ -ATSINSmove_void(tmp8, atscntrb_gmp_mpz_fib_uint(ATSPMVrefarg1(ATSSELrecsin(tmpref2, atstkind_type(atstype_ptrk), atslab__2)), tmpref5)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1051(line=34, offs=5) -- 1066(line=34, offs=20) -*/ -ATSINSmove(tmpret1, ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), tmpref2)) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 890(line=28, offs=3) -- 1073(line=35, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret1) ; -} /* end of [fib_gmp_1] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$2$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = None() -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__2() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret3, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret3, atspre_ptr_alloc_tsz(ATSPMVsizeof(atstyvar_type(a)))) ; - -ATSfunbody_end() -ATSreturn(tmpret3) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__2] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$2$1(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2EVar(5569)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__2__1() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret3__1, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret3__1, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret3__1) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__2__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1151(line=38, offs=5) -- 1590(line=59, offs=10) -*/ -/* -local: exp_5$0(level=0) -global: exp_5$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -exp_5(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret9, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp10, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmpref15, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref16, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp17, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp22, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref23, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp24, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp25, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1151(line=38, offs=5) -- 1590(line=59, offs=10) -*/ -ATSINSflab(__patsflab_exp_5): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1201(line=39, offs=3) -- 1590(line=59, offs=10) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1218(line=40, offs=7) -- 1219(line=40, offs=8) -*/ -ATSINSlab(__atstmplab0): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1170(line=38, offs=24) -- 1171(line=38, offs=25) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab2) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1219(line=40, offs=8) -- 1219(line=40, offs=8) -*/ -ATSINSlab(__atstmplab1): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1223(line=40, offs=12) -- 1224(line=40, offs=13) -*/ -ATSINSmove(tmpret9, ATSPMVi0nt(0)) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1232(line=41, offs=8) -- 1232(line=41, offs=8) -*/ -ATSINSlab(__atstmplab2): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1261(line=43, offs=12) -- 1266(line=43, offs=17) -*/ -ATSINSmove(tmp10, ATSLIB_056_prelude__gt_g1int_int__6__1(arg1, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1258(line=43, offs=9) -- 1580(line=58, offs=12) -*/ -ATSif( -tmp10 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1282(line=44, offs=11) -- 1555(line=56, offs=14) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1302(line=45, offs=17) -- 1304(line=45, offs=19) -*/ -/* -ATSINStmpdec(tmpref15) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1307(line=45, offs=22) -- 1313(line=45, offs=28) -*/ -ATSINSmove(tmpref15, atspre_g1int_half_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1331(line=46, offs=17) -- 1333(line=46, offs=19) -*/ -/* -ATSINStmpdec(tmpref16) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1336(line=46, offs=22) -- 1341(line=46, offs=27) -*/ -ATSINSmove(tmpref16, atspre_g0int_mod_int(arg1, ATSPMVi0nt(2))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1370(line=48, offs=16) -- 1376(line=48, offs=22) -*/ -ATSINSmove(tmp17, ATSLIB_056_prelude__eq_g0int_int__12__1(tmpref16, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1367(line=48, offs=13) -- 1541(line=55, offs=18) -*/ -ATSif( -tmp17 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1400(line=49, offs=19) -- 1405(line=49, offs=24) -*/ -ATSINSmove(tmp22, atspre_g0int_mul_int(arg0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1396(line=49, offs=15) -- 1410(line=49, offs=29) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, tmp22) ; -ATSINSmove_tlcal(apy1, tmpref15) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSfgoto(__patsflab_exp_5) ; -ATStailcal_end() - -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1442(line=51, offs=15) -- 1541(line=55, offs=18) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1466(line=52, offs=21) -- 1467(line=52, offs=22) -*/ -/* -ATSINStmpdec(tmpref23) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1478(line=52, offs=33) -- 1483(line=52, offs=38) -*/ -ATSINSmove(tmp25, atspre_g0int_mul_int(arg0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1474(line=52, offs=29) -- 1488(line=52, offs=43) -*/ -ATSINSmove(tmp24, exp_5(tmp25, tmpref15)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1470(line=52, offs=25) -- 1488(line=52, offs=43) -*/ -ATSINSmove(tmpref23, atspre_g0int_mul_int(arg0, tmp24)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1522(line=54, offs=17) -- 1523(line=54, offs=18) -*/ -ATSINSmove(tmpret9, tmpref23) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1442(line=51, offs=15) -- 1541(line=55, offs=18) -*/ -/* -INSletpop() -*/ -} /* ATSendif */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1282(line=44, offs=11) -- 1555(line=56, offs=14) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1579(line=58, offs=11) -- 1580(line=58, offs=12) -*/ -ATSINSmove(tmpret9, ATSPMVi0nt(1)) ; -} /* ATSendif */ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret9) ; -} /* end of [exp_5] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) -*/ -/* -local: -global: gt_g1int_int$6$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = tk(4703) -tmparg = S2Evar(tk(4703)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret11, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp12, atstkind_t0ype(atstyvar_type(tk))) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) -*/ -ATSINSflab(__patsflab_gt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) -*/ -ATSINSmove(tmp12, PMVtmpltcst(g1int2int)(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) -*/ -ATSINSmove(tmpret11, PMVtmpltcst(g1int_gt)(arg0, tmp12)) ; - -ATSfunbody_end() -ATSreturn(tmpret11) ; -} /* end of [ATSLIB_056_prelude__gt_g1int_int__6] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) -*/ -/* -local: -global: gt_g1int_int$6$1(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4703) -tmparg = S2Evar(tk(4703)) -tmpsub = Some(tk(4703) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret11__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp12__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) -*/ -ATSINSflab(__patsflab_gt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) -*/ -ATSINSmove(tmp12__1, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) -*/ -ATSINSmove(tmpret11__1, atspre_g1int_gt_int(arg0, tmp12__1)) ; - -ATSfunbody_end() -ATSreturn(tmpret11__1) ; -} /* end of [ATSLIB_056_prelude__gt_g1int_int__6__1] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19, atstkind_t0ype(atstyvar_type(tk))) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19, PMVtmpltcst(g0int2int)(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18, PMVtmpltcst(g0int_eq)(arg0, tmp19)) ; - -ATSfunbody_end() -ATSreturn(tmpret18) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$1(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__1, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__1, atspre_g0int_eq_int(arg0, tmp19__1)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__1) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1595(line=61, offs=4) -- 1735(line=66, offs=6) -*/ -/* -local: witness_0$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -sqrt_int_17(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret26, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref27, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp28, atstkind_t0ype(atstype_float)) ; -ATStmpdec(tmp29, atstkind_t0ype(atstype_float)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1595(line=61, offs=4) -- 1735(line=66, offs=6) -*/ -ATSINSflab(__patsflab_sqrt_int_17): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1641(line=62, offs=3) -- 1735(line=66, offs=6) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1653(line=63, offs=9) -- 1658(line=63, offs=14) -*/ -/* -ATSINStmpdec(tmpref27) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1689(line=63, offs=45) -- 1702(line=63, offs=58) -*/ -ATSINSmove(tmp29, atspre_g0int2float_int_float(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1678(line=63, offs=34) -- 1704(line=63, offs=60) -*/ -ATSINSmove(tmp28, atslib_libats_libc_sqrt_float(tmp29)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1666(line=63, offs=22) -- 1705(line=63, offs=61) -*/ -ATSINSmove(tmpref27, atspre_g0float2int_float_int(tmp28)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1715(line=65, offs=5) -- 1728(line=65, offs=18) -*/ -ATSINSmove(tmpret26, witness_0(tmpref27)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1641(line=62, offs=3) -- 1735(line=66, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret26) ; -} /* end of [sqrt_int_17] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1771(line=69, offs=4) -- 2352(line=92, offs=10) -*/ -/* -local: sqrt_int_17$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), is_prime_20$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_bool) -is_prime_20(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret30, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp51, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1771(line=69, offs=4) -- 2352(line=92, offs=10) -*/ -ATSINSflab(__patsflab_is_prime_20): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1807(line=70, offs=3) -- 2352(line=92, offs=10) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1824(line=71, offs=7) -- 1825(line=71, offs=8) -*/ -ATSINSlab(__atstmplab3): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1780(line=69, offs=13) -- 1781(line=69, offs=14) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab5) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1825(line=71, offs=8) -- 1825(line=71, offs=8) -*/ -ATSINSlab(__atstmplab4): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1829(line=71, offs=12) -- 1834(line=71, offs=17) -*/ -ATSINSmove(tmpret30, ATSPMVbool_false()) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1842(line=72, offs=8) -- 1842(line=72, offs=8) -*/ -ATSINSlab(__atstmplab5): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1867(line=74, offs=9) -- 2342(line=91, offs=12) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2318(line=90, offs=19) -- 2328(line=90, offs=29) -*/ -ATSINSmove(tmp51, sqrt_int_17(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2310(line=90, offs=11) -- 2330(line=90, offs=31) -*/ -ATSINSmove(tmpret30, loop_21(arg0, ATSPMVi0nt(2), tmp51)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1867(line=74, offs=9) -- 2342(line=91, offs=12) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret30) ; -} /* end of [is_prime_20] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1885(line=75, offs=15) -- 2288(line=88, offs=21) -*/ -/* -local: loop_21$0(level=1) -global: loop_21$0(level=1) -local: k$5106(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -global: k$5106(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -*/ -ATSstatic() -atstkind_t0ype(atstype_bool) -loop_21(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret31, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp32, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp37, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp40, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp41, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp42, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp47, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp50, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -/* -emit_funent_fnxdeclst: -*/ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1885(line=75, offs=15) -- 2288(line=88, offs=21) -*/ -ATSINSflab(__patsflab_loop_21): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1975(line=76, offs=16) -- 1984(line=76, offs=25) -*/ -ATSINSmove(tmp32, ATSLIB_056_prelude__lt_g1int_int__22__1(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1972(line=76, offs=13) -- 2288(line=88, offs=21) -*/ -ATSif( -tmp32 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2007(line=77, offs=18) -- 2012(line=77, offs=23) -*/ -ATSINSmove(tmp40, atspre_g0int_mod_int(env0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2007(line=77, offs=18) -- 2016(line=77, offs=27) -*/ -ATSINSmove(tmp37, ATSLIB_056_prelude__eq_g0int_int__12__2(tmp40, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2004(line=77, offs=15) -- 2097(line=80, offs=35) -*/ -ATSif( -tmp37 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2038(line=78, offs=17) -- 2043(line=78, offs=22) -*/ -ATSINSmove(tmpret31, ATSPMVbool_false()) ; -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2084(line=80, offs=22) -- 2089(line=80, offs=27) -*/ -ATSINSmove(tmp41, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2079(line=80, offs=17) -- 2097(line=80, offs=35) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, tmp41) ; -ATSINSmove_tlcal(apy1, arg1) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSfgoto(__patsflab_loop_21) ; -ATStailcal_end() - -} /* ATSendif */ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2132(line=82, offs=18) -- 2141(line=82, offs=27) -*/ -ATSINSmove(tmp42, ATSLIB_056_prelude__eq_g1int_int__26__1(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2129(line=82, offs=15) -- 2288(line=88, offs=21) -*/ -ATSif( -tmp42 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2166(line=83, offs=20) -- 2171(line=83, offs=25) -*/ -ATSINSmove(tmp50, atspre_g0int_mod_int(env0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2166(line=83, offs=20) -- 2175(line=83, offs=29) -*/ -ATSINSmove(tmp47, ATSLIB_056_prelude__eq_g0int_int__12__3(tmp50, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2163(line=83, offs=17) -- 2248(line=86, offs=23) -*/ -ATSif( -tmp47 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2199(line=84, offs=19) -- 2204(line=84, offs=24) -*/ -ATSINSmove(tmpret31, ATSPMVbool_false()) ; -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2244(line=86, offs=19) -- 2248(line=86, offs=23) -*/ -ATSINSmove(tmpret31, ATSPMVbool_true()) ; -} /* ATSendif */ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2284(line=88, offs=17) -- 2288(line=88, offs=21) -*/ -ATSINSmove(tmpret31, ATSPMVbool_true()) ; -} /* ATSendif */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret31) ; -/* -emit_funent_fnxbodylst: -*/ -} /* end of [loop_21] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) -*/ -/* -local: -global: lt_g1int_int$22$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = tk(4697) -tmparg = S2Evar(tk(4697)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__22(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret33, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp34, atstkind_t0ype(atstyvar_type(tk))) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) -*/ -ATSINSflab(__patsflab_lt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) -*/ -ATSINSmove(tmp34, PMVtmpltcst(g1int2int)(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) -*/ -ATSINSmove(tmpret33, PMVtmpltcst(g1int_lt)(arg0, tmp34)) ; - -ATSfunbody_end() -ATSreturn(tmpret33) ; -} /* end of [ATSLIB_056_prelude__lt_g1int_int__22] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) -*/ -/* -local: -global: lt_g1int_int$22$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4697) -tmparg = S2Evar(tk(4697)) -tmpsub = Some(tk(4697) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__22__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret33__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp34__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) -*/ -ATSINSflab(__patsflab_lt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) -*/ -ATSINSmove(tmp34__1, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) -*/ -ATSINSmove(tmpret33__1, atspre_g1int_lt_int(arg0, tmp34__1)) ; - -ATSfunbody_end() -ATSreturn(tmpret33__1) ; -} /* end of [ATSLIB_056_prelude__lt_g1int_int__22__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$2(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__2, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__2, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__2, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__2, atspre_g0int_eq_int(arg0, tmp19__2)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__2) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__2] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) -*/ -/* -local: -global: eq_g1int_int$26$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = tk(4709) -tmparg = S2Evar(tk(4709)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g1int_int__26(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret43, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp44, atstkind_t0ype(atstyvar_type(tk))) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12823(line=667, offs=1) -- 12877(line=668, offs=42) -*/ -ATSINSflab(__patsflab_eq_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) -*/ -ATSINSmove(tmp44, PMVtmpltcst(g1int2int)(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) -*/ -ATSINSmove(tmpret43, PMVtmpltcst(g1int_eq)(arg0, tmp44)) ; - -ATSfunbody_end() -ATSreturn(tmpret43) ; -} /* end of [ATSLIB_056_prelude__eq_g1int_int__26] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) -*/ -/* -local: -global: eq_g1int_int$26$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4709) -tmparg = S2Evar(tk(4709)) -tmpsub = Some(tk(4709) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g1int_int__26__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret43__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp44__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12823(line=667, offs=1) -- 12877(line=668, offs=42) -*/ -ATSINSflab(__patsflab_eq_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) -*/ -ATSINSmove(tmp44__1, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) -*/ -ATSINSmove(tmpret43__1, atspre_g1int_eq_int(arg0, tmp44__1)) ; - -ATSfunbody_end() -ATSreturn(tmpret43__1) ; -} /* end of [ATSLIB_056_prelude__eq_g1int_int__26__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$3(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__3, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__3, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__3, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__3, atspre_g0int_eq_int(arg0, tmp19__3)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__3) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__3] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 306(line=12, offs=4) -- 354(line=13, offs=12) -*/ -/* -local: -global: divides_30$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_bool) -divides_30(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret52, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp55, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 306(line=12, offs=4) -- 354(line=13, offs=12) -*/ -ATSINSflab(__patsflab_divides_30): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 345(line=13, offs=3) -- 350(line=13, offs=8) -*/ -ATSINSmove(tmp55, atspre_g0int_mod_int(arg1, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 345(line=13, offs=3) -- 354(line=13, offs=12) -*/ -ATSINSmove(tmpret52, ATSLIB_056_prelude__eq_g0int_int__12__4(tmp55, ATSPMVi0nt(0))) ; - -ATSfunbody_end() -ATSreturn(tmpret52) ; -} /* end of [divides_30] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$4(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__4, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__4, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__4, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__4, atspre_g0int_eq_int(arg0, tmp19__4)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__4) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__4] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 360(line=15, offs=5) -- 466(line=19, offs=6) -*/ -/* -local: witness_0$0(level=0), gcd_32$0(level=0) -global: witness_0$0(level=0), gcd_32$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -gcd_32(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret56, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp57, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp60, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp61, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -/* -emit_funent_fnxdeclst: -*/ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 360(line=15, offs=5) -- 466(line=19, offs=6) -*/ -ATSINSflab(__patsflab_gcd_32): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 416(line=16, offs=6) -- 421(line=16, offs=11) -*/ -ATSINSmove(tmp57, ATSLIB_056_prelude__gt_g1int_int__6__2(arg1, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 413(line=16, offs=3) -- 466(line=19, offs=6) -*/ -ATSif( -tmp57 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 446(line=17, offs=20) -- 451(line=17, offs=25) -*/ -ATSINSmove(tmp61, atspre_g0int_mod_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 438(line=17, offs=12) -- 452(line=17, offs=26) -*/ -ATSINSmove(tmp60, witness_0(tmp61)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 431(line=17, offs=5) -- 453(line=17, offs=27) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, arg1) ; -ATSINSmove_tlcal(apy1, tmp60) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSfgoto(__patsflab_gcd_32) ; -ATStailcal_end() - -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 465(line=19, offs=5) -- 466(line=19, offs=6) -*/ -ATSINSmove(tmpret56, arg0) ; -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret56) ; -/* -emit_funent_fnxbodylst: -*/ -} /* end of [gcd_32] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) -*/ -/* -local: -global: gt_g1int_int$6$2(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4703) -tmparg = S2Evar(tk(4703)) -tmpsub = Some(tk(4703) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret11__2, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp12__2, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) -*/ -ATSINSflab(__patsflab_gt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) -*/ -ATSINSmove(tmp12__2, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) -*/ -ATSINSmove(tmpret11__2, atspre_g1int_gt_int(arg0, tmp12__2)) ; - -ATSfunbody_end() -ATSreturn(tmpret11__2) ; -} /* end of [ATSLIB_056_prelude__gt_g1int_int__6__2] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 471(line=21, offs=4) -- 543(line=22, offs=22) -*/ -/* -local: gcd_32$0(level=0) -global: witness_0$0(level=0), gcd_32$0(level=0), lcm_34$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -lcm_34(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret62, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp63, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp64, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 471(line=21, offs=4) -- 543(line=22, offs=22) -*/ -ATSINSflab(__patsflab_lcm_34): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 529(line=22, offs=8) -- 538(line=22, offs=17) -*/ -ATSINSmove(tmp64, gcd_32(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 525(line=22, offs=4) -- 538(line=22, offs=17) -*/ -ATSINSmove(tmp63, atspre_g0int_div_int(arg0, tmp64)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 524(line=22, offs=3) -- 543(line=22, offs=22) -*/ -ATSINSmove(tmpret62, atspre_g0int_mul_int(tmp63, arg1)) ; - -ATSfunbody_end() -ATSreturn(tmpret62) ; -} /* end of [lcm_34] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 586(line=25, offs=4) -- 1602(line=57, offs=8) -*/ -/* -local: sqrt_int_17$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), divisors_36$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -divisors_36(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret65, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 586(line=25, offs=4) -- 1602(line=57, offs=8) -*/ -ATSINSflab(__patsflab_divisors_36): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 631(line=26, offs=3) -- 1602(line=57, offs=8) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 648(line=27, offs=7) -- 649(line=27, offs=8) -*/ -ATSINSlab(__atstmplab6): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 595(line=25, offs=13) -- 596(line=25, offs=14) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab8) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 649(line=27, offs=8) -- 649(line=27, offs=8) -*/ -ATSINSlab(__atstmplab7): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 653(line=27, offs=12) -- 703(line=27, offs=62) -*/ -ATSINSmove_ldelay(tmpret65, atstype_boxed, ATSPMVcfunlab(1, __patsfun_37, ())) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 711(line=28, offs=8) -- 711(line=28, offs=8) -*/ -ATSINSlab(__atstmplab8): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 715(line=28, offs=12) -- 1602(line=57, offs=8) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1584(line=56, offs=7) -- 1594(line=56, offs=17) -*/ -ATSINSmove(tmpret65, loop_39(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 715(line=28, offs=12) -- 1602(line=57, offs=8) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret65) ; -} /* end of [divisors_36] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 653(line=27, offs=12) -- 703(line=27, offs=62) -*/ -/* -local: -global: __patsfun_37$0(level=1) -local: -global: -*/ -ATSstatic() -atstype_boxed -__patsfun_37(atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret66, atstype_boxed) ; -ATStmpdec(tmp67, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 653(line=27, offs=12) -- 703(line=27, offs=62) -*/ -ATSINSflab(__patsflab___patsfun_37): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 653(line=27, offs=12) -- 703(line=27, offs=62) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 679(line=27, offs=38) -- 701(line=27, offs=60) -*/ -ATSINSmove_ldelay(tmp67, atstype_boxed, ATSPMVcfunlab(1, __patsfun_38, ())) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 661(line=27, offs=20) -- 702(line=27, offs=61) -*/ - -/* -#LINCONSTATUS==0 -*/ -ATSINSmove_con1_beg() -ATSINSmove_con1_new(tmpret66, postiats_tysum_1) ; -#if(0) -ATSINSstore_con1_tag(tmpret66, 1) ; -#endif -ATSINSstore_con1_ofs(tmpret66, postiats_tysum_1, atslab__0, ATSPMVi0nt(1)) ; -ATSINSstore_con1_ofs(tmpret66, postiats_tysum_1, atslab__1, tmp67) ; -ATSINSmove_con1_end() -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret66) ; -} /* end of [__patsfun_37] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 679(line=27, offs=38) -- 701(line=27, offs=60) -*/ -/* -local: -global: __patsfun_38$0(level=2) -local: -global: -*/ -ATSstatic() -atstype_boxed -__patsfun_38(atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret68, atstype_boxed) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 679(line=27, offs=38) -- 701(line=27, offs=60) -*/ -ATSINSflab(__patsflab___patsfun_38): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 679(line=27, offs=38) -- 701(line=27, offs=60) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 687(line=27, offs=46) -- 700(line=27, offs=59) -*/ - -ATSINSmove_nil(tmpret68) ; - -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret68) ; -} /* end of [__patsfun_38] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 729(line=29, offs=11) -- 1570(line=54, offs=29) -*/ -/* -local: sqrt_int_17$0(level=0), loop_39$0(level=1) -global: sqrt_int_17$0(level=0), loop_39$0(level=1) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -loop_39(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret69, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp70, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp75, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp76, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp79, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp80, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp85, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref86, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp96, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp99, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref100, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp106, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 729(line=29, offs=11) -- 1570(line=54, offs=29) -*/ -ATSINSflab(__patsflab_loop_39): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 836(line=30, offs=19) -- 846(line=30, offs=29) -*/ -ATSINSmove(tmp75, sqrt_int_17(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 829(line=30, offs=12) -- 846(line=30, offs=29) -*/ -ATSINSmove(tmp70, ATSLIB_056_prelude__gte_g1int_int__40__1(arg1, tmp75)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 826(line=30, offs=9) -- 1570(line=54, offs=29) -*/ -ATSif( -tmp70 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 866(line=31, offs=14) -- 873(line=31, offs=21) -*/ -ATSINSmove(tmp79, atspre_g0int_mod_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 866(line=31, offs=14) -- 877(line=31, offs=25) -*/ -ATSINSmove(tmp76, ATSLIB_056_prelude__eq_g0int_int__12__5(tmp79, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 863(line=31, offs=11) -- 1310(line=45, offs=35) -*/ -ATSif( -tmp76 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 898(line=32, offs=16) -- 905(line=32, offs=23) -*/ -ATSINSmove(tmp85, atspre_g1int_div_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 898(line=32, offs=16) -- 912(line=32, offs=30) -*/ -ATSINSmove(tmp80, ATSLIB_056_prelude__neq_g1int_int__44__1(tmp85, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 895(line=32, offs=13) -- 1260(line=43, offs=18) -*/ -ATSif( -tmp80 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 932(line=33, offs=15) -- 1104(line=37, offs=18) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 956(line=34, offs=21) -- 957(line=34, offs=22) -*/ -/* -ATSINStmpdec(tmpref86) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 965(line=34, offs=30) -- 972(line=34, offs=37) -*/ -ATSINSmove(tmpref86, atspre_g1int_div_int(arg0, arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1006(line=36, offs=17) -- 1086(line=36, offs=97) -*/ -ATSINSmove_ldelay(tmpret69, atstype_boxed, ATSPMVcfunlab(1, __patsfun_48, (arg1, ATSPMVptrof(tmpref86)))) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 932(line=33, offs=15) -- 1104(line=37, offs=18) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1190(line=42, offs=17) -- 1242(line=42, offs=69) -*/ -ATSINSmove_ldelay(tmpret69, atstype_boxed, ATSPMVcfunlab(1, __patsfun_51, (arg1))) ; -} /* ATSendif */ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1288(line=45, offs=13) -- 1310(line=45, offs=35) -*/ -ATSINSmove_ldelay(tmpret69, atstype_boxed, ATSPMVcfunlab(1, __patsfun_53, ())) ; -} /* ATSendif */ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1337(line=47, offs=14) -- 1344(line=47, offs=21) -*/ -ATSINSmove(tmp99, atspre_g0int_mod_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1337(line=47, offs=14) -- 1348(line=47, offs=25) -*/ -ATSINSmove(tmp96, ATSLIB_056_prelude__eq_g0int_int__12__6(tmp99, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1334(line=47, offs=11) -- 1570(line=54, offs=29) -*/ -ATSif( -tmp96 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1366(line=48, offs=13) -- 1526(line=52, offs=16) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1388(line=49, offs=19) -- 1389(line=49, offs=20) -*/ -/* -ATSINStmpdec(tmpref100) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1397(line=49, offs=28) -- 1404(line=49, offs=35) -*/ -ATSINSmove(tmpref100, atspre_g1int_div_int(arg0, arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1434(line=51, offs=15) -- 1510(line=51, offs=91) -*/ -ATSINSmove_ldelay(tmpret69, atstype_boxed, ATSPMVcfunlab(1, __patsfun_55, (arg0, arg1, ATSPMVptrof(tmpref100)))) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1366(line=48, offs=13) -- 1526(line=52, offs=16) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1562(line=54, offs=21) -- 1569(line=54, offs=28) -*/ -ATSINSmove(tmp106, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1554(line=54, offs=13) -- 1570(line=54, offs=29) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, arg0) ; -ATSINSmove_tlcal(apy1, tmp106) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSfgoto(__patsflab_loop_39) ; -ATStailcal_end() - -} /* ATSendif */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret69) ; -} /* end of [loop_39] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) -*/ -/* -local: -global: gte_g1int_int$40$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = tk(4706) -tmparg = S2Evar(tk(4706)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gte_g1int_int__40(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret71, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp72, atstkind_t0ype(atstyvar_type(tk))) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12741(line=662, offs=1) -- 12797(line=663, offs=43) -*/ -ATSINSflab(__patsflab_gte_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) -*/ -ATSINSmove(tmp72, PMVtmpltcst(g1int2int)(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) -*/ -ATSINSmove(tmpret71, PMVtmpltcst(g1int_gte)(arg0, tmp72)) ; - -ATSfunbody_end() -ATSreturn(tmpret71) ; -} /* end of [ATSLIB_056_prelude__gte_g1int_int__40] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) -*/ -/* -local: -global: gte_g1int_int$40$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4706) -tmparg = S2Evar(tk(4706)) -tmpsub = Some(tk(4706) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gte_g1int_int__40__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret71__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp72__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12741(line=662, offs=1) -- 12797(line=663, offs=43) -*/ -ATSINSflab(__patsflab_gte_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) -*/ -ATSINSmove(tmp72__1, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) -*/ -ATSINSmove(tmpret71__1, atspre_g1int_gte_int(arg0, tmp72__1)) ; - -ATSfunbody_end() -ATSreturn(tmpret71__1) ; -} /* end of [ATSLIB_056_prelude__gte_g1int_int__40__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$5(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__5(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__5, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__5, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__5, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__5, atspre_g0int_eq_int(arg0, tmp19__5)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__5) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__5] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12916(line=672, offs=3) -- 12956(line=672, offs=43) -*/ -/* -local: -global: neq_g1int_int$44$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = tk(4712) -tmparg = S2Evar(tk(4712)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__neq_g1int_int__44(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret81, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp82, atstkind_t0ype(atstyvar_type(tk))) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12900(line=671, offs=1) -- 12956(line=672, offs=43) -*/ -ATSINSflab(__patsflab_neq_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12943(line=672, offs=30) -- 12954(line=672, offs=41) -*/ -ATSINSmove(tmp82, PMVtmpltcst(g1int2int)(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12925(line=672, offs=12) -- 12956(line=672, offs=43) -*/ -ATSINSmove(tmpret81, PMVtmpltcst(g1int_neq)(arg0, tmp82)) ; - -ATSfunbody_end() -ATSreturn(tmpret81) ; -} /* end of [ATSLIB_056_prelude__neq_g1int_int__44] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12916(line=672, offs=3) -- 12956(line=672, offs=43) -*/ -/* -local: -global: neq_g1int_int$44$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4712) -tmparg = S2Evar(tk(4712)) -tmpsub = Some(tk(4712) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__neq_g1int_int__44__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret81__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp82__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12900(line=671, offs=1) -- 12956(line=672, offs=43) -*/ -ATSINSflab(__patsflab_neq_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12943(line=672, offs=30) -- 12954(line=672, offs=41) -*/ -ATSINSmove(tmp82__1, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12925(line=672, offs=12) -- 12956(line=672, offs=43) -*/ -ATSINSmove(tmpret81__1, atspre_g1int_neq_int(arg0, tmp82__1)) ; - -ATSfunbody_end() -ATSreturn(tmpret81__1) ; -} /* end of [ATSLIB_056_prelude__neq_g1int_int__44__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1006(line=36, offs=17) -- 1086(line=36, offs=97) -*/ -/* -local: -global: __patsfun_48$0(level=2) -local: acc$5123(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5124(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) -global: acc$5123(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5124(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) -*/ -ATSstatic() -atstype_boxed -__patsfun_48(atstkind_t0ype(atstype_int) env0, atstkind_type(atstype_ptrk) env1, atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret87, atstype_boxed) ; -ATStmpdec(tmp88, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1006(line=36, offs=17) -- 1086(line=36, offs=97) -*/ -ATSINSflab(__patsflab___patsfun_48): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1006(line=36, offs=17) -- 1086(line=36, offs=97) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1034(line=36, offs=45) -- 1084(line=36, offs=95) -*/ -ATSINSmove_ldelay(tmp88, atstype_boxed, ATSPMVcfunlab(1, __patsfun_49, (env1))) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1014(line=36, offs=25) -- 1085(line=36, offs=96) -*/ - -/* -#LINCONSTATUS==0 -*/ -ATSINSmove_con1_beg() -ATSINSmove_con1_new(tmpret87, postiats_tysum_1) ; -#if(0) -ATSINSstore_con1_tag(tmpret87, 1) ; -#endif -ATSINSstore_con1_ofs(tmpret87, postiats_tysum_1, atslab__0, env0) ; -ATSINSstore_con1_ofs(tmpret87, postiats_tysum_1, atslab__1, tmp88) ; -ATSINSmove_con1_end() -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret87) ; -} /* end of [__patsfun_48] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1034(line=36, offs=45) -- 1084(line=36, offs=95) -*/ -/* -local: -global: __patsfun_49$0(level=3) -local: x$5124(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) -global: x$5124(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) -*/ -ATSstatic() -atstype_boxed -__patsfun_49(atstkind_type(atstype_ptrk) env0, atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret89, atstype_boxed) ; -ATStmpdec(tmp90, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1034(line=36, offs=45) -- 1084(line=36, offs=95) -*/ -ATSINSflab(__patsflab___patsfun_49): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1034(line=36, offs=45) -- 1084(line=36, offs=95) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1060(line=36, offs=71) -- 1082(line=36, offs=93) -*/ -ATSINSmove_ldelay(tmp90, atstype_boxed, ATSPMVcfunlab(1, __patsfun_50, ())) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1042(line=36, offs=53) -- 1083(line=36, offs=94) -*/ - -/* -#LINCONSTATUS==0 -*/ -ATSINSmove_con1_beg() -ATSINSmove_con1_new(tmpret89, postiats_tysum_1) ; -#if(0) -ATSINSstore_con1_tag(tmpret89, 1) ; -#endif -ATSINSstore_con1_ofs(tmpret89, postiats_tysum_1, atslab__0, ATSderef(env0, atstkind_t0ype(atstype_int))) ; -ATSINSstore_con1_ofs(tmpret89, postiats_tysum_1, atslab__1, tmp90) ; -ATSINSmove_con1_end() -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret89) ; -} /* end of [__patsfun_49] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1060(line=36, offs=71) -- 1082(line=36, offs=93) -*/ -/* -local: -global: __patsfun_50$0(level=4) -local: -global: -*/ -ATSstatic() -atstype_boxed -__patsfun_50(atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret91, atstype_boxed) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1060(line=36, offs=71) -- 1082(line=36, offs=93) -*/ -ATSINSflab(__patsflab___patsfun_50): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1060(line=36, offs=71) -- 1082(line=36, offs=93) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1068(line=36, offs=79) -- 1081(line=36, offs=92) -*/ - -ATSINSmove_nil(tmpret91) ; - -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret91) ; -} /* end of [__patsfun_50] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1190(line=42, offs=17) -- 1242(line=42, offs=69) -*/ -/* -local: -global: __patsfun_51$0(level=2) -local: acc$5123(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -global: acc$5123(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -*/ -ATSstatic() -atstype_boxed -__patsfun_51(atstkind_t0ype(atstype_int) env0, atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret92, atstype_boxed) ; -ATStmpdec(tmp93, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1190(line=42, offs=17) -- 1242(line=42, offs=69) -*/ -ATSINSflab(__patsflab___patsfun_51): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1190(line=42, offs=17) -- 1242(line=42, offs=69) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1218(line=42, offs=45) -- 1240(line=42, offs=67) -*/ -ATSINSmove_ldelay(tmp93, atstype_boxed, ATSPMVcfunlab(1, __patsfun_52, ())) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1198(line=42, offs=25) -- 1241(line=42, offs=68) -*/ - -/* -#LINCONSTATUS==0 -*/ -ATSINSmove_con1_beg() -ATSINSmove_con1_new(tmpret92, postiats_tysum_1) ; -#if(0) -ATSINSstore_con1_tag(tmpret92, 1) ; -#endif -ATSINSstore_con1_ofs(tmpret92, postiats_tysum_1, atslab__0, env0) ; -ATSINSstore_con1_ofs(tmpret92, postiats_tysum_1, atslab__1, tmp93) ; -ATSINSmove_con1_end() -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret92) ; -} /* end of [__patsfun_51] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1218(line=42, offs=45) -- 1240(line=42, offs=67) -*/ -/* -local: -global: __patsfun_52$0(level=3) -local: -global: -*/ -ATSstatic() -atstype_boxed -__patsfun_52(atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret94, atstype_boxed) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1218(line=42, offs=45) -- 1240(line=42, offs=67) -*/ -ATSINSflab(__patsflab___patsfun_52): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1218(line=42, offs=45) -- 1240(line=42, offs=67) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1226(line=42, offs=53) -- 1239(line=42, offs=66) -*/ - -ATSINSmove_nil(tmpret94) ; - -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret94) ; -} /* end of [__patsfun_52] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1288(line=45, offs=13) -- 1310(line=45, offs=35) -*/ -/* -local: -global: __patsfun_53$0(level=2) -local: -global: -*/ -ATSstatic() -atstype_boxed -__patsfun_53(atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret95, atstype_boxed) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1288(line=45, offs=13) -- 1310(line=45, offs=35) -*/ -ATSINSflab(__patsflab___patsfun_53): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1288(line=45, offs=13) -- 1310(line=45, offs=35) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1296(line=45, offs=21) -- 1309(line=45, offs=34) -*/ - -ATSINSmove_nil(tmpret95) ; - -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret95) ; -} /* end of [__patsfun_53] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$6(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__6(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__6, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__6, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__6, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__6, atspre_g0int_eq_int(arg0, tmp19__6)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__6) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__6] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1434(line=51, offs=15) -- 1510(line=51, offs=91) -*/ -/* -local: loop_39$0(level=1) -global: loop_39$0(level=1), __patsfun_55$0(level=2) -local: n$5122(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5123(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5125(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) -global: n$5122(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5123(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5125(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) -*/ -ATSstatic() -atstype_boxed -__patsfun_55(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2, atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret101, atstype_boxed) ; -ATStmpdec(tmp102, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1434(line=51, offs=15) -- 1510(line=51, offs=91) -*/ -ATSINSflab(__patsflab___patsfun_55): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1434(line=51, offs=15) -- 1510(line=51, offs=91) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1462(line=51, offs=43) -- 1508(line=51, offs=89) -*/ -ATSINSmove_ldelay(tmp102, atstype_boxed, ATSPMVcfunlab(1, __patsfun_56, (env0, env1, env2))) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1442(line=51, offs=23) -- 1509(line=51, offs=90) -*/ - -/* -#LINCONSTATUS==0 -*/ -ATSINSmove_con1_beg() -ATSINSmove_con1_new(tmpret101, postiats_tysum_1) ; -#if(0) -ATSINSstore_con1_tag(tmpret101, 1) ; -#endif -ATSINSstore_con1_ofs(tmpret101, postiats_tysum_1, atslab__0, env1) ; -ATSINSstore_con1_ofs(tmpret101, postiats_tysum_1, atslab__1, tmp102) ; -ATSINSmove_con1_end() -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret101) ; -} /* end of [__patsfun_55] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1462(line=51, offs=43) -- 1508(line=51, offs=89) -*/ -/* -local: loop_39$0(level=1) -global: loop_39$0(level=1), __patsfun_56$0(level=3) -local: n$5122(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5123(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5125(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) -global: n$5122(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5123(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5125(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) -*/ -ATSstatic() -atstype_boxed -__patsfun_56(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2, atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret103, atstype_boxed) ; -ATStmpdec(tmp104, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp105, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1462(line=51, offs=43) -- 1508(line=51, offs=89) -*/ -ATSINSflab(__patsflab___patsfun_56): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1462(line=51, offs=43) -- 1508(line=51, offs=89) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1497(line=51, offs=78) -- 1504(line=51, offs=85) -*/ -ATSINSmove(tmp105, atspre_g1int_add_int(env1, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1489(line=51, offs=70) -- 1505(line=51, offs=86) -*/ -ATSINSmove(tmp104, loop_39(env0, tmp105)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1470(line=51, offs=51) -- 1507(line=51, offs=88) -*/ - -/* -#LINCONSTATUS==0 -*/ -ATSINSmove_con1_beg() -ATSINSmove_con1_new(tmpret103, postiats_tysum_1) ; -#if(0) -ATSINSstore_con1_tag(tmpret103, 1) ; -#endif -ATSINSstore_con1_ofs(tmpret103, postiats_tysum_1, atslab__0, ATSderef(env2, atstkind_t0ype(atstype_int))) ; -ATSINSstore_con1_ofs(tmpret103, postiats_tysum_1, atslab__1, tmp104) ; -ATSINSmove_con1_end() -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret103) ; -} /* end of [__patsfun_56] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1639(line=60, offs=4) -- 1758(line=61, offs=71) -*/ -/* -local: is_prime_20$0(level=0), divisors_36$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), is_prime_20$0(level=0), divisors_36$0(level=0), prime_divisors_57$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -prime_divisors_57(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret107, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp132, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1639(line=60, offs=4) -- 1758(line=61, offs=71) -*/ -ATSINSflab(__patsflab_prime_divisors_57): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1714(line=61, offs=27) -- 1724(line=61, offs=37) -*/ -ATSINSmove(tmp132, divisors_36(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1690(line=61, offs=3) -- 1758(line=61, offs=71) -*/ -ATSINSmove(tmpret107, ATSLIB_056_prelude__stream_vt_filter_cloptr__58__1(tmp132, ATSPMVcfunlab(1, __patsfun_64, ()))) ; - -ATSfunbody_end() -ATSreturn(tmpret107) ; -} /* end of [prime_divisors_57] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 11373(line=684, offs=1) -- 12248(line=743, offs=2) -*/ -/* -local: -global: stream_vt_filter_cloptr$58$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = a(8764) -tmparg = S2Evar(a(8764)) -tmpsub = None() -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__stream_vt_filter_cloptr__58(atstkind_type(atstype_ptrk) arg0, atstype_cloptr arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret108, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11349(line=683, offs=1) -- 12248(line=743, offs=2) -*/ -ATSINSflab(__patsflab_stream_vt_filter_cloptr): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11390(line=686, offs=5) -- 12248(line=743, offs=2) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11390(line=686, offs=5) -- 11407(line=686, offs=22) -*/ -ATSINSmove(tmpret108, ATSfunclo_fun(PMVd2vfunlab(d2v=auxmain$4303(1), flab=auxmain_59$0(level=1)), (atstkind_type(atstype_ptrk), atstype_cloptr), atstkind_type(atstype_ptrk))(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11390(line=686, offs=5) -- 12248(line=743, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret108) ; -} /* end of [ATSLIB_056_prelude__stream_vt_filter_cloptr__58] */ -#endif // end of [TEMPLATE] - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 11423(line=690, offs=1) -- 12222(line=741, offs=2) -*/ -/* -local: auxmain_59$0(level=1) -global: auxmain_59$0(level=1) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -auxmain_59__59(atstkind_type(atstype_ptrk) arg0, atstype_cloptr arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret109, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11423(line=690, offs=1) -- 12222(line=741, offs=2) -*/ -ATSINSflab(__patsflab_auxmain_59): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11503(line=696, offs=20) -- 12222(line=741, offs=2) -*/ -ATSINSmove_ldelay(tmpret109, atstype_boxed, ATSPMVcfunlab(1, __patsfun_60__60, (arg0, arg1))) ; -ATSfunbody_end() -ATSreturn(tmpret109) ; -} /* end of [auxmain_59__59] */ -#endif // end of [TEMPLATE] - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 11503(line=696, offs=20) -- 12222(line=741, offs=2) -*/ -/* -local: auxmain_59$0(level=1) -global: auxmain_59$0(level=1), __patsfun_60$0(level=2) -local: xs$4304(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))), pred$4305(2)(HSEfun(CLO(1); HSErefarg(1; HSEtyvar(a(8764))); HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_bool))))) -global: xs$4304(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))), pred$4305(2)(HSEfun(CLO(1); HSErefarg(1; HSEtyvar(a(8764))); HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_bool))))) -*/ -ATSstatic() -atstype_boxed -__patsfun_60__60(atstkind_type(atstype_ptrk) env0, atstype_cloptr env1, atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret110, atstype_boxed) ; -ATStmpdec(tmp111, atstype_boxed) ; -// ATStmpdec_void(tmp114) ; -ATStmpdec(tmp115, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp116, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp117, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp118, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp119) ; -// ATStmpdec_void(tmp120) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11503(line=696, offs=20) -- 12222(line=741, offs=2) -*/ -ATSINSflab(__patsflab___patsfun_60): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11503(line=696, offs=20) -- 12222(line=741, offs=2) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11516(line=699, offs=1) -- 12138(line=732, offs=4) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11535(line=700, offs=16) -- 11538(line=700, offs=19) -*/ -ATSINSmove_llazyeval(tmp111, atstype_boxed, env0) ; -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11545(line=703, offs=1) -- 12104(line=730, offs=6) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11563(line=704, offs=3) -- 11589(line=705, offs=12) -*/ -ATSINSlab(__atstmplab9): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11535(line=700, offs=16) -- 11538(line=700, offs=19) -*/ -ATSifthen(ATSCKptriscons(tmp111)) { ATSINSgoto(__atstmplab12) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11589(line=705, offs=12) -- 11589(line=705, offs=12) -*/ -ATSINSlab(__atstmplab10): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11593(line=705, offs=16) -- 11719(line=712, offs=6) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11614(line=707, offs=5) -- 11662(line=708, offs=37) -*/ -ATSINSmove_void(tmp114, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), env1))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11692(line=711, offs=5) -- 11705(line=711, offs=18) -*/ - -ATSINSmove_nil(tmpret110) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11593(line=705, offs=16) -- 11719(line=712, offs=6) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11748(line=713, offs=3) -- 11776(line=714, offs=13) -*/ -ATSINSlab(__atstmplab11): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11535(line=700, offs=16) -- 11538(line=700, offs=19) -*/ -#if(0) -ATSifthen(ATSCKptrisnull(tmp111)) { ATSINSdeadcode_fail() ; } ; -#endif -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11776(line=714, offs=13) -- 11776(line=714, offs=13) -*/ -ATSINSlab(__atstmplab12): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11780(line=714, offs=17) -- 12104(line=730, offs=6) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11799(line=715, offs=16) -- 11805(line=715, offs=22) -*/ -ATSINSmove(tmp115, ATSfunclo_clo(ATSPMVrefarg0(env1), (atstype_cloptr, atsrefarg1_type(atstyvar_type(a))), atstkind_t0ype(atstype_bool))(ATSPMVrefarg0(env1), ATSPMVrefarg1(ATSPMVptrof(ATSSELcon(tmp111, postiats_tysum_2, atslab__0))))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11816(line=717, offs=5) -- 12062(line=728, offs=10) -*/ -ATSif( -tmp115 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11835(line=718, offs=12) -- 11941(line=723, offs=10) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11871(line=720, offs=16) -- 11889(line=720, offs=34) -*/ -ATSINSmove(tmp116, ATSfunclo_fun(PMVd2vfunlab(d2v=auxmain$4303(1), flab=auxmain_59$0(level=1)), (atstkind_type(atstype_ptrk), atstype_cloptr), atstkind_type(atstype_ptrk))(ATSSELcon(tmp111, postiats_tysum_2, atslab__1), env1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11864(line=720, offs=9) -- 11889(line=720, offs=34) -*/ -ATSINSstore(ATSSELcon(tmp111, postiats_tysum_2, atslab__1), tmp116) ; -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11925(line=722, offs=27) -- 11931(line=722, offs=33) -*/ -ATSINSmove(tmpret110, tmp111) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11835(line=718, offs=12) -- 11941(line=723, offs=10) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11970(line=724, offs=12) -- 12062(line=728, offs=10) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11992(line=725, offs=19) -- 11995(line=725, offs=22) -*/ -ATSINSmove(tmp117, ATSSELcon(tmp111, postiats_tysum_2, atslab__1)) ; -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12013(line=727, offs=9) -- 12028(line=727, offs=24) -*/ -ATSINSfreecon(tmp111) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12033(line=727, offs=29) -- 12051(line=727, offs=47) -*/ -ATSINSmove(tmp118, ATSfunclo_fun(PMVd2vfunlab(d2v=auxmain$4303(1), flab=auxmain_59$0(level=1)), (atstkind_type(atstype_ptrk), atstype_cloptr), atstkind_type(atstype_ptrk))(tmp117, env1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12031(line=727, offs=27) -- 12052(line=727, offs=48) -*/ -ATSINSmove_llazyeval(tmpret110, atstype_boxed, tmp118) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11970(line=724, offs=12) -- 12062(line=728, offs=10) -*/ -/* -INSletpop() -*/ -} /* ATSendif */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11780(line=714, offs=17) -- 12104(line=730, offs=6) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11516(line=699, offs=1) -- 12138(line=732, offs=4) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12167(line=737, offs=3) -- 12170(line=737, offs=6) -*/ -ATSINSmove_void(tmp119, atspre_lazy_vt_free(env0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12174(line=738, offs=3) -- 12215(line=738, offs=44) -*/ -ATSINSmove_void(tmp120, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), env1))) ; - -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret110) ; -} /* end of [__patsfun_60__60] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 11373(line=684, offs=1) -- 12248(line=743, offs=2) -*/ -/* -local: -global: stream_vt_filter_cloptr$58$1(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = a(8764) -tmparg = S2Evar(a(8764)) -tmpsub = Some(a(8764) -> S2Eapp(S2Ecst(g0int_t0ype); S2Eextkind(atstype_int))) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__stream_vt_filter_cloptr__58__1(atstkind_type(atstype_ptrk) arg0, atstype_cloptr arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret108__1, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11349(line=683, offs=1) -- 12248(line=743, offs=2) -*/ -ATSINSflab(__patsflab_stream_vt_filter_cloptr): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11390(line=686, offs=5) -- 12248(line=743, offs=2) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11390(line=686, offs=5) -- 11407(line=686, offs=22) -*/ -ATSINSmove(tmpret108__1, auxmain_59__59__1(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11390(line=686, offs=5) -- 12248(line=743, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret108__1) ; -} /* end of [ATSLIB_056_prelude__stream_vt_filter_cloptr__58__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 11423(line=690, offs=1) -- 12222(line=741, offs=2) -*/ -/* -local: auxmain_59$1(level=2) -global: auxmain_59$1(level=2) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -auxmain_59__59__1(atstkind_type(atstype_ptrk) arg0, atstype_cloptr arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret109__1, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11423(line=690, offs=1) -- 12222(line=741, offs=2) -*/ -ATSINSflab(__patsflab_auxmain_59): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11503(line=696, offs=20) -- 12222(line=741, offs=2) -*/ -ATSINSmove_ldelay(tmpret109__1, atstype_boxed, ATSPMVcfunlab(1, __patsfun_60__60__1, (arg0, arg1))) ; -ATSfunbody_end() -ATSreturn(tmpret109__1) ; -} /* end of [auxmain_59__59__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 11503(line=696, offs=20) -- 12222(line=741, offs=2) -*/ -/* -local: auxmain_59$1(level=2) -global: auxmain_59$1(level=2), __patsfun_60$1(level=3) -local: xs$4304(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))), pred$4305(2)(HSEfun(CLO(1); HSErefarg(1; HSEs2exp(S2Eapp(S2Ecst(g0int_t0ype); S2Eextkind(atstype_int)))); HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_bool))))) -global: xs$4304(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))), pred$4305(2)(HSEfun(CLO(1); HSErefarg(1; HSEs2exp(S2Eapp(S2Ecst(g0int_t0ype); S2Eextkind(atstype_int)))); HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_bool))))) -*/ -ATSstatic() -atstype_boxed -__patsfun_60__60__1(atstkind_type(atstype_ptrk) env0, atstype_cloptr env1, atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret110__1, atstype_boxed) ; -ATStmpdec(tmp111__1, atstype_boxed) ; -// ATStmpdec_void(tmp114__1) ; -ATStmpdec(tmp115__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp116__1, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp117__1, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp118__1, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp119__1) ; -// ATStmpdec_void(tmp120__1) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11503(line=696, offs=20) -- 12222(line=741, offs=2) -*/ -ATSINSflab(__patsflab___patsfun_60): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11503(line=696, offs=20) -- 12222(line=741, offs=2) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11516(line=699, offs=1) -- 12138(line=732, offs=4) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11535(line=700, offs=16) -- 11538(line=700, offs=19) -*/ -ATSINSmove_llazyeval(tmp111__1, atstype_boxed, env0) ; -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11545(line=703, offs=1) -- 12104(line=730, offs=6) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11563(line=704, offs=3) -- 11589(line=705, offs=12) -*/ -ATSINSlab(__atstmplab9): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11535(line=700, offs=16) -- 11538(line=700, offs=19) -*/ -ATSifthen(ATSCKptriscons(tmp111__1)) { ATSINSgoto(__atstmplab12) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11589(line=705, offs=12) -- 11589(line=705, offs=12) -*/ -ATSINSlab(__atstmplab10): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11593(line=705, offs=16) -- 11719(line=712, offs=6) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11614(line=707, offs=5) -- 11662(line=708, offs=37) -*/ -ATSINSmove_void(tmp114__1, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), env1))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11692(line=711, offs=5) -- 11705(line=711, offs=18) -*/ - -ATSINSmove_nil(tmpret110__1) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11593(line=705, offs=16) -- 11719(line=712, offs=6) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11748(line=713, offs=3) -- 11776(line=714, offs=13) -*/ -ATSINSlab(__atstmplab11): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11535(line=700, offs=16) -- 11538(line=700, offs=19) -*/ -#if(0) -ATSifthen(ATSCKptrisnull(tmp111__1)) { ATSINSdeadcode_fail() ; } ; -#endif -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11776(line=714, offs=13) -- 11776(line=714, offs=13) -*/ -ATSINSlab(__atstmplab12): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11780(line=714, offs=17) -- 12104(line=730, offs=6) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11799(line=715, offs=16) -- 11805(line=715, offs=22) -*/ -ATSINSmove(tmp115__1, ATSfunclo_clo(ATSPMVrefarg0(env1), (atstype_cloptr, atsrefarg1_type(atstkind_t0ype(atstype_int))), atstkind_t0ype(atstype_bool))(ATSPMVrefarg0(env1), ATSPMVrefarg1(ATSPMVptrof(ATSSELcon(tmp111__1, postiats_tysum_1, atslab__0))))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11816(line=717, offs=5) -- 12062(line=728, offs=10) -*/ -ATSif( -tmp115__1 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11835(line=718, offs=12) -- 11941(line=723, offs=10) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11871(line=720, offs=16) -- 11889(line=720, offs=34) -*/ -ATSINSmove(tmp116__1, auxmain_59__59__1(ATSSELcon(tmp111__1, postiats_tysum_1, atslab__1), env1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11864(line=720, offs=9) -- 11889(line=720, offs=34) -*/ -ATSINSstore(ATSSELcon(tmp111__1, postiats_tysum_1, atslab__1), tmp116__1) ; -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11925(line=722, offs=27) -- 11931(line=722, offs=33) -*/ -ATSINSmove(tmpret110__1, tmp111__1) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11835(line=718, offs=12) -- 11941(line=723, offs=10) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11970(line=724, offs=12) -- 12062(line=728, offs=10) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11992(line=725, offs=19) -- 11995(line=725, offs=22) -*/ -ATSINSmove(tmp117__1, ATSSELcon(tmp111__1, postiats_tysum_1, atslab__1)) ; -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12013(line=727, offs=9) -- 12028(line=727, offs=24) -*/ -ATSINSfreecon(tmp111__1) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12033(line=727, offs=29) -- 12051(line=727, offs=47) -*/ -ATSINSmove(tmp118__1, auxmain_59__59__1(tmp117__1, env1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12031(line=727, offs=27) -- 12052(line=727, offs=48) -*/ -ATSINSmove_llazyeval(tmpret110__1, atstype_boxed, tmp118__1) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11970(line=724, offs=12) -- 12062(line=728, offs=10) -*/ -/* -INSletpop() -*/ -} /* ATSendif */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11780(line=714, offs=17) -- 12104(line=730, offs=6) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 11516(line=699, offs=1) -- 12138(line=732, offs=4) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12167(line=737, offs=3) -- 12170(line=737, offs=6) -*/ -ATSINSmove_void(tmp119__1, atspre_lazy_vt_free(env0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12174(line=738, offs=3) -- 12215(line=738, offs=44) -*/ -ATSINSmove_void(tmp120__1, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), env1))) ; - -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret110__1) ; -} /* end of [__patsfun_60__60__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1727(line=61, offs=40) -- 1757(line=61, offs=70) -*/ -/* -local: is_prime_20$0(level=0) -global: is_prime_20$0(level=0), __patsfun_64$0(level=1) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_bool) -__patsfun_64(atsrefarg1_type(atstkind_t0ype(atstype_int)) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret133, atstkind_t0ype(atstype_bool)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1727(line=61, offs=40) -- 1757(line=61, offs=70) -*/ -ATSINSflab(__patsflab___patsfun_64): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1736(line=61, offs=49) -- 1757(line=61, offs=70) -*/ -ATSINSmove(tmpret133, is_prime_20(ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), ATSderef(arg0, atstkind_t0ype(atstype_int))))) ; - -ATSfunbody_end() -ATSreturn(tmpret133) ; -} /* end of [__patsfun_64] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1763(line=63, offs=4) -- 1835(line=64, offs=18) -*/ -/* -local: -global: div_gt_zero_65$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -div_gt_zero_65(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret134, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp135, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1763(line=63, offs=4) -- 1835(line=64, offs=18) -*/ -ATSINSflab(__patsflab_div_gt_zero_65): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1829(line=64, offs=12) -- 1834(line=64, offs=17) -*/ -ATSINSmove(tmp135, atspre_g1int_div_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1820(line=64, offs=3) -- 1835(line=64, offs=18) -*/ -ATSINSmove(tmpret134, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp135)) ; -ATSfunbody_end() -ATSreturn(tmpret134) ; -} /* end of [div_gt_zero_65] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1876(line=67, offs=5) -- 2539(line=94, offs=6) -*/ -/* -local: exp_mod_prime_66$0(level=0) -global: exp_mod_prime_66$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -exp_mod_prime_66(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1, atstkind_t0ype(atstype_int) arg2) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy2, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret136, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref137, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref138, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp139, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp140, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmpref143, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp144, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref145, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref146, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp147, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp148, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp149, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmpref152, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp153, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1876(line=67, offs=5) -- 2539(line=94, offs=6) -*/ -ATSINSflab(__patsflab_exp_mod_prime_66): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1944(line=68, offs=3) -- 2539(line=94, offs=6) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1956(line=69, offs=9) -- 1958(line=69, offs=11) -*/ -/* -ATSINStmpdec(tmpref137) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1961(line=69, offs=14) -- 1966(line=69, offs=19) -*/ -ATSINSmove(tmpref137, atspre_g0int_mod_int(arg0, arg2)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1975(line=70, offs=9) -- 1977(line=70, offs=11) -*/ -/* -ATSINStmpdec(tmpref138) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1985(line=70, offs=19) -- 1990(line=70, offs=24) -*/ -ATSINSmove(tmp139, atspre_g1int_sub_int(arg2, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1980(line=70, offs=14) -- 1991(line=70, offs=25) -*/ -ATSINSmove(tmpref138, atspre_g0int_mod_int(arg1, tmp139)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2001(line=72, offs=5) -- 2533(line=93, offs=12) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2020(line=73, offs=9) -- 2021(line=73, offs=10) -*/ -ATSINSlab(__atstmplab13): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1890(line=67, offs=19) -- 1891(line=67, offs=20) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab15) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2021(line=73, offs=10) -- 2021(line=73, offs=10) -*/ -ATSINSlab(__atstmplab14): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2025(line=73, offs=14) -- 2026(line=73, offs=15) -*/ -ATSINSmove(tmpret136, ATSPMVi0nt(0)) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2036(line=74, offs=10) -- 2036(line=74, offs=10) -*/ -ATSINSlab(__atstmplab15): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2069(line=76, offs=14) -- 2074(line=76, offs=19) -*/ -ATSINSmove(tmp140, ATSLIB_056_prelude__gt_g1int_int__6__3(arg1, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2066(line=76, offs=11) -- 2521(line=92, offs=14) -*/ -ATSif( -tmp140 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2092(line=77, offs=13) -- 2492(line=90, offs=16) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2114(line=78, offs=19) -- 2116(line=78, offs=21) -*/ -/* -ATSINStmpdec(tmpref143) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2139(line=78, offs=44) -- 2146(line=78, offs=51) -*/ -ATSINSmove(tmp144, atspre_g0int_half_int(tmpref138)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2130(line=78, offs=35) -- 2148(line=78, offs=53) -*/ -ATSINSmove(tmpref143, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp144)) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2167(line=79, offs=19) -- 2169(line=79, offs=21) -*/ -/* -ATSINStmpdec(tmpref145) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2172(line=79, offs=24) -- 2178(line=79, offs=30) -*/ -ATSINSmove(tmpref145, atspre_g0int_mod_int(tmpref138, ATSPMVi0nt(2))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2197(line=80, offs=19) -- 2201(line=80, offs=23) -*/ -/* -ATSINStmpdec(tmpref146) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2224(line=80, offs=46) -- 2229(line=80, offs=51) -*/ -ATSINSmove(tmp148, atspre_g1int_mul_int(arg0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2224(line=80, offs=46) -- 2233(line=80, offs=55) -*/ -ATSINSmove(tmp147, atspre_g0int_mod_int(tmp148, arg2)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2215(line=80, offs=37) -- 2234(line=80, offs=56) -*/ -ATSINSmove(tmpref146, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp147)) ; -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2267(line=82, offs=18) -- 2273(line=82, offs=24) -*/ -ATSINSmove(tmp149, ATSLIB_056_prelude__eq_g0int_int__12__7(tmpref145, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2264(line=82, offs=15) -- 2476(line=89, offs=20) -*/ -ATSif( -tmp149 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2295(line=83, offs=17) -- 2321(line=83, offs=43) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, tmpref146) ; -ATSINSmove_tlcal(apy1, tmpref143) ; -ATSINSmove_tlcal(apy2, arg2) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSargmove_tlcal(arg2, apy2) ; -ATSINSfgoto(__patsflab_exp_mod_prime_66) ; -ATStailcal_end() - -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2357(line=85, offs=17) -- 2476(line=89, offs=20) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2383(line=86, offs=23) -- 2384(line=86, offs=24) -*/ -/* -ATSINStmpdec(tmpref152) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2391(line=86, offs=31) -- 2417(line=86, offs=57) -*/ -ATSINSmove(tmp153, exp_mod_prime_66(tmpref146, tmpref143, arg2)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2387(line=86, offs=27) -- 2417(line=86, offs=57) -*/ -ATSINSmove(tmpref152, atspre_g0int_mul_int(arg0, tmp153)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2455(line=88, offs=19) -- 2456(line=88, offs=20) -*/ -ATSINSmove(tmpret136, tmpref152) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2357(line=85, offs=17) -- 2476(line=89, offs=20) -*/ -/* -INSletpop() -*/ -} /* ATSendif */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2092(line=77, offs=13) -- 2492(line=90, offs=16) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2520(line=92, offs=13) -- 2521(line=92, offs=14) -*/ -ATSINSmove(tmpret136, ATSPMVi0nt(1)) ; -} /* ATSendif */ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 1944(line=68, offs=3) -- 2539(line=94, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret136) ; -} /* end of [exp_mod_prime_66] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) -*/ -/* -local: -global: gt_g1int_int$6$3(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4703) -tmparg = S2Evar(tk(4703)) -tmpsub = Some(tk(4703) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret11__3, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp12__3, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) -*/ -ATSINSflab(__patsflab_gt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) -*/ -ATSINSmove(tmp12__3, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) -*/ -ATSINSmove(tmpret11__3, atspre_g1int_gt_int(arg0, tmp12__3)) ; - -ATSfunbody_end() -ATSreturn(tmpret11__3) ; -} /* end of [ATSLIB_056_prelude__gt_g1int_int__6__3] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$7(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__7(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__7, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__7, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__7, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__7, atspre_g0int_eq_int(arg0, tmp19__7)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__7) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__7] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2642(line=97, offs=5) -- 3473(line=126, offs=6) -*/ -/* -local: exp_5$0(level=0), is_prime_20$0(level=0), div_gt_zero_65$0(level=0), exp_mod_prime_66$0(level=0) -global: witness_0$0(level=0), exp_5$0(level=0), sqrt_int_17$0(level=0), is_prime_20$0(level=0), div_gt_zero_65$0(level=0), exp_mod_prime_66$0(level=0), jacobi_72$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -jacobi_72(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret154, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2642(line=97, offs=5) -- 3473(line=126, offs=6) -*/ -ATSINSflab(__patsflab_jacobi_72): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2683(line=98, offs=3) -- 3473(line=126, offs=6) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3460(line=125, offs=5) -- 3467(line=125, offs=12) -*/ -ATSINSmove(tmpret154, loop_78(arg0, arg1, ATSPMVi0nt(2))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2683(line=98, offs=3) -- 3473(line=126, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret154) ; -} /* end of [jacobi_72] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2695(line=99, offs=9) -- 3022(line=109, offs=12) -*/ -/* -local: exp_mod_prime_66$0(level=0) -global: exp_mod_prime_66$0(level=0), legendre_73$0(level=1) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -legendre_73(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret155, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp156, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref157, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp158, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp159, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp160, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp161, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp164, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp165, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp166, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp169, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2695(line=99, offs=9) -- 3022(line=109, offs=12) -*/ -ATSINSflab(__patsflab_legendre_73): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2783(line=100, offs=13) -- 2788(line=100, offs=18) -*/ -ATSINSmove(tmp156, atspre_g0int_mod_int(arg1, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2777(line=100, offs=7) -- 3022(line=109, offs=12) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2802(line=101, offs=11) -- 2803(line=101, offs=12) -*/ -ATSINSlab(__atstmplab16): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2783(line=100, offs=13) -- 2788(line=100, offs=18) -*/ -ATSifnthen(ATSCKpat_int(tmp156, ATSPMVint(0))) { ATSINSgoto(__atstmplab18) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2803(line=101, offs=12) -- 2803(line=101, offs=12) -*/ -ATSINSlab(__atstmplab17): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2807(line=101, offs=16) -- 2808(line=101, offs=17) -*/ -ATSINSmove(tmpret155, ATSPMVi0nt(0)) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2820(line=102, offs=12) -- 2820(line=102, offs=12) -*/ -ATSINSlab(__atstmplab18): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2824(line=102, offs=16) -- 3022(line=109, offs=12) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2842(line=103, offs=15) -- 2843(line=103, offs=16) -*/ -/* -ATSINStmpdec(tmpref157) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2864(line=103, offs=37) -- 2869(line=103, offs=42) -*/ -ATSINSmove(tmp159, atspre_g1int_sub_int(arg1, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2863(line=103, offs=36) -- 2874(line=103, offs=47) -*/ -ATSINSmove(tmp158, atspre_g1int_div_int(tmp159, ATSPMVi0nt(2))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2846(line=103, offs=19) -- 2878(line=103, offs=51) -*/ -ATSINSmove(tmpref157, exp_mod_prime_66(arg0, tmp158, arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2906(line=105, offs=17) -- 2907(line=105, offs=18) -*/ -ATSINSmove(tmp160, tmpref157) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2900(line=105, offs=11) -- 3010(line=108, offs=21) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2926(line=106, offs=16) -- 2926(line=106, offs=16) -*/ -ATSINSlab(__atstmplab19): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-guard: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2937(line=106, offs=27) -- 2942(line=106, offs=32) -*/ -ATSINSmove(tmp165, atspre_g1int_sub_int(arg1, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2932(line=106, offs=22) -- 2943(line=106, offs=33) -*/ -ATSINSmove(tmp164, atspre_g0int_mod_int(tmp160, tmp165)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2932(line=106, offs=22) -- 2947(line=106, offs=37) -*/ -ATSINSmove(tmp161, ATSLIB_056_prelude__eq_g0int_int__12__8(tmp164, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2932(line=106, offs=22) -- 2947(line=106, offs=37) -*/ -ATSifnthen(ATSCKpat_bool(tmp161, ATSPMVbool_true())) { ATSINSgoto(__atstmplab20) ; } ; -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2951(line=106, offs=41) -- 2953(line=106, offs=43) -*/ -ATSINSmove(tmpret155, atspre_g1int_neg_int(ATSPMVi0nt(1))) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2969(line=107, offs=16) -- 2969(line=107, offs=16) -*/ -ATSINSlab(__atstmplab20): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-guard: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2975(line=107, offs=22) -- 2980(line=107, offs=27) -*/ -ATSINSmove(tmp169, atspre_g0int_mod_int(tmp160, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2975(line=107, offs=22) -- 2984(line=107, offs=31) -*/ -ATSINSmove(tmp166, ATSLIB_056_prelude__eq_g0int_int__12__9(tmp169, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2975(line=107, offs=22) -- 2984(line=107, offs=31) -*/ -ATSifnthen(ATSCKpat_bool(tmp166, ATSPMVbool_true())) { ATSINSgoto(__atstmplab21) ; } ; -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2988(line=107, offs=35) -- 2989(line=107, offs=36) -*/ -ATSINSmove(tmpret155, ATSPMVi0nt(0)) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3005(line=108, offs=16) -- 3005(line=108, offs=16) -*/ -ATSINSlab(__atstmplab21): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3009(line=108, offs=20) -- 3010(line=108, offs=21) -*/ -ATSINSmove(tmpret155, ATSPMVi0nt(1)) ; -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 2824(line=102, offs=16) -- 3022(line=109, offs=12) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret155) ; -} /* end of [legendre_73] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$8(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__8(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__8, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__8, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__8, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__8, atspre_g0int_eq_int(arg0, tmp19__8)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__8) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__8] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$9(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__9(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__9, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__9, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__9, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__9, atspre_g0int_eq_int(arg0, tmp19__9)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__9) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__9] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3036(line=111, offs=9) -- 3191(line=114, offs=17) -*/ -/* -local: div_gt_zero_65$0(level=0), get_multiplicity_77$0(level=1) -global: div_gt_zero_65$0(level=0), get_multiplicity_77$0(level=1) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -get_multiplicity_77(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret170, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp171, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp172, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp173, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3036(line=111, offs=9) -- 3191(line=114, offs=17) -*/ -ATSINSflab(__patsflab_get_multiplicity_77): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3108(line=112, offs=13) -- 3113(line=112, offs=18) -*/ -ATSINSmove(tmp171, atspre_g0int_mod_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3102(line=112, offs=7) -- 3191(line=114, offs=17) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3127(line=113, offs=11) -- 3128(line=113, offs=12) -*/ -ATSINSlab(__atstmplab22): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3108(line=112, offs=13) -- 3113(line=112, offs=18) -*/ -ATSifnthen(ATSCKpat_int(tmp171, ATSPMVint(0))) { ATSINSgoto(__atstmplab24) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3128(line=113, offs=12) -- 3128(line=113, offs=12) -*/ -ATSINSlab(__atstmplab23): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3153(line=113, offs=37) -- 3170(line=113, offs=54) -*/ -ATSINSmove(tmp173, div_gt_zero_65(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3136(line=113, offs=20) -- 3174(line=113, offs=58) -*/ -ATSINSmove(tmp172, get_multiplicity_77(tmp173, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3132(line=113, offs=16) -- 3174(line=113, offs=58) -*/ -ATSINSmove(tmpret170, atspre_g1int_add_int(ATSPMVi0nt(1), tmp172)) ; - -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3186(line=114, offs=12) -- 3186(line=114, offs=12) -*/ -ATSINSlab(__atstmplab24): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3190(line=114, offs=16) -- 3191(line=114, offs=17) -*/ -ATSINSmove(tmpret170, ATSPMVi0nt(0)) ; -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret170) ; -} /* end of [get_multiplicity_77] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3205(line=116, offs=9) -- 3450(line=123, offs=24) -*/ -/* -local: exp_5$0(level=0), is_prime_20$0(level=0), legendre_73$0(level=1), get_multiplicity_77$0(level=1), loop_78$0(level=1) -global: exp_5$0(level=0), is_prime_20$0(level=0), div_gt_zero_65$0(level=0), exp_mod_prime_66$0(level=0), legendre_73$0(level=1), get_multiplicity_77$0(level=1), loop_78$0(level=1) -local: a$5144(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), n$5145(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -global: a$5144(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), n$5145(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -loop_78(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret174, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp175, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp178, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp179, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp182, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp183, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp184, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp185, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp186, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp187, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp188, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3205(line=116, offs=9) -- 3450(line=123, offs=24) -*/ -ATSINSflab(__patsflab_loop_78): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3261(line=117, offs=10) -- 3268(line=117, offs=17) -*/ -ATSINSmove(tmp175, ATSLIB_056_prelude__gt_g1int_int__6__4(arg0, env1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3258(line=117, offs=7) -- 3450(line=123, offs=24) -*/ -ATSif( -tmp175 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3282(line=118, offs=9) -- 3283(line=118, offs=10) -*/ -ATSINSmove(tmpret174, ATSPMVi0nt(1)) ; -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3306(line=120, offs=12) -- 3333(line=120, offs=39) -*/ -ATSINSmove(tmp182, atspre_g0int_mod_int(env0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3306(line=120, offs=12) -- 3333(line=120, offs=39) -*/ -ATSINSmove(tmp179, ATSLIB_056_prelude__eq_g0int_int__12__10(tmp182, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3306(line=120, offs=12) -- 3333(line=120, offs=39) -*/ -ATSif( -tmp179 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3306(line=120, offs=12) -- 3333(line=120, offs=39) -*/ -ATSINSmove(tmp178, is_prime_20(arg0)) ; - -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3306(line=120, offs=12) -- 3333(line=120, offs=39) -*/ -ATSINSmove(tmp178, ATSPMVbool_false()) ; -} /* ATSendif */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3303(line=120, offs=9) -- 3450(line=123, offs=24) -*/ -ATSif( -tmp178 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3355(line=121, offs=16) -- 3362(line=121, offs=23) -*/ -ATSINSmove(tmp184, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3350(line=121, offs=11) -- 3363(line=121, offs=24) -*/ -ATSINSmove(tmp183, loop_78(env0, env1, tmp184)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3370(line=121, offs=31) -- 3386(line=121, offs=47) -*/ -ATSINSmove(tmp186, legendre_73(arg0, env1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3388(line=121, offs=49) -- 3412(line=121, offs=73) -*/ -ATSINSmove(tmp187, get_multiplicity_77(env0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3366(line=121, offs=27) -- 3413(line=121, offs=74) -*/ -ATSINSmove(tmp185, exp_5(tmp186, tmp187)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3350(line=121, offs=11) -- 3413(line=121, offs=74) -*/ -ATSINSmove(tmpret174, atspre_g0int_mul_int(tmp183, tmp185)) ; - -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3442(line=123, offs=16) -- 3449(line=123, offs=23) -*/ -ATSINSmove(tmp188, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3437(line=123, offs=11) -- 3450(line=123, offs=24) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, tmp188) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSfgoto(__patsflab_loop_78) ; -ATStailcal_end() - -} /* ATSendif */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret174) ; -} /* end of [loop_78] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) -*/ -/* -local: -global: gt_g1int_int$6$4(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4703) -tmparg = S2Evar(tk(4703)) -tmpsub = Some(tk(4703) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret11__4, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp12__4, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) -*/ -ATSINSflab(__patsflab_gt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) -*/ -ATSINSmove(tmp12__4, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) -*/ -ATSINSmove(tmpret11__4, atspre_g1int_gt_int(arg0, tmp12__4)) ; - -ATSfunbody_end() -ATSreturn(tmpret11__4) ; -} /* end of [ATSLIB_056_prelude__gt_g1int_int__6__4] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$10(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__10(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__10, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__10, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__10, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__10, atspre_g0int_eq_int(arg0, tmp19__10)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__10) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__10] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3478(line=128, offs=4) -- 3547(line=129, offs=32) -*/ -/* -local: divisors_36$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), divisors_36$0(level=0), count_divisors_81$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -count_divisors_81(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret189, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp201, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3478(line=128, offs=4) -- 3547(line=129, offs=32) -*/ -ATSINSflab(__patsflab_count_divisors_81): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3535(line=129, offs=20) -- 3545(line=129, offs=30) -*/ -ATSINSmove(tmp201, divisors_36(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3518(line=129, offs=3) -- 3547(line=129, offs=32) -*/ -ATSINSmove(tmpret189, ATSLIB_056_prelude__stream_vt_length__82__1(tmp201)) ; - -ATSfunbody_end() -ATSreturn(tmpret189) ; -} /* end of [count_divisors_81] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 8056(line=456, offs=17) -- 8278(line=471, offs=4) -*/ -/* -local: -global: stream_vt_length$82$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = a(8735) -tmparg = S2Evar(a(8735)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_int) -ATSLIB_056_prelude__stream_vt_length__82(atstkind_type(atstype_ptrk) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret190, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8040(line=456, offs=1) -- 8278(line=471, offs=4) -*/ -ATSINSflab(__patsflab_stream_vt_length): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8064(line=456, offs=25) -- 8278(line=471, offs=4) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8261(line=470, offs=16) -- 8273(line=470, offs=28) -*/ -ATSINSmove(tmpret190, ATSfunclo_fun(PMVd2vfunlab(d2v=loop$4254(1), flab=loop_83$0(level=1)), (atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)), atstkind_t0ype(atstype_int))(arg0, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8064(line=456, offs=25) -- 8278(line=471, offs=4) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret190) ; -} /* end of [ATSLIB_056_prelude__stream_vt_length__82] */ -#endif // end of [TEMPLATE] - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 8075(line=459, offs=1) -- 8219(line=467, offs=2) -*/ -/* -local: loop_83$0(level=1) -global: loop_83$0(level=1) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -loop_83__83(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_type(atstype_ptrk)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret191, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp192, atstype_boxed) ; -ATStmpdec(tmp194, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp195, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8075(line=459, offs=1) -- 8219(line=467, offs=2) -*/ -ATSINSflab(__patsflab_loop_83): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8141(line=464, offs=9) -- 8144(line=464, offs=12) -*/ -ATSINSmove_llazyeval(tmp192, atstype_boxed, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8135(line=464, offs=3) -- 8217(line=466, offs=44) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8152(line=465, offs=5) -- 8168(line=465, offs=21) -*/ -ATSINSlab(__atstmplab25): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8141(line=464, offs=9) -- 8144(line=464, offs=12) -*/ -ATSifthen(ATSCKptriscons(tmp192)) { ATSINSgoto(__atstmplab28) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8168(line=465, offs=21) -- 8168(line=465, offs=21) -*/ -ATSINSlab(__atstmplab26): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8172(line=465, offs=25) -- 8173(line=465, offs=26) -*/ -ATSINSmove(tmpret191, arg1) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8178(line=466, offs=5) -- 8200(line=466, offs=27) -*/ -ATSINSlab(__atstmplab27): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8141(line=464, offs=9) -- 8144(line=464, offs=12) -*/ -#if(0) -ATSifthen(ATSCKptrisnull(tmp192)) { ATSINSdeadcode_fail() ; } ; -#endif -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8200(line=466, offs=27) -- 8200(line=466, offs=27) -*/ -ATSINSlab(__atstmplab28): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8197(line=466, offs=24) -- 8199(line=466, offs=26) -*/ -ATSINSmove(tmp194, ATSSELcon(tmp192, postiats_tysum_3, atslab__1)) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8178(line=466, offs=5) -- 8217(line=466, offs=44) -*/ -ATSINSfreecon(tmp192) ; -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8213(line=466, offs=40) -- 8216(line=466, offs=43) -*/ -ATSINSmove(tmp195, PMVtmpltcst(g1int_add)(arg1, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8204(line=466, offs=31) -- 8217(line=466, offs=44) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, tmp194) ; -ATSINSmove_tlcal(apy1, tmp195) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSfgoto(__patsflab_loop_83) ; -ATStailcal_end() - -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret191) ; -} /* end of [loop_83__83] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 8056(line=456, offs=17) -- 8278(line=471, offs=4) -*/ -/* -local: -global: stream_vt_length$82$1(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = a(8735) -tmparg = S2Evar(a(8735)) -tmpsub = Some(a(8735) -> S2Eapp(S2Ecst(g0int_t0ype); S2Eextkind(atstype_int))) -*/ -atstkind_t0ype(atstype_int) -ATSLIB_056_prelude__stream_vt_length__82__1(atstkind_type(atstype_ptrk) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret190__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8040(line=456, offs=1) -- 8278(line=471, offs=4) -*/ -ATSINSflab(__patsflab_stream_vt_length): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8064(line=456, offs=25) -- 8278(line=471, offs=4) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8261(line=470, offs=16) -- 8273(line=470, offs=28) -*/ -ATSINSmove(tmpret190__1, loop_83__83__1(arg0, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8064(line=456, offs=25) -- 8278(line=471, offs=4) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret190__1) ; -} /* end of [ATSLIB_056_prelude__stream_vt_length__82__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 8075(line=459, offs=1) -- 8219(line=467, offs=2) -*/ -/* -local: loop_83$1(level=2) -global: loop_83$1(level=2) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -loop_83__83__1(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_type(atstype_ptrk)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret191__1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp192__1, atstype_boxed) ; -ATStmpdec(tmp194__1, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp195__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8075(line=459, offs=1) -- 8219(line=467, offs=2) -*/ -ATSINSflab(__patsflab_loop_83): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8141(line=464, offs=9) -- 8144(line=464, offs=12) -*/ -ATSINSmove_llazyeval(tmp192__1, atstype_boxed, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8135(line=464, offs=3) -- 8217(line=466, offs=44) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8152(line=465, offs=5) -- 8168(line=465, offs=21) -*/ -ATSINSlab(__atstmplab25): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8141(line=464, offs=9) -- 8144(line=464, offs=12) -*/ -ATSifthen(ATSCKptriscons(tmp192__1)) { ATSINSgoto(__atstmplab28) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8168(line=465, offs=21) -- 8168(line=465, offs=21) -*/ -ATSINSlab(__atstmplab26): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8172(line=465, offs=25) -- 8173(line=465, offs=26) -*/ -ATSINSmove(tmpret191__1, arg1) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8178(line=466, offs=5) -- 8200(line=466, offs=27) -*/ -ATSINSlab(__atstmplab27): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8141(line=464, offs=9) -- 8144(line=464, offs=12) -*/ -#if(0) -ATSifthen(ATSCKptrisnull(tmp192__1)) { ATSINSdeadcode_fail() ; } ; -#endif -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8200(line=466, offs=27) -- 8200(line=466, offs=27) -*/ -ATSINSlab(__atstmplab28): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8197(line=466, offs=24) -- 8199(line=466, offs=26) -*/ -ATSINSmove(tmp194__1, ATSSELcon(tmp192__1, postiats_tysum_1, atslab__1)) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8178(line=466, offs=5) -- 8217(line=466, offs=44) -*/ -ATSINSfreecon(tmp192__1) ; -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8213(line=466, offs=40) -- 8216(line=466, offs=43) -*/ -ATSINSmove(tmp195__1, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8204(line=466, offs=31) -- 8217(line=466, offs=44) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, tmp194__1) ; -ATSINSmove_tlcal(apy1, tmp195__1) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSfgoto(__patsflab_loop_83) ; -ATStailcal_end() - -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret191__1) ; -} /* end of [loop_83__83__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3600(line=133, offs=4) -- 4199(line=159, offs=6) -*/ -/* -local: sqrt_int_17$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), sum_divisors_86$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -sum_divisors_86(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret202, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3600(line=133, offs=4) -- 4199(line=159, offs=6) -*/ -ATSINSflab(__patsflab_sum_divisors_86): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3638(line=134, offs=3) -- 4199(line=159, offs=6) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4183(line=158, offs=5) -- 4193(line=158, offs=15) -*/ -ATSINSmove(tmpret202, loop_87(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3638(line=134, offs=3) -- 4199(line=159, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret202) ; -} /* end of [sum_divisors_86] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3650(line=135, offs=9) -- 4173(line=156, offs=27) -*/ -/* -local: sqrt_int_17$0(level=0), loop_87$0(level=1) -global: sqrt_int_17$0(level=0), loop_87$0(level=1) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -loop_87(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret203, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp204, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp207, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp208, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp211, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp212, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp215, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref216, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp217, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp220, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref221, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp222, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp223, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp224, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp225, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3650(line=135, offs=9) -- 4173(line=156, offs=27) -*/ -ATSINSflab(__patsflab_loop_87): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3744(line=136, offs=17) -- 3754(line=136, offs=27) -*/ -ATSINSmove(tmp207, sqrt_int_17(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3737(line=136, offs=10) -- 3754(line=136, offs=27) -*/ -ATSINSmove(tmp204, ATSLIB_056_prelude__gte_g1int_int__40__2(arg1, tmp207)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3734(line=136, offs=7) -- 4173(line=156, offs=27) -*/ -ATSif( -tmp204 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3772(line=137, offs=12) -- 3779(line=137, offs=19) -*/ -ATSINSmove(tmp211, atspre_g0int_mod_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3772(line=137, offs=12) -- 3783(line=137, offs=23) -*/ -ATSINSmove(tmp208, ATSLIB_056_prelude__eq_g0int_int__12__11(tmp211, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3769(line=137, offs=9) -- 3981(line=147, offs=12) -*/ -ATSif( -tmp208 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3802(line=138, offs=14) -- 3809(line=138, offs=21) -*/ -ATSINSmove(tmp215, atspre_g1int_div_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3802(line=138, offs=14) -- 3816(line=138, offs=28) -*/ -ATSINSmove(tmp212, ATSLIB_056_prelude__neq_g1int_int__44__2(tmp215, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3799(line=138, offs=11) -- 3956(line=145, offs=16) -*/ -ATSif( -tmp212 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3834(line=139, offs=13) -- 3925(line=143, offs=16) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3856(line=140, offs=19) -- 3857(line=140, offs=20) -*/ -/* -ATSINStmpdec(tmpref216) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3865(line=140, offs=28) -- 3872(line=140, offs=35) -*/ -ATSINSmove(tmpref216, atspre_g1int_div_int(arg0, arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3902(line=142, offs=15) -- 3909(line=142, offs=22) -*/ -ATSINSmove(tmpret203, atspre_g1int_add_int(arg1, tmpref216)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3834(line=139, offs=13) -- 3925(line=143, offs=16) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3953(line=145, offs=13) -- 3956(line=145, offs=16) -*/ -ATSINSmove(tmpret203, arg1) ; -} /* ATSendif */ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 3980(line=147, offs=11) -- 3981(line=147, offs=12) -*/ -ATSINSmove(tmpret203, ATSPMVi0nt(0)) ; -} /* ATSendif */ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4004(line=149, offs=12) -- 4011(line=149, offs=19) -*/ -ATSINSmove(tmp220, atspre_g0int_mod_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4004(line=149, offs=12) -- 4015(line=149, offs=23) -*/ -ATSINSmove(tmp217, ATSLIB_056_prelude__eq_g0int_int__12__12(tmp220, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4001(line=149, offs=9) -- 4173(line=156, offs=27) -*/ -ATSif( -tmp217 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4031(line=150, offs=11) -- 4133(line=154, offs=14) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4051(line=151, offs=17) -- 4052(line=151, offs=18) -*/ -/* -ATSINStmpdec(tmpref221) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4060(line=151, offs=26) -- 4067(line=151, offs=33) -*/ -ATSINSmove(tmpref221, atspre_g1int_div_int(arg0, arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4093(line=153, offs=13) -- 4100(line=153, offs=20) -*/ -ATSINSmove(tmp222, atspre_g1int_add_int(arg1, tmpref221)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4111(line=153, offs=31) -- 4118(line=153, offs=38) -*/ -ATSINSmove(tmp224, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4103(line=153, offs=23) -- 4119(line=153, offs=39) -*/ -ATSINSmove(tmp223, loop_87(arg0, tmp224)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4093(line=153, offs=13) -- 4119(line=153, offs=39) -*/ -ATSINSmove(tmpret203, atspre_g0int_add_int(tmp222, tmp223)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4031(line=150, offs=11) -- 4133(line=154, offs=14) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4165(line=156, offs=19) -- 4172(line=156, offs=26) -*/ -ATSINSmove(tmp225, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4157(line=156, offs=11) -- 4173(line=156, offs=27) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, arg0) ; -ATSINSmove_tlcal(apy1, tmp225) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSfgoto(__patsflab_loop_87) ; -ATStailcal_end() - -} /* ATSendif */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret203) ; -} /* end of [loop_87] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) -*/ -/* -local: -global: gte_g1int_int$40$2(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4706) -tmparg = S2Evar(tk(4706)) -tmpsub = Some(tk(4706) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gte_g1int_int__40__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret71__2, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp72__2, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12741(line=662, offs=1) -- 12797(line=663, offs=43) -*/ -ATSINSflab(__patsflab_gte_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) -*/ -ATSINSmove(tmp72__2, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) -*/ -ATSINSmove(tmpret71__2, atspre_g1int_gte_int(arg0, tmp72__2)) ; - -ATSfunbody_end() -ATSreturn(tmpret71__2) ; -} /* end of [ATSLIB_056_prelude__gte_g1int_int__40__2] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$11(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__11(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__11, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__11, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__11, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__11, atspre_g0int_eq_int(arg0, tmp19__11)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__11) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__11] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12916(line=672, offs=3) -- 12956(line=672, offs=43) -*/ -/* -local: -global: neq_g1int_int$44$2(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4712) -tmparg = S2Evar(tk(4712)) -tmpsub = Some(tk(4712) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__neq_g1int_int__44__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret81__2, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp82__2, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12900(line=671, offs=1) -- 12956(line=672, offs=43) -*/ -ATSINSflab(__patsflab_neq_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12943(line=672, offs=30) -- 12954(line=672, offs=41) -*/ -ATSINSmove(tmp82__2, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12925(line=672, offs=12) -- 12956(line=672, offs=43) -*/ -ATSINSmove(tmpret81__2, atspre_g1int_neq_int(arg0, tmp82__2)) ; - -ATSfunbody_end() -ATSreturn(tmpret81__2) ; -} /* end of [ATSLIB_056_prelude__neq_g1int_int__44__2] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$12(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__12(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__12, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__12, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__12, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__12, atspre_g0int_eq_int(arg0, tmp19__12)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__12) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__12] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4204(line=161, offs=4) -- 4259(line=162, offs=22) -*/ -/* -local: sum_divisors_86$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), sum_divisors_86$0(level=0), is_perfect_93$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_bool) -is_perfect_93(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret226, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp229, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4204(line=161, offs=4) -- 4259(line=162, offs=22) -*/ -ATSINSflab(__patsflab_is_perfect_93): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4240(line=162, offs=3) -- 4254(line=162, offs=17) -*/ -ATSINSmove(tmp229, sum_divisors_86(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4240(line=162, offs=3) -- 4259(line=162, offs=22) -*/ -ATSINSmove(tmpret226, ATSLIB_056_prelude__eq_g0int_int__12__13(tmp229, arg0)) ; - -ATSfunbody_end() -ATSreturn(tmpret226) ; -} /* end of [is_perfect_93] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$13(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__13(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__13, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__13, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__13, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__13, atspre_g0int_eq_int(arg0, tmp19__13)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__13) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__13] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4265(line=164, offs=5) -- 4585(line=178, offs=8) -*/ -/* -local: rip_95$0(level=0) -global: rip_95$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -rip_95(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret230, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp231, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp236, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp237, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp240, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref241, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp242, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp245, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4265(line=164, offs=5) -- 4585(line=178, offs=8) -*/ -ATSINSflab(__patsflab_rip_95): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4387(line=165, offs=6) -- 4392(line=165, offs=11) -*/ -ATSINSmove(tmp236, atspre_g0int_mod_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4387(line=165, offs=6) -- 4397(line=165, offs=16) -*/ -ATSINSmove(tmp231, ATSLIB_056_prelude__neq_g0int_int__96__1(tmp236, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4384(line=165, offs=3) -- 4585(line=178, offs=8) -*/ -ATSif( -tmp231 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4407(line=166, offs=5) -- 4408(line=166, offs=6) -*/ -ATSINSmove(tmpret230, arg0) ; -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4423(line=168, offs=8) -- 4428(line=168, offs=13) -*/ -ATSINSmove(tmp240, atspre_g1int_div_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4423(line=168, offs=8) -- 4432(line=168, offs=17) -*/ -ATSINSmove(tmp237, ATSLIB_056_prelude__gt_g1int_int__6__5(tmp240, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4420(line=168, offs=5) -- 4585(line=178, offs=8) -*/ -ATSif( -tmp237 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4444(line=169, offs=7) -- 4568(line=176, offs=10) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4460(line=170, offs=13) -- 4462(line=170, offs=15) -*/ -/* -ATSINStmpdec(tmpref241) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4465(line=170, offs=18) -- 4470(line=170, offs=23) -*/ -ATSINSmove(tmpref241, atspre_g1int_div_int(arg0, arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4491(line=172, offs=12) -- 4497(line=172, offs=18) -*/ -ATSINSmove(tmp242, ATSLIB_056_prelude__lt_g1int_int__22__2(tmpref241, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4488(line=172, offs=9) -- 4558(line=175, offs=12) -*/ -ATSif( -tmp242 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4522(line=173, offs=20) -- 4532(line=173, offs=30) -*/ -ATSINSmove(tmp245, rip_95(tmpref241, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4513(line=173, offs=11) -- 4533(line=173, offs=31) -*/ -ATSINSmove(tmpret230, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp245)) ; -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4557(line=175, offs=11) -- 4558(line=175, offs=12) -*/ -ATSINSmove(tmpret230, ATSPMVi0nt(1)) ; -} /* ATSendif */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4444(line=169, offs=7) -- 4568(line=176, offs=10) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4584(line=178, offs=7) -- 4585(line=178, offs=8) -*/ -ATSINSmove(tmpret230, ATSPMVi0nt(1)) ; -} /* ATSendif */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret230) ; -} /* end of [rip_95] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12337(line=639, offs=3) -- 12377(line=639, offs=43) -*/ -/* -local: -global: neq_g0int_int$96$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = tk(4695) -tmparg = S2Evar(tk(4695)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__neq_g0int_int__96(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret232, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp233, atstkind_t0ype(atstyvar_type(tk))) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12321(line=638, offs=1) -- 12377(line=639, offs=43) -*/ -ATSINSflab(__patsflab_neq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12364(line=639, offs=30) -- 12375(line=639, offs=41) -*/ -ATSINSmove(tmp233, PMVtmpltcst(g0int2int)(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12346(line=639, offs=12) -- 12377(line=639, offs=43) -*/ -ATSINSmove(tmpret232, PMVtmpltcst(g0int_neq)(arg0, tmp233)) ; - -ATSfunbody_end() -ATSreturn(tmpret232) ; -} /* end of [ATSLIB_056_prelude__neq_g0int_int__96] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12337(line=639, offs=3) -- 12377(line=639, offs=43) -*/ -/* -local: -global: neq_g0int_int$96$1(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4695) -tmparg = S2Evar(tk(4695)) -tmpsub = Some(tk(4695) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__neq_g0int_int__96__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret232__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp233__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12321(line=638, offs=1) -- 12377(line=639, offs=43) -*/ -ATSINSflab(__patsflab_neq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12364(line=639, offs=30) -- 12375(line=639, offs=41) -*/ -ATSINSmove(tmp233__1, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12346(line=639, offs=12) -- 12377(line=639, offs=43) -*/ -ATSINSmove(tmpret232__1, atspre_g0int_neq_int(arg0, tmp233__1)) ; - -ATSfunbody_end() -ATSreturn(tmpret232__1) ; -} /* end of [ATSLIB_056_prelude__neq_g0int_int__96__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) -*/ -/* -local: -global: gt_g1int_int$6$5(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4703) -tmparg = S2Evar(tk(4703)) -tmpsub = Some(tk(4703) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__5(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret11__5, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp12__5, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) -*/ -ATSINSflab(__patsflab_gt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) -*/ -ATSINSmove(tmp12__5, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) -*/ -ATSINSmove(tmpret11__5, atspre_g1int_gt_int(arg0, tmp12__5)) ; - -ATSfunbody_end() -ATSreturn(tmpret11__5) ; -} /* end of [ATSLIB_056_prelude__gt_g1int_int__6__5] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) -*/ -/* -local: -global: lt_g1int_int$22$2(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4697) -tmparg = S2Evar(tk(4697)) -tmpsub = Some(tk(4697) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__22__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret33__2, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp34__2, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) -*/ -ATSINSflab(__patsflab_lt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) -*/ -ATSINSmove(tmp34__2, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) -*/ -ATSINSmove(tmpret33__2, atspre_g1int_lt_int(arg0, tmp34__2)) ; - -ATSfunbody_end() -ATSreturn(tmpret33__2) ; -} /* end of [ATSLIB_056_prelude__lt_g1int_int__22__2] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4591(line=180, offs=5) -- 5194(line=198, offs=6) -*/ -/* -local: is_prime_20$0(level=0), rip_95$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), is_prime_20$0(level=0), rip_95$0(level=0), prime_factors_101$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -prime_factors_101(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret246, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4591(line=180, offs=5) -- 5194(line=198, offs=6) -*/ -ATSINSflab(__patsflab_prime_factors_101): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4641(line=181, offs=3) -- 5194(line=198, offs=6) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5178(line=197, offs=5) -- 5188(line=197, offs=15) -*/ -ATSINSmove(tmpret246, loop_102(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4641(line=181, offs=3) -- 5194(line=198, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret246) ; -} /* end of [prime_factors_101] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4653(line=182, offs=9) -- 5168(line=195, offs=27) -*/ -/* -local: is_prime_20$0(level=0), rip_95$0(level=0), loop_102$0(level=1) -global: is_prime_20$0(level=0), rip_95$0(level=0), loop_102$0(level=1) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -loop_102(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret247, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp248, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp251, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp256, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp257, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp260, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp261, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp264, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp271, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4653(line=182, offs=9) -- 5168(line=195, offs=27) -*/ -ATSINSflab(__patsflab_loop_102): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4751(line=183, offs=10) -- 4759(line=183, offs=18) -*/ -ATSINSmove(tmp248, ATSLIB_056_prelude__gte_g1int_int__40__3(arg1, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4748(line=183, offs=7) -- 5168(line=195, offs=27) -*/ -ATSif( -tmp248 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4776(line=184, offs=12) -- 4786(line=184, offs=22) -*/ -ATSINSmove(tmp251, is_prime_20(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4773(line=184, offs=9) -- 4899(line=187, offs=33) -*/ -ATSif( -tmp251 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4803(line=185, offs=11) -- 4853(line=185, offs=61) -*/ -ATSINSmove_ldelay(tmpret247, atstype_boxed, ATSPMVcfunlab(1, __patsfun_104, (arg0))) ; -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4877(line=187, offs=11) -- 4899(line=187, offs=33) -*/ -ATSINSmove_ldelay(tmpret247, atstype_boxed, ATSPMVcfunlab(1, __patsfun_106, ())) ; -} /* ATSendif */ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4922(line=189, offs=12) -- 4949(line=189, offs=39) -*/ -ATSINSmove(tmp260, atspre_g0int_mod_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4922(line=189, offs=12) -- 4949(line=189, offs=39) -*/ -ATSINSmove(tmp257, ATSLIB_056_prelude__eq_g0int_int__12__14(tmp260, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4922(line=189, offs=12) -- 4949(line=189, offs=39) -*/ -ATSif( -tmp257 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4922(line=189, offs=12) -- 4949(line=189, offs=39) -*/ -ATSINSmove(tmp256, is_prime_20(arg1)) ; - -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4922(line=189, offs=12) -- 4949(line=189, offs=39) -*/ -ATSINSmove(tmp256, ATSPMVbool_false()) ; -} /* ATSendif */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4919(line=189, offs=9) -- 5168(line=195, offs=27) -*/ -ATSif( -tmp256 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4969(line=190, offs=14) -- 4976(line=190, offs=21) -*/ -ATSINSmove(tmp264, atspre_g1int_div_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4969(line=190, offs=14) -- 4980(line=190, offs=25) -*/ -ATSINSmove(tmp261, ATSLIB_056_prelude__gt_g1int_int__6__6(tmp264, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4966(line=190, offs=11) -- 5128(line=193, offs=65) -*/ -ATSif( -tmp261 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4998(line=191, offs=13) -- 5048(line=191, offs=63) -*/ -ATSINSmove_ldelay(tmpret247, atstype_boxed, ATSPMVcfunlab(1, __patsfun_109, (arg0, arg1))) ; -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5076(line=193, offs=13) -- 5128(line=193, offs=65) -*/ -ATSINSmove_ldelay(tmpret247, atstype_boxed, ATSPMVcfunlab(1, __patsfun_110, (arg1))) ; -} /* ATSendif */ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5160(line=195, offs=19) -- 5167(line=195, offs=26) -*/ -ATSINSmove(tmp271, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5152(line=195, offs=11) -- 5168(line=195, offs=27) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, arg0) ; -ATSINSmove_tlcal(apy1, tmp271) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSfgoto(__patsflab_loop_102) ; -ATStailcal_end() - -} /* ATSendif */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret247) ; -} /* end of [loop_102] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) -*/ -/* -local: -global: gte_g1int_int$40$3(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4706) -tmparg = S2Evar(tk(4706)) -tmpsub = Some(tk(4706) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gte_g1int_int__40__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret71__3, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp72__3, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12741(line=662, offs=1) -- 12797(line=663, offs=43) -*/ -ATSINSflab(__patsflab_gte_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) -*/ -ATSINSmove(tmp72__3, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) -*/ -ATSINSmove(tmpret71__3, atspre_g1int_gte_int(arg0, tmp72__3)) ; - -ATSfunbody_end() -ATSreturn(tmpret71__3) ; -} /* end of [ATSLIB_056_prelude__gte_g1int_int__40__3] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4803(line=185, offs=11) -- 4853(line=185, offs=61) -*/ -/* -local: -global: __patsfun_104$0(level=2) -local: n$5175(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -global: n$5175(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -*/ -ATSstatic() -atstype_boxed -__patsfun_104(atstkind_t0ype(atstype_int) env0, atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret252, atstype_boxed) ; -ATStmpdec(tmp253, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4803(line=185, offs=11) -- 4853(line=185, offs=61) -*/ -ATSINSflab(__patsflab___patsfun_104): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4803(line=185, offs=11) -- 4853(line=185, offs=61) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4829(line=185, offs=37) -- 4851(line=185, offs=59) -*/ -ATSINSmove_ldelay(tmp253, atstype_boxed, ATSPMVcfunlab(1, __patsfun_105, ())) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4811(line=185, offs=19) -- 4852(line=185, offs=60) -*/ - -/* -#LINCONSTATUS==0 -*/ -ATSINSmove_con1_beg() -ATSINSmove_con1_new(tmpret252, postiats_tysum_1) ; -#if(0) -ATSINSstore_con1_tag(tmpret252, 1) ; -#endif -ATSINSstore_con1_ofs(tmpret252, postiats_tysum_1, atslab__0, env0) ; -ATSINSstore_con1_ofs(tmpret252, postiats_tysum_1, atslab__1, tmp253) ; -ATSINSmove_con1_end() -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret252) ; -} /* end of [__patsfun_104] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4829(line=185, offs=37) -- 4851(line=185, offs=59) -*/ -/* -local: -global: __patsfun_105$0(level=3) -local: -global: -*/ -ATSstatic() -atstype_boxed -__patsfun_105(atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret254, atstype_boxed) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4829(line=185, offs=37) -- 4851(line=185, offs=59) -*/ -ATSINSflab(__patsflab___patsfun_105): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4829(line=185, offs=37) -- 4851(line=185, offs=59) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4837(line=185, offs=45) -- 4850(line=185, offs=58) -*/ - -ATSINSmove_nil(tmpret254) ; - -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret254) ; -} /* end of [__patsfun_105] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4877(line=187, offs=11) -- 4899(line=187, offs=33) -*/ -/* -local: -global: __patsfun_106$0(level=2) -local: -global: -*/ -ATSstatic() -atstype_boxed -__patsfun_106(atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret255, atstype_boxed) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4877(line=187, offs=11) -- 4899(line=187, offs=33) -*/ -ATSINSflab(__patsflab___patsfun_106): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4877(line=187, offs=11) -- 4899(line=187, offs=33) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4885(line=187, offs=19) -- 4898(line=187, offs=32) -*/ - -ATSINSmove_nil(tmpret255) ; - -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret255) ; -} /* end of [__patsfun_106] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$14(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__14(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__14, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__14, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__14, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__14, atspre_g0int_eq_int(arg0, tmp19__14)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__14) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__14] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) -*/ -/* -local: -global: gt_g1int_int$6$6(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4703) -tmparg = S2Evar(tk(4703)) -tmpsub = Some(tk(4703) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__6(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret11__6, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp12__6, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) -*/ -ATSINSflab(__patsflab_gt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) -*/ -ATSINSmove(tmp12__6, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) -*/ -ATSINSmove(tmpret11__6, atspre_g1int_gt_int(arg0, tmp12__6)) ; - -ATSfunbody_end() -ATSreturn(tmpret11__6) ; -} /* end of [ATSLIB_056_prelude__gt_g1int_int__6__6] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4998(line=191, offs=13) -- 5048(line=191, offs=63) -*/ -/* -local: rip_95$0(level=0), loop_102$0(level=1) -global: rip_95$0(level=0), loop_102$0(level=1), __patsfun_109$0(level=2) -local: n$5175(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5176(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -global: n$5175(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5176(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -*/ -ATSstatic() -atstype_boxed -__patsfun_109(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret265, atstype_boxed) ; -ATStmpdec(tmp266, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp267, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4998(line=191, offs=13) -- 5048(line=191, offs=63) -*/ -ATSINSflab(__patsflab___patsfun_109): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 4998(line=191, offs=13) -- 5048(line=191, offs=63) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5031(line=191, offs=46) -- 5042(line=191, offs=57) -*/ -ATSINSmove(tmp267, rip_95(env0, env1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5026(line=191, offs=41) -- 5046(line=191, offs=61) -*/ -ATSINSmove(tmp266, loop_102(tmp267, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5006(line=191, offs=21) -- 5047(line=191, offs=62) -*/ - -/* -#LINCONSTATUS==0 -*/ -ATSINSmove_con1_beg() -ATSINSmove_con1_new(tmpret265, postiats_tysum_1) ; -#if(0) -ATSINSstore_con1_tag(tmpret265, 1) ; -#endif -ATSINSstore_con1_ofs(tmpret265, postiats_tysum_1, atslab__0, env1) ; -ATSINSstore_con1_ofs(tmpret265, postiats_tysum_1, atslab__1, tmp266) ; -ATSINSmove_con1_end() -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret265) ; -} /* end of [__patsfun_109] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5076(line=193, offs=13) -- 5128(line=193, offs=65) -*/ -/* -local: -global: __patsfun_110$0(level=2) -local: acc$5176(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -global: acc$5176(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -*/ -ATSstatic() -atstype_boxed -__patsfun_110(atstkind_t0ype(atstype_int) env0, atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret268, atstype_boxed) ; -ATStmpdec(tmp269, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5076(line=193, offs=13) -- 5128(line=193, offs=65) -*/ -ATSINSflab(__patsflab___patsfun_110): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5076(line=193, offs=13) -- 5128(line=193, offs=65) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5104(line=193, offs=41) -- 5126(line=193, offs=63) -*/ -ATSINSmove_ldelay(tmp269, atstype_boxed, ATSPMVcfunlab(1, __patsfun_111, ())) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5084(line=193, offs=21) -- 5127(line=193, offs=64) -*/ - -/* -#LINCONSTATUS==0 -*/ -ATSINSmove_con1_beg() -ATSINSmove_con1_new(tmpret268, postiats_tysum_1) ; -#if(0) -ATSINSstore_con1_tag(tmpret268, 1) ; -#endif -ATSINSstore_con1_ofs(tmpret268, postiats_tysum_1, atslab__0, env0) ; -ATSINSstore_con1_ofs(tmpret268, postiats_tysum_1, atslab__1, tmp269) ; -ATSINSmove_con1_end() -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret268) ; -} /* end of [__patsfun_110] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5104(line=193, offs=41) -- 5126(line=193, offs=63) -*/ -/* -local: -global: __patsfun_111$0(level=3) -local: -global: -*/ -ATSstatic() -atstype_boxed -__patsfun_111(atstype_bool arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret270, atstype_boxed) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5104(line=193, offs=41) -- 5126(line=193, offs=63) -*/ -ATSINSflab(__patsflab___patsfun_111): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5104(line=193, offs=41) -- 5126(line=193, offs=63) -*/ -ATSif( -arg0 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5112(line=193, offs=49) -- 5125(line=193, offs=62) -*/ - -ATSINSmove_nil(tmpret270) ; - -} ATSelse() { -/* (*nothing*) */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret270) ; -} /* end of [__patsfun_111] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5226(line=201, offs=4) -- 5665(line=219, offs=6) -*/ -/* -local: is_prime_20$0(level=0), rip_95$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), is_prime_20$0(level=0), rip_95$0(level=0), little_omega_112$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -little_omega_112(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret272, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5226(line=201, offs=4) -- 5665(line=219, offs=6) -*/ -ATSINSflab(__patsflab_little_omega_112): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5264(line=202, offs=3) -- 5665(line=219, offs=6) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5649(line=218, offs=5) -- 5659(line=218, offs=15) -*/ -ATSINSmove(tmpret272, loop_113(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5264(line=202, offs=3) -- 5665(line=219, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret272) ; -} /* end of [little_omega_112] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5276(line=203, offs=9) -- 5639(line=216, offs=27) -*/ -/* -local: is_prime_20$0(level=0), rip_95$0(level=0), loop_113$0(level=1) -global: is_prime_20$0(level=0), rip_95$0(level=0), loop_113$0(level=1) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -loop_113(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret273, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp274, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp277, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp278, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp279, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp282, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp283, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp286, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp287, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp288, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp289, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5276(line=203, offs=9) -- 5639(line=216, offs=27) -*/ -ATSINSflab(__patsflab_loop_113): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5369(line=204, offs=10) -- 5377(line=204, offs=18) -*/ -ATSINSmove(tmp274, ATSLIB_056_prelude__gte_g1int_int__40__4(arg1, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5366(line=204, offs=7) -- 5639(line=216, offs=27) -*/ -ATSif( -tmp274 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5394(line=205, offs=12) -- 5404(line=205, offs=22) -*/ -ATSINSmove(tmp277, is_prime_20(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5391(line=205, offs=9) -- 5447(line=208, offs=12) -*/ -ATSif( -tmp277 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5421(line=206, offs=11) -- 5422(line=206, offs=12) -*/ -ATSINSmove(tmpret273, ATSPMVi0nt(1)) ; -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5446(line=208, offs=11) -- 5447(line=208, offs=12) -*/ -ATSINSmove(tmpret273, ATSPMVi0nt(0)) ; -} /* ATSendif */ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5470(line=210, offs=12) -- 5497(line=210, offs=39) -*/ -ATSINSmove(tmp282, atspre_g0int_mod_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5470(line=210, offs=12) -- 5497(line=210, offs=39) -*/ -ATSINSmove(tmp279, ATSLIB_056_prelude__eq_g0int_int__12__15(tmp282, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5470(line=210, offs=12) -- 5497(line=210, offs=39) -*/ -ATSif( -tmp279 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5470(line=210, offs=12) -- 5497(line=210, offs=39) -*/ -ATSINSmove(tmp278, is_prime_20(arg1)) ; - -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5470(line=210, offs=12) -- 5497(line=210, offs=39) -*/ -ATSINSmove(tmp278, ATSPMVbool_false()) ; -} /* ATSendif */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5467(line=210, offs=9) -- 5639(line=216, offs=27) -*/ -ATSif( -tmp278 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5517(line=211, offs=14) -- 5524(line=211, offs=21) -*/ -ATSINSmove(tmp286, atspre_g1int_div_int(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5517(line=211, offs=14) -- 5528(line=211, offs=25) -*/ -ATSINSmove(tmp283, ATSLIB_056_prelude__gt_g1int_int__6__7(tmp286, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5514(line=211, offs=11) -- 5599(line=214, offs=14) -*/ -ATSif( -tmp283 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5555(line=212, offs=22) -- 5566(line=212, offs=33) -*/ -ATSINSmove(tmp288, rip_95(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5550(line=212, offs=17) -- 5570(line=212, offs=37) -*/ -ATSINSmove(tmp287, loop_113(tmp288, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5546(line=212, offs=13) -- 5570(line=212, offs=37) -*/ -ATSINSmove(tmpret273, atspre_g0int_add_int(ATSPMVi0nt(1), tmp287)) ; - -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5598(line=214, offs=13) -- 5599(line=214, offs=14) -*/ -ATSINSmove(tmpret273, ATSPMVi0nt(1)) ; -} /* ATSendif */ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5631(line=216, offs=19) -- 5638(line=216, offs=26) -*/ -ATSINSmove(tmp289, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5623(line=216, offs=11) -- 5639(line=216, offs=27) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, arg0) ; -ATSINSmove_tlcal(apy1, tmp289) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSfgoto(__patsflab_loop_113) ; -ATStailcal_end() - -} /* ATSendif */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret273) ; -} /* end of [loop_113] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) -*/ -/* -local: -global: gte_g1int_int$40$4(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4706) -tmparg = S2Evar(tk(4706)) -tmpsub = Some(tk(4706) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gte_g1int_int__40__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret71__4, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp72__4, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12741(line=662, offs=1) -- 12797(line=663, offs=43) -*/ -ATSINSflab(__patsflab_gte_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) -*/ -ATSINSmove(tmp72__4, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) -*/ -ATSINSmove(tmpret71__4, atspre_g1int_gte_int(arg0, tmp72__4)) ; - -ATSfunbody_end() -ATSreturn(tmpret71__4) ; -} /* end of [ATSLIB_056_prelude__gte_g1int_int__40__4] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$15(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__15(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__15, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__15, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__15, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__15, atspre_g0int_eq_int(arg0, tmp19__15)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__15) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__15] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) -*/ -/* -local: -global: gt_g1int_int$6$7(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4703) -tmparg = S2Evar(tk(4703)) -tmpsub = Some(tk(4703) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__7(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret11__7, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp12__7, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) -*/ -ATSINSflab(__patsflab_gt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) -*/ -ATSINSmove(tmp12__7, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) -*/ -ATSINSmove(tmpret11__7, atspre_g1int_gt_int(arg0, tmp12__7)) ; - -ATSfunbody_end() -ATSreturn(tmpret11__7) ; -} /* end of [ATSLIB_056_prelude__gt_g1int_int__6__7] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5699(line=222, offs=4) -- 6188(line=234, offs=8) -*/ -/* -local: prime_factors_101$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), is_prime_20$0(level=0), rip_95$0(level=0), prime_factors_101$0(level=0), totient_117$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -totient_117(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret290, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref295, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref296, postiats_tyrec_0) ; -ATStmpdec(tmpref297, postiats_tyrec_0) ; -ATStmpdec(tmp315, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5699(line=222, offs=4) -- 6188(line=234, offs=8) -*/ -ATSINSflab(__patsflab_totient_117): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5732(line=223, offs=3) -- 6188(line=234, offs=8) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5749(line=224, offs=7) -- 5750(line=224, offs=8) -*/ -ATSINSlab(__atstmplab29): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5707(line=222, offs=12) -- 5708(line=222, offs=13) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab31) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5750(line=224, offs=8) -- 5750(line=224, offs=8) -*/ -ATSINSlab(__atstmplab30): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5754(line=224, offs=12) -- 5755(line=224, offs=13) -*/ -ATSINSmove(tmpret290, ATSPMVi0nt(1)) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5763(line=225, offs=8) -- 5763(line=225, offs=8) -*/ -ATSINSlab(__atstmplab31): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5768(line=225, offs=13) -- 6188(line=234, offs=8) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5922(line=229, offs=11) -- 5923(line=229, offs=12) -*/ -/* -ATSINStmpdec(tmpref295) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5942(line=229, offs=31) -- 5957(line=229, offs=46) -*/ -ATSINSmove(tmpref295, prime_factors_101(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5969(line=230, offs=11) -- 5979(line=230, offs=21) -*/ -/* -ATSINStmpdec(tmpref296) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5982(line=230, offs=24) -- 6008(line=230, offs=50) -*/ -ATSINSmove_fltrec_beg() -ATSINSstore_fltrec_ofs(tmpref296, postiats_tyrec_0, atslab__first, ATSPMVi0nt(1)) ; -ATSINSstore_fltrec_ofs(tmpref296, postiats_tyrec_0, atslab__second, ATSPMVi0nt(1)) ; -ATSINSmove_fltrec_end() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6026(line=231, offs=11) -- 6027(line=231, offs=12) -*/ -/* -ATSINStmpdec(tmpref297) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6030(line=231, offs=15) -- 6117(line=231, offs=102) -*/ -ATSINSmove(tmpref297, ATSLIB_056_prelude__stream_vt_foldleft_cloptr__120__1(tmpref295, tmpref296, ATSPMVcfunlab(1, __patsfun_124, ()))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6148(line=233, offs=17) -- 6169(line=233, offs=38) -*/ -ATSINSmove(tmp315, atspre_g0int_mul_int(arg0, ATSSELfltrec(tmpref297, postiats_tyrec_0, atslab__first))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6138(line=233, offs=7) -- 6180(line=233, offs=49) -*/ -ATSINSmove(tmpret290, atspre_g0int_div_int(tmp315, ATSSELfltrec(tmpref297, postiats_tyrec_0, atslab__second))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5768(line=225, offs=13) -- 6188(line=234, offs=8) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret290) ; -} /* end of [totient_117] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5781(line=226, offs=10) -- 5904(line=227, offs=80) -*/ -/* -local: -global: adjust_contents_118$0(level=1) -local: -global: -*/ -ATSstatic() -postiats_tyrec_0 -adjust_contents_118(postiats_tyrec_0 arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret291, postiats_tyrec_0) ; -ATStmpdec(tmp292, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp293, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp294, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5781(line=226, offs=10) -- 5904(line=227, offs=80) -*/ -ATSINSflab(__patsflab_adjust_contents_118): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5863(line=227, offs=39) -- 5868(line=227, offs=44) -*/ -ATSINSmove(tmp293, atspre_g0int_sub_int(arg1, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5844(line=227, offs=20) -- 5869(line=227, offs=45) -*/ -ATSINSmove(tmp292, atspre_g0int_mul_int(ATSSELfltrec(arg0, postiats_tyrec_0, atslab__first), tmp293)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5880(line=227, offs=56) -- 5902(line=227, offs=78) -*/ -ATSINSmove(tmp294, atspre_g0int_mul_int(ATSSELfltrec(arg0, postiats_tyrec_0, atslab__second), arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 5833(line=227, offs=9) -- 5904(line=227, offs=80) -*/ -ATSINSmove_fltrec_beg() -ATSINSstore_fltrec_ofs(tmpret291, postiats_tyrec_0, atslab__first, tmp292) ; -ATSINSstore_fltrec_ofs(tmpret291, postiats_tyrec_0, atslab__second, tmp294) ; -ATSINSmove_fltrec_end() -ATSfunbody_end() -ATSreturn(tmpret291) ; -} /* end of [adjust_contents_118] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 26263(line=1640, offs=3) -- 26743(line=1671, offs=2) -*/ -/* -local: -global: stream_vt_foldleft_cloptr$120$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = res(8865), a(8866) -tmparg = S2Evar(res(8865)); S2Evar(a(8866)) -tmpsub = None() -*/ -atstyvar_type(res) -ATSLIB_056_prelude__stream_vt_foldleft_cloptr__120(atstkind_type(atstype_ptrk) arg0, atstyvar_type(res) arg1, atstype_cloptr arg2) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret298, atstyvar_type(res)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26235(line=1639, offs=1) -- 26743(line=1671, offs=2) -*/ -ATSINSflab(__patsflab_stream_vt_foldleft_cloptr): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26284(line=1641, offs=3) -- 26743(line=1671, offs=2) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26284(line=1641, offs=3) -- 26304(line=1641, offs=23) -*/ -ATSINSmove(tmpret298, ATSfunclo_fun(PMVd2vfunlab(d2v=loop$4501(1), flab=loop_121$0(level=1)), (atstkind_type(atstype_ptrk), atstyvar_type(res), atstype_cloptr), atstyvar_type(res))(arg0, arg1, arg2)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26284(line=1641, offs=3) -- 26743(line=1671, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret298) ; -} /* end of [ATSLIB_056_prelude__stream_vt_foldleft_cloptr__120] */ -#endif // end of [TEMPLATE] - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 26320(line=1645, offs=1) -- 26721(line=1669, offs=4) -*/ -/* -local: loop_121$0(level=1) -global: loop_121$0(level=1) -local: -global: -*/ -ATSstatic() -atstyvar_type(res) -loop_121__121(atstkind_type(atstype_ptrk) arg0, atstyvar_type(res) arg1, atstype_cloptr arg2) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_type(atstype_ptrk)) ; -ATStmpdec(apy1, atstyvar_type(res)) ; -ATStmpdec(apy2, atstype_cloptr) ; -ATStmpdec(tmpret299, atstyvar_type(res)) ; -ATStmpdec(tmpref300, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp301, atstype_boxed) ; -// ATStmpdec_void(tmp304) ; -ATStmpdec(tmp305, atstyvar_type(res)) ; -ATStmpdec(tmp306, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26320(line=1645, offs=1) -- 26721(line=1669, offs=4) -*/ -ATSINSflab(__patsflab_loop_121): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26398(line=1651, offs=6) -- 26721(line=1669, offs=4) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26408(line=1652, offs=7) -- 26414(line=1652, offs=13) -*/ -/* -ATSINStmpdec(tmpref300) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26417(line=1652, offs=16) -- 26420(line=1652, offs=19) -*/ -ATSINSmove_llazyeval(tmpref300, atstype_boxed, arg0) ; -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26433(line=1656, offs=1) -- 26439(line=1656, offs=7) -*/ -ATSINSmove(tmp301, tmpref300) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26427(line=1655, offs=1) -- 26687(line=1667, offs=6) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26454(line=1658, offs=3) -- 26475(line=1659, offs=7) -*/ -ATSINSlab(__atstmplab32): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26433(line=1656, offs=1) -- 26439(line=1656, offs=7) -*/ -ATSifthen(ATSCKptriscons(tmp301)) { ATSINSgoto(__atstmplab35) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26475(line=1659, offs=7) -- 26475(line=1659, offs=7) -*/ -ATSINSlab(__atstmplab33): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26487(line=1661, offs=5) -- 26519(line=1661, offs=37) -*/ -ATSINSmove_void(tmp304, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), arg2))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26521(line=1661, offs=39) -- 26524(line=1661, offs=42) -*/ -ATSINSmove(tmpret299, arg1) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26560(line=1663, offs=3) -- 26589(line=1664, offs=14) -*/ -ATSINSlab(__atstmplab34): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26433(line=1656, offs=1) -- 26439(line=1656, offs=7) -*/ -#if(0) -ATSifthen(ATSCKptrisnull(tmp301)) { ATSINSdeadcode_fail() ; } ; -#endif -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26589(line=1664, offs=14) -- 26589(line=1664, offs=14) -*/ -ATSINSlab(__atstmplab35): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26593(line=1664, offs=18) -- 26687(line=1667, offs=6) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26611(line=1665, offs=15) -- 26624(line=1665, offs=28) -*/ -ATSINSmove(tmp305, ATSfunclo_clo(ATSPMVrefarg0(arg2), (atstype_cloptr, atstyvar_type(res), atsrefarg1_type(atstyvar_type(a))), atstyvar_type(res))(ATSPMVrefarg0(arg2), arg1, ATSPMVrefarg1(ATSPMVptrof(ATSSELcon(tmp301, postiats_tysum_4, atslab__0))))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26639(line=1666, offs=15) -- 26642(line=1666, offs=18) -*/ -ATSINSmove(tmp306, ATSSELcon(tmp301, postiats_tysum_4, atslab__1)) ; -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26646(line=1666, offs=22) -- 26658(line=1666, offs=34) -*/ -ATSINSfreecon(tmpref300) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26661(line=1666, offs=37) -- 26681(line=1666, offs=57) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, tmp306) ; -ATSINSmove_tlcal(apy1, tmp305) ; -ATSINSmove_tlcal(apy2, arg2) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSargmove_tlcal(arg2, apy2) ; -ATSINSfgoto(__patsflab_loop_121) ; -ATStailcal_end() - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26593(line=1664, offs=18) -- 26687(line=1667, offs=6) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26398(line=1651, offs=6) -- 26721(line=1669, offs=4) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret299) ; -} /* end of [loop_121__121] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 26263(line=1640, offs=3) -- 26743(line=1671, offs=2) -*/ -/* -local: -global: stream_vt_foldleft_cloptr$120$1(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = res(8865), a(8866) -tmparg = S2Evar(res(8865)); S2Evar(a(8866)) -tmpsub = Some(res(8865) -> S2EVar(5872); a(8866) -> S2Eapp(S2Ecst(g0int_t0ype); S2Eextkind(atstype_int))) -*/ -postiats_tyrec_0 -ATSLIB_056_prelude__stream_vt_foldleft_cloptr__120__1(atstkind_type(atstype_ptrk) arg0, postiats_tyrec_0 arg1, atstype_cloptr arg2) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret298__1, postiats_tyrec_0) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26235(line=1639, offs=1) -- 26743(line=1671, offs=2) -*/ -ATSINSflab(__patsflab_stream_vt_foldleft_cloptr): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26284(line=1641, offs=3) -- 26743(line=1671, offs=2) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26284(line=1641, offs=3) -- 26304(line=1641, offs=23) -*/ -ATSINSmove(tmpret298__1, loop_121__121__1(arg0, arg1, arg2)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26284(line=1641, offs=3) -- 26743(line=1671, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret298__1) ; -} /* end of [ATSLIB_056_prelude__stream_vt_foldleft_cloptr__120__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 26320(line=1645, offs=1) -- 26721(line=1669, offs=4) -*/ -/* -local: loop_121$1(level=2) -global: loop_121$1(level=2) -local: -global: -*/ -ATSstatic() -postiats_tyrec_0 -loop_121__121__1(atstkind_type(atstype_ptrk) arg0, postiats_tyrec_0 arg1, atstype_cloptr arg2) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_type(atstype_ptrk)) ; -ATStmpdec(apy1, postiats_tyrec_0) ; -ATStmpdec(apy2, atstype_cloptr) ; -ATStmpdec(tmpret299__1, postiats_tyrec_0) ; -ATStmpdec(tmpref300__1, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp301__1, atstype_boxed) ; -// ATStmpdec_void(tmp304__1) ; -ATStmpdec(tmp305__1, postiats_tyrec_0) ; -ATStmpdec(tmp306__1, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26320(line=1645, offs=1) -- 26721(line=1669, offs=4) -*/ -ATSINSflab(__patsflab_loop_121): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26398(line=1651, offs=6) -- 26721(line=1669, offs=4) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26408(line=1652, offs=7) -- 26414(line=1652, offs=13) -*/ -/* -ATSINStmpdec(tmpref300) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26417(line=1652, offs=16) -- 26420(line=1652, offs=19) -*/ -ATSINSmove_llazyeval(tmpref300__1, atstype_boxed, arg0) ; -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26433(line=1656, offs=1) -- 26439(line=1656, offs=7) -*/ -ATSINSmove(tmp301__1, tmpref300__1) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26427(line=1655, offs=1) -- 26687(line=1667, offs=6) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26454(line=1658, offs=3) -- 26475(line=1659, offs=7) -*/ -ATSINSlab(__atstmplab32): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26433(line=1656, offs=1) -- 26439(line=1656, offs=7) -*/ -ATSifthen(ATSCKptriscons(tmp301__1)) { ATSINSgoto(__atstmplab35) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26475(line=1659, offs=7) -- 26475(line=1659, offs=7) -*/ -ATSINSlab(__atstmplab33): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26487(line=1661, offs=5) -- 26519(line=1661, offs=37) -*/ -ATSINSmove_void(tmp304__1, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), arg2))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26521(line=1661, offs=39) -- 26524(line=1661, offs=42) -*/ -ATSINSmove(tmpret299__1, arg1) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26560(line=1663, offs=3) -- 26589(line=1664, offs=14) -*/ -ATSINSlab(__atstmplab34): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26433(line=1656, offs=1) -- 26439(line=1656, offs=7) -*/ -#if(0) -ATSifthen(ATSCKptrisnull(tmp301__1)) { ATSINSdeadcode_fail() ; } ; -#endif -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26589(line=1664, offs=14) -- 26589(line=1664, offs=14) -*/ -ATSINSlab(__atstmplab35): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26593(line=1664, offs=18) -- 26687(line=1667, offs=6) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26611(line=1665, offs=15) -- 26624(line=1665, offs=28) -*/ -ATSINSmove(tmp305__1, ATSfunclo_clo(ATSPMVrefarg0(arg2), (atstype_cloptr, postiats_tyrec_0, atsrefarg1_type(atstkind_t0ype(atstype_int))), postiats_tyrec_0)(ATSPMVrefarg0(arg2), arg1, ATSPMVrefarg1(ATSPMVptrof(ATSSELcon(tmp301__1, postiats_tysum_1, atslab__0))))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26639(line=1666, offs=15) -- 26642(line=1666, offs=18) -*/ -ATSINSmove(tmp306__1, ATSSELcon(tmp301__1, postiats_tysum_1, atslab__1)) ; -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26646(line=1666, offs=22) -- 26658(line=1666, offs=34) -*/ -ATSINSfreecon(tmpref300__1) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26661(line=1666, offs=37) -- 26681(line=1666, offs=57) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, tmp306__1) ; -ATSINSmove_tlcal(apy1, tmp305__1) ; -ATSINSmove_tlcal(apy2, arg2) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSargmove_tlcal(arg2, apy2) ; -ATSINSfgoto(__patsflab_loop_121) ; -ATStailcal_end() - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26593(line=1664, offs=18) -- 26687(line=1667, offs=6) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 26398(line=1651, offs=6) -- 26721(line=1669, offs=4) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret299__1) ; -} /* end of [loop_121__121__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6071(line=231, offs=56) -- 6116(line=231, offs=101) -*/ -/* -local: adjust_contents_118$0(level=1) -global: adjust_contents_118$0(level=1), __patsfun_124$0(level=1) -local: -global: -*/ -ATSstatic() -postiats_tyrec_0 -__patsfun_124(postiats_tyrec_0 arg0, atsrefarg1_type(atstkind_t0ype(atstype_int)) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret314, postiats_tyrec_0) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6071(line=231, offs=56) -- 6116(line=231, offs=101) -*/ -ATSINSflab(__patsflab___patsfun_124): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6090(line=231, offs=75) -- 6116(line=231, offs=101) -*/ -ATSINSmove(tmpret314, adjust_contents_118(arg0, ATSderef(arg1, atstkind_t0ype(atstype_int)))) ; - -ATSfunbody_end() -ATSreturn(tmpret314) ; -} /* end of [__patsfun_124] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6240(line=237, offs=4) -- 6628(line=251, offs=6) -*/ -/* -local: witness_0$0(level=0), totient_117$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), is_prime_20$0(level=0), rip_95$0(level=0), prime_factors_101$0(level=0), totient_117$0(level=0), totient_sum_125$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -totient_sum_125(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret316, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6240(line=237, offs=4) -- 6628(line=251, offs=6) -*/ -ATSINSflab(__patsflab_totient_sum_125): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6280(line=238, offs=3) -- 6628(line=251, offs=6) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6612(line=250, offs=5) -- 6622(line=250, offs=15) -*/ -ATSINSmove(tmpret316, loop_126(ATSPMVi0nt(1), arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6280(line=238, offs=3) -- 6628(line=251, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret316) ; -} /* end of [totient_sum_125] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6292(line=239, offs=9) -- 6602(line=248, offs=40) -*/ -/* -local: witness_0$0(level=0), totient_117$0(level=0), loop_126$0(level=1) -global: witness_0$0(level=0), totient_117$0(level=0), loop_126$0(level=1) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -loop_126(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret317, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp318, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmpref321, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp322, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref323, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp328, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp329, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp337, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp338, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -/* -emit_funent_fnxdeclst: -*/ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6292(line=239, offs=9) -- 6602(line=248, offs=40) -*/ -ATSINSflab(__patsflab_loop_126): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6395(line=240, offs=10) -- 6404(line=240, offs=19) -*/ -ATSINSmove(tmp318, ATSLIB_056_prelude__lt_g1int_int__22__3(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6392(line=240, offs=7) -- 6602(line=248, offs=40) -*/ -ATSif( -tmp318 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6418(line=241, offs=9) -- 6551(line=246, offs=12) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6436(line=242, offs=15) -- 6437(line=242, offs=16) -*/ -/* -ATSINStmpdec(tmpref321) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6445(line=242, offs=24) -- 6450(line=242, offs=29) -*/ -ATSINSmove(tmp322, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6440(line=242, offs=19) -- 6458(line=242, offs=37) -*/ -ATSINSmove(tmpref321, loop_126(tmp322, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6473(line=243, offs=15) -- 6474(line=243, offs=16) -*/ -/* -ATSINStmpdec(tmpref323) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6504(line=243, offs=46) -- 6513(line=243, offs=55) -*/ -ATSINSmove(tmp329, totient_117(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6496(line=243, offs=38) -- 6515(line=243, offs=57) -*/ -ATSINSmove(tmp328, witness_0(tmp329)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6477(line=243, offs=19) -- 6516(line=243, offs=58) -*/ -ATSINSmove(tmpref323, ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__128__1(tmpref321, tmp328)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6538(line=245, offs=11) -- 6539(line=245, offs=12) -*/ -ATSINSmove(tmpret317, tmpref323) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6418(line=241, offs=9) -- 6551(line=246, offs=12) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6571(line=248, offs=9) -- 6602(line=248, offs=40) -*/ -ATSINSmove(tmp338, totient_117(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6571(line=248, offs=9) -- 6602(line=248, offs=40) -*/ -ATSINSmove(tmp337, witness_0(tmp338)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/number-theory-internal.dats: 6571(line=248, offs=9) -- 6602(line=248, offs=40) -*/ -ATSINSmove(tmpret317, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__130__1(tmp337)) ; - -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret317) ; -/* -emit_funent_fnxbodylst: -*/ -} /* end of [loop_126] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) -*/ -/* -local: -global: lt_g1int_int$22$3(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4697) -tmparg = S2Evar(tk(4697)) -tmpsub = Some(tk(4697) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__22__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret33__3, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp34__3, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) -*/ -ATSINSflab(__patsflab_lt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) -*/ -ATSINSmove(tmp34__3, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) -*/ -ATSINSmove(tmpret33__3, atspre_g1int_lt_int(arg0, tmp34__3)) ; - -ATSfunbody_end() -ATSreturn(tmpret33__3) ; -} /* end of [ATSLIB_056_prelude__lt_g1int_int__22__3] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5151(line=274, offs=3) -- 5217(line=279, offs=2) -*/ -/* -local: -global: add_intinf0_int$128$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = -tmparg = -tmpsub = None() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__128(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret324, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp325) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5133(line=273, offs=1) -- 5217(line=279, offs=2) -*/ -ATSINSflab(__patsflab_add_intinf0_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5160(line=274, offs=12) -- 5217(line=279, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5184(line=277, offs=10) -- 5212(line=277, offs=38) -*/ -ATSINSmove_void(tmp325, atscntrb_gmp_mpz_add2_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5161(line=274, offs=13) -- 5162(line=274, offs=14) -*/ -ATSINSmove(tmpret324, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5160(line=274, offs=12) -- 5217(line=279, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret324) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__128] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5151(line=274, offs=3) -- 5217(line=279, offs=2) -*/ -/* -local: -global: add_intinf0_int$128$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__128__1(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret324__1, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp325__1) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5133(line=273, offs=1) -- 5217(line=279, offs=2) -*/ -ATSINSflab(__patsflab_add_intinf0_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5160(line=274, offs=12) -- 5217(line=279, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5184(line=277, offs=10) -- 5212(line=277, offs=38) -*/ -ATSINSmove_void(tmp325__1, atscntrb_gmp_mpz_add2_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5161(line=274, offs=13) -- 5162(line=274, offs=14) -*/ -ATSINSmove(tmpret324__1, arg0) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5160(line=274, offs=12) -- 5217(line=279, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret324__1) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__128__1] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$130$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = -tmparg = -tmpsub = None() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__130(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret330, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp331, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp332) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp331, PMVtmpltcst(ptr_alloc)()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp332, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp331, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret330, tmp331) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret330) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__130] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) -*/ -/* -local: -global: intinf_make_int$130$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = -tmparg = -tmpsub = Some() -*/ -atstkind_type(atstype_ptrk) -ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__130__1(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret330__1, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmp331__1, atstkind_type(atstype_ptrk)) ; -// ATStmpdec_void(tmp332__1) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) -*/ -ATSINSflab(__patsflab_intinf_make_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) -*/ -ATSINSmove(tmp331__1, ATSLIB_056_prelude__ptr_alloc__2__2()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) -*/ -ATSINSmove_void(tmp332__1, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp331__1, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) -*/ -ATSINSmove(tmpret330__1, tmp331__1) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret330__1) ; -} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__130__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$2$2(level=3) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2Ecst(mpz_vt0ype)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__2__2() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret3__2, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret3__2, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret3__2) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__2__2] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 558(line=30, offs=28) -- 580(line=31, offs=17) -*/ -/* -local: sum_divisors_86$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), sum_divisors_86$0(level=0), sum_divisors_ats$133$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_t0ype(atstype_int) -sum_divisors_ats(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret339, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 541(line=30, offs=11) -- 581(line=31, offs=18) -*/ -ATSINSflab(__patsflab_sum_divisors_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 566(line=31, offs=3) -- 580(line=31, offs=17) -*/ -ATSINSmove(tmpret339, sum_divisors_86(arg0)) ; - -ATSfunbody_end() -ATSreturn(tmpret339) ; -} /* end of [sum_divisors_ats] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 612(line=33, offs=30) -- 636(line=34, offs=19) -*/ -/* -local: count_divisors_81$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), divisors_36$0(level=0), count_divisors_81$0(level=0), count_divisors_ats$134$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_t0ype(atstype_int) -count_divisors_ats(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret340, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 593(line=33, offs=11) -- 637(line=34, offs=20) -*/ -ATSINSflab(__patsflab_count_divisors_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 620(line=34, offs=3) -- 636(line=34, offs=19) -*/ -ATSINSmove(tmpret340, count_divisors_81(arg0)) ; - -ATSfunbody_end() -ATSreturn(tmpret340) ; -} /* end of [count_divisors_ats] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 661(line=36, offs=23) -- 678(line=37, offs=12) -*/ -/* -local: totient_117$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), is_prime_20$0(level=0), rip_95$0(level=0), prime_factors_101$0(level=0), totient_117$0(level=0), totient_ats$135$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_t0ype(atstype_int) -totient_ats(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret341, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 649(line=36, offs=11) -- 679(line=37, offs=13) -*/ -ATSINSflab(__patsflab_totient_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 669(line=37, offs=3) -- 678(line=37, offs=12) -*/ -ATSINSmove(tmpret341, totient_117(arg0)) ; - -ATSfunbody_end() -ATSreturn(tmpret341) ; -} /* end of [totient_ats] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 708(line=39, offs=28) -- 730(line=40, offs=17) -*/ -/* -local: little_omega_112$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), is_prime_20$0(level=0), rip_95$0(level=0), little_omega_112$0(level=0), little_omega_ats$136$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_t0ype(atstype_int) -little_omega_ats(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret342, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 691(line=39, offs=11) -- 731(line=40, offs=18) -*/ -ATSINSflab(__patsflab_little_omega_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 716(line=40, offs=3) -- 730(line=40, offs=17) -*/ -ATSINSmove(tmpret342, little_omega_112(arg0)) ; - -ATSfunbody_end() -ATSreturn(tmpret342) ; -} /* end of [little_omega_ats] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 758(line=42, offs=26) -- 778(line=43, offs=15) -*/ -/* -local: is_perfect_93$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), sum_divisors_86$0(level=0), is_perfect_93$0(level=0), is_perfect_ats$137$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_t0ype(atstype_bool) -is_perfect_ats(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret343, atstkind_t0ype(atstype_bool)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 743(line=42, offs=11) -- 779(line=43, offs=16) -*/ -ATSINSflab(__patsflab_is_perfect_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 766(line=43, offs=3) -- 778(line=43, offs=15) -*/ -ATSINSmove(tmpret343, is_perfect_93(arg0)) ; - -ATSfunbody_end() -ATSreturn(tmpret343) ; -} /* end of [is_perfect_ats] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 802(line=45, offs=22) -- 835(line=46, offs=25) -*/ -/* -local: jacobi_72$0(level=0) -global: witness_0$0(level=0), exp_5$0(level=0), sqrt_int_17$0(level=0), is_prime_20$0(level=0), div_gt_zero_65$0(level=0), exp_mod_prime_66$0(level=0), jacobi_72$0(level=0), jacobi_ats$138$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_t0ype(atstype_int) -jacobi_ats(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret344, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 791(line=45, offs=11) -- 835(line=46, offs=25) -*/ -ATSINSflab(__patsflab_jacobi_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/number-theory.dats: 813(line=46, offs=3) -- 835(line=46, offs=25) -*/ -ATSINSmove(tmpret344, jacobi_72(arg0, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), arg1))) ; - -ATSfunbody_end() -ATSreturn(tmpret344) ; -} /* end of [jacobi_ats] */ - -/* -** for initialization(dynloading) -*/ -ATSdynloadflag_minit(_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_number_055_theory_056_dats__dynloadflag) ; -ATSextern() -atsvoid_t0ype -_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_number_055_theory_056_dats__dynload() -{ -ATSfunbody_beg() -ATSdynload(/*void*/) -ATSdynloadflag_sta( -_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_number_055_theory_056_dats__dynloadflag -) ; -ATSif( -ATSCKiseqz( -_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_number_055_theory_056_dats__dynloadflag -) -) ATSthen() { -ATSdynloadset(_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_number_055_theory_056_dats__dynloadflag) ; -/* -dynexnlst-initize(beg) -*/ -/* -dynexnlst-initize(end) -*/ -/* local */ -/* in of [local] */ -/* end of [local] */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn_void(tmpret_void) ; -} /* end of [*_dynload] */ - -/* ****** ****** */ - -/* end-of-compilation-unit */ diff --git a/cbits/numerics.c b/cbits/numerics.c deleted file mode 100644 --- a/cbits/numerics.c +++ /dev/null @@ -1,1812 +0,0 @@ -/* -** -** The C code is generated by [ATS/Postiats-0-3-8] -** The starting compilation time is: 2018-2-23: 4h: 2m -** -*/ - -/* -** include runtime header files -*/ -#ifndef _ATS_CCOMP_HEADER_NONE_ -#include "pats_ccomp_config.h" -#include "pats_ccomp_basics.h" -#include "pats_ccomp_typedefs.h" -#include "pats_ccomp_instrset.h" -#include "pats_ccomp_memalloc.h" -#ifndef _ATS_CCOMP_EXCEPTION_NONE_ -#include "pats_ccomp_memalloca.h" -#include "pats_ccomp_exception.h" -#endif // end of [_ATS_CCOMP_EXCEPTION_NONE_] -#endif /* _ATS_CCOMP_HEADER_NONE_ */ - - -/* -** include prelude cats files -*/ -#ifndef _ATS_CCOMP_PRELUDE_NONE_ -// -#include "prelude/CATS/basics.cats" -#include "prelude/CATS/integer.cats" -#include "prelude/CATS/pointer.cats" -#include "prelude/CATS/integer_long.cats" -#include "prelude/CATS/integer_size.cats" -#include "prelude/CATS/integer_short.cats" -#include "prelude/CATS/bool.cats" -#include "prelude/CATS/char.cats" -#include "prelude/CATS/float.cats" -#include "prelude/CATS/integer_ptr.cats" -#include "prelude/CATS/integer_fixed.cats" -#include "prelude/CATS/memory.cats" -#include "prelude/CATS/string.cats" -#include "prelude/CATS/strptr.cats" -// -#include "prelude/CATS/fprintf.cats" -// -#include "prelude/CATS/filebas.cats" -// -#include "prelude/CATS/list.cats" -#include "prelude/CATS/option.cats" -#include "prelude/CATS/array.cats" -#include "prelude/CATS/arrayptr.cats" -#include "prelude/CATS/arrayref.cats" -#include "prelude/CATS/matrix.cats" -#include "prelude/CATS/matrixptr.cats" -// -#endif /* _ATS_CCOMP_PRELUDE_NONE_ */ -/* -** for user-supplied prelude -*/ -#ifdef _ATS_CCOMP_PRELUDE_USER_ -// -#include _ATS_CCOMP_PRELUDE_USER_ -// -#endif /* _ATS_CCOMP_PRELUDE_USER_ */ -/* -** for user2-supplied prelude -*/ -#ifdef _ATS_CCOMP_PRELUDE_USER2_ -// -#include _ATS_CCOMP_PRELUDE_USER2_ -// -#endif /* _ATS_CCOMP_PRELUDE_USER2_ */ - -/* -staload-prologues(beg) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/basics.dats: 1636(line=50, offs=1) -- 1675(line=50, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 1596(line=49, offs=1) -- 1635(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 1533(line=44, offs=1) -- 1572(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_long.dats: 1602(line=49, offs=1) -- 1641(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_size.dats: 1597(line=49, offs=1) -- 1636(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_short.dats: 1603(line=49, offs=1) -- 1642(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/char.dats: 1610(line=48, offs=1) -- 1649(line=48, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/float.dats: 1636(line=50, offs=1) -- 1675(line=50, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/string.dats: 1631(line=50, offs=1) -- 1670(line=50, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/strptr.dats: 1629(line=50, offs=1) -- 1668(line=50, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/strptr.dats: 1691(line=54, offs=1) -- 1738(line=54, offs=48) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 1596(line=49, offs=1) -- 1635(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_ptr.dats: 1601(line=49, offs=1) -- 1640(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer_fixed.dats: 1603(line=49, offs=1) -- 1642(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/memory.dats: 1410(line=38, offs=1) -- 1449(line=39, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 1613(line=49, offs=1) -- 1652(line=50, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 1675(line=54, offs=1) -- 1721(line=55, offs=39) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 1596(line=49, offs=1) -- 1635(line=49, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 1744(line=59, offs=1) -- 1789(line=60, offs=38) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/stdio.sats: 1390(line=36, offs=1) -- 1437(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/stdio.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/stdio.sats: 1950(line=69, offs=1) -- 1999(line=71, offs=34) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/types.sats: 1390(line=36, offs=1) -- 1441(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/sys/types.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 1871(line=66, offs=1) -- 1918(line=66, offs=48) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/stat.sats: 1390(line=36, offs=1) -- 1440(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/sys/stat.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/stat.sats: 1756(line=58, offs=1) -- 1805(line=60, offs=34) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/types.sats: 1390(line=36, offs=1) -- 1441(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/sys/types.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/filebas.dats: 15552(line=879, offs=1) -- 15589(line=880, offs=30) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/stdio.sats: 1390(line=36, offs=1) -- 1437(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/stdio.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/stdio.sats: 1950(line=69, offs=1) -- 1999(line=71, offs=34) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/sys/types.sats: 1390(line=36, offs=1) -- 1441(line=39, offs=3) -*/ - -#include \ -"libats/libc/CATS/sys/types.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/list.dats: 1529(line=44, offs=1) -- 1568(line=45, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/list.dats: 1569(line=46, offs=1) -- 1615(line=47, offs=39) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/unsafe.dats: 1532(line=44, offs=1) -- 1566(line=44, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/list_vt.dats: 1538(line=44, offs=1) -- 1577(line=45, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/list_vt.dats: 1578(line=46, offs=1) -- 1624(line=47, offs=39) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/unsafe.dats: 1532(line=44, offs=1) -- 1566(line=44, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/SHARE/list_vt_mergesort.dats: 1546(line=44, offs=1) -- 1585(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/SHARE/list_vt_quicksort.dats: 1546(line=44, offs=1) -- 1585(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/array.dats: 1534(line=44, offs=1) -- 1573(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/array.dats: 1574(line=45, offs=1) -- 1616(line=45, offs=43) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/SHARE/array_bsearch.dats: 1531(line=44, offs=1) -- 1570(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/SHARE/array_quicksort.dats: 1531(line=44, offs=1) -- 1570(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/arrayptr.dats: 1532(line=44, offs=1) -- 1571(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/arrayref.dats: 1532(line=44, offs=1) -- 1571(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/matrix.dats: 1535(line=44, offs=1) -- 1574(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/matrixptr.dats: 1538(line=44, offs=1) -- 1577(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/matrixref.dats: 1538(line=44, offs=1) -- 1577(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream.dats: 1523(line=44, offs=1) -- 1562(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/stream_vt.dats: 1523(line=44, offs=1) -- 1562(line=44, offs=40) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/tostring.dats: 1528(line=44, offs=1) -- 1567(line=45, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/unsafe.dats: 1532(line=44, offs=1) -- 1566(line=44, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/checkast.dats: 1531(line=44, offs=1) -- 1570(line=45, offs=32) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1660(line=37, offs=1) -- 1700(line=38, offs=27) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1727(line=42, offs=1) -- 1759(line=42, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1833(line=49, offs=1) -- 1867(line=49, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1868(line=50, offs=1) -- 1908(line=50, offs=41) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1656(line=37, offs=1) -- 1696(line=39, offs=27) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/mydepies.hats: 192(line=16, offs=1) -- 232(line=16, offs=41) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-libgmp/SATS/gmp.sats: 1178(line=38, offs=1) -- 1233(line=43, offs=3) -*/ - -// -#include \ -"atscntrb-libgmp/CATS/gmp.cats" -// -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1813(line=49, offs=1) -- 1845(line=49, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1846(line=50, offs=1) -- 1881(line=50, offs=36) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1657(line=37, offs=1) -- 1689(line=37, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1690(line=38, offs=1) -- 1724(line=38, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-libgmp/SATS/gmp.sats: 1178(line=38, offs=1) -- 1233(line=43, offs=3) -*/ - -// -#include \ -"atscntrb-libgmp/CATS/gmp.cats" -// -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/libats/libc/SATS/math.sats: 1380(line=35, offs=1) -- 1426(line=38, offs=3) -*/ - -#include \ -"libats/libc/CATS/math.cats" -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1660(line=37, offs=1) -- 1700(line=38, offs=27) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1727(line=42, offs=1) -- 1759(line=42, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1833(line=49, offs=1) -- 1867(line=49, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1868(line=50, offs=1) -- 1908(line=50, offs=41) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1656(line=37, offs=1) -- 1696(line=39, offs=27) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/mydepies.hats: 192(line=16, offs=1) -- 232(line=16, offs=41) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-libgmp/SATS/gmp.sats: 1178(line=38, offs=1) -- 1233(line=43, offs=3) -*/ - -// -#include \ -"atscntrb-libgmp/CATS/gmp.cats" -// -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1813(line=49, offs=1) -- 1845(line=49, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1846(line=50, offs=1) -- 1881(line=50, offs=36) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1657(line=37, offs=1) -- 1689(line=37, offs=33) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1690(line=38, offs=1) -- 1724(line=38, offs=35) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) -*/ -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) -*/ -/* -staload-prologues(end) -*/ -/* -typedefs-for-tyrecs-and-tysums(beg) -*/ -/* -typedefs-for-tyrecs-and-tysums(end) -*/ -/* -dynconlst-declaration(beg) -*/ -/* -dynconlst-declaration(end) -*/ -/* -dyncstlst-declaration(beg) -*/ -ATSdyncst_mac(atspre_ptr_alloc_tsz) -ATSdyncst_mac(atspre_g0int2uint_int_ulint) -ATSdyncst_mac(atspre_g1int_add_int) -ATSdyncst_mac(atscntrb_gmp_mpz_init) -ATSdyncst_mac(atscntrb_gmp_mpz_fib_uint) -ATSdyncst_mac(atspre_g1int2int_int_int) -ATSdyncst_mac(atspre_g1int_gt_int) -ATSdyncst_mac(atspre_g1int_half_int) -ATSdyncst_mac(atspre_g0int_mod_int) -ATSdyncst_mac(atspre_g0int2int_int_int) -ATSdyncst_mac(atspre_g0int_eq_int) -ATSdyncst_mac(atspre_g0int_mul_int) -ATSdyncst_mac(atspre_g0float2int_float_int) -ATSdyncst_mac(atslib_libats_libc_sqrt_float) -ATSdyncst_mac(atspre_g0int2float_int_float) -ATSdyncst_mac(atspre_g1int_lt_int) -ATSdyncst_mac(atspre_g1int_eq_int) -/* -dyncstlst-declaration(end) -*/ -/* -dynvalist-implementation(beg) -*/ -/* -dynvalist-implementation(end) -*/ -/* -exnconlst-declaration(beg) -*/ -#ifndef _ATS_CCOMP_EXCEPTION_NONE_ -ATSextern() -atsvoid_t0ype -the_atsexncon_initize -( - atstype_exnconptr d2c, atstype_string exnmsg -) ; -#endif // end of [_ATS_CCOMP_EXCEPTION_NONE_] -/* -exnconlst-declaration(end) -*/ -/* -extypelst-declaration(beg) -*/ -/* -extypelst-declaration(end) -*/ -/* -assumelst-declaration(beg) -*/ -#ifndef _ATS_CCOMP_ASSUME_CHECK_NONE_ -#endif // #ifndef(_ATS_CCOMP_ASSUME_CHECK_NONE_) -/* -assumelst-declaration(end) -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -witness_0(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_type(atstype_ptrk) -fib_gmp_1(atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__2() ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__2__1() ; - -ATSstatic() -atstkind_t0ype(atstype_int) -exp_5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_int) -sqrt_int_17(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -is_prime_20(atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -loop_21(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__22(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__22__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g1int_int__26(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] -#endif // end of [TEMPLATE] - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g1int_int__26__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -ATSstatic() -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; - -#if(0) -ATSextern() -atstkind_t0ype(atstype_bool) -is_prime_ats(atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -#if(0) -ATSextern() -atstkind_t0ype(atstype_int) -exp_ats(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -#if(0) -ATSextern() -atstkind_type(atstype_ptrk) -fib_ats(atstkind_t0ype(atstype_int)) ; -#endif // end of [QUALIFIED] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 738(line=23, offs=4) -- 789(line=24, offs=14) -*/ -/* -local: -global: witness_0$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -witness_0(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret0, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 738(line=23, offs=4) -- 789(line=24, offs=14) -*/ -ATSINSflab(__patsflab_witness_0): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 778(line=24, offs=3) -- 788(line=24, offs=13) -*/ -ATSINSmove(tmpret0, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), arg0)) ; -ATSfunbody_end() -ATSreturn(tmpret0) ; -} /* end of [witness_0] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 854(line=27, offs=5) -- 1073(line=35, offs=6) -*/ -/* -local: -global: fib_gmp_1$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_type(atstype_ptrk) -fib_gmp_1(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret1, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref2, atstkind_type(atstype_ptrk)) ; -ATStmpdec(tmpref5, atstkind_t0ype(atstype_ulint)) ; -ATStmpdec(tmp6, atstkind_t0ype(atstype_int)) ; -// ATStmpdec_void(tmp7) ; -// ATStmpdec_void(tmp8) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 854(line=27, offs=5) -- 1073(line=35, offs=6) -*/ -ATSINSflab(__patsflab_fib_gmp_1): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 890(line=28, offs=3) -- 1073(line=35, offs=6) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 902(line=29, offs=9) -- 903(line=29, offs=10) -*/ -/* -ATSINStmpdec(tmpref2) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 906(line=29, offs=13) -- 917(line=29, offs=24) -*/ -ATSINSmove(tmpref2, ATSLIB_056_prelude__ptr_alloc__2__1()) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 926(line=30, offs=9) -- 927(line=30, offs=10) -*/ -/* -ATSINStmpdec(tmpref5) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 958(line=30, offs=41) -- 963(line=30, offs=46) -*/ -ATSINSmove(tmp6, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 937(line=30, offs=20) -- 964(line=30, offs=47) -*/ -ATSINSmove(tmpref5, atspre_g0int2uint_int_ulint(tmp6)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 978(line=31, offs=14) -- 999(line=31, offs=35) -*/ -ATSINSmove_void(tmp7, atscntrb_gmp_mpz_init(ATSPMVrefarg1(ATSSELrecsin(tmpref2, atstkind_type(atstype_ptrk), atslab__2)))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1013(line=32, offs=14) -- 1041(line=32, offs=42) -*/ -ATSINSmove_void(tmp8, atscntrb_gmp_mpz_fib_uint(ATSPMVrefarg1(ATSSELrecsin(tmpref2, atstkind_type(atstype_ptrk), atslab__2)), tmpref5)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1051(line=34, offs=5) -- 1066(line=34, offs=20) -*/ -ATSINSmove(tmpret1, ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), tmpref2)) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 890(line=28, offs=3) -- 1073(line=35, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret1) ; -} /* end of [fib_gmp_1] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$2$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = None() -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__2() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret3, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret3, atspre_ptr_alloc_tsz(ATSPMVsizeof(atstyvar_type(a)))) ; - -ATSfunbody_end() -ATSreturn(tmpret3) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__2] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) -*/ -/* -local: -global: ptr_alloc$2$1(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = a(4806) -tmparg = S2Evar(a(4806)) -tmpsub = Some(a(4806) -> S2EVar(5569)) -*/ -atstkind_type(atstype_ptrk) -ATSLIB_056_prelude__ptr_alloc__2__1() -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret3__1, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) -*/ -ATSINSflab(__patsflab_ptr_alloc): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) -*/ -ATSINSmove(tmpret3__1, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; - -ATSfunbody_end() -ATSreturn(tmpret3__1) ; -} /* end of [ATSLIB_056_prelude__ptr_alloc__2__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1151(line=38, offs=5) -- 1590(line=59, offs=10) -*/ -/* -local: exp_5$0(level=0) -global: exp_5$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -exp_5(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret9, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp10, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmpref15, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref16, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp17, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp22, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref23, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp24, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp25, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1151(line=38, offs=5) -- 1590(line=59, offs=10) -*/ -ATSINSflab(__patsflab_exp_5): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1201(line=39, offs=3) -- 1590(line=59, offs=10) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1218(line=40, offs=7) -- 1219(line=40, offs=8) -*/ -ATSINSlab(__atstmplab0): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1170(line=38, offs=24) -- 1171(line=38, offs=25) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab2) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1219(line=40, offs=8) -- 1219(line=40, offs=8) -*/ -ATSINSlab(__atstmplab1): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1223(line=40, offs=12) -- 1224(line=40, offs=13) -*/ -ATSINSmove(tmpret9, ATSPMVi0nt(0)) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1232(line=41, offs=8) -- 1232(line=41, offs=8) -*/ -ATSINSlab(__atstmplab2): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1261(line=43, offs=12) -- 1266(line=43, offs=17) -*/ -ATSINSmove(tmp10, ATSLIB_056_prelude__gt_g1int_int__6__1(arg1, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1258(line=43, offs=9) -- 1580(line=58, offs=12) -*/ -ATSif( -tmp10 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1282(line=44, offs=11) -- 1555(line=56, offs=14) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1302(line=45, offs=17) -- 1304(line=45, offs=19) -*/ -/* -ATSINStmpdec(tmpref15) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1307(line=45, offs=22) -- 1313(line=45, offs=28) -*/ -ATSINSmove(tmpref15, atspre_g1int_half_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1331(line=46, offs=17) -- 1333(line=46, offs=19) -*/ -/* -ATSINStmpdec(tmpref16) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1336(line=46, offs=22) -- 1341(line=46, offs=27) -*/ -ATSINSmove(tmpref16, atspre_g0int_mod_int(arg1, ATSPMVi0nt(2))) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1370(line=48, offs=16) -- 1376(line=48, offs=22) -*/ -ATSINSmove(tmp17, ATSLIB_056_prelude__eq_g0int_int__12__1(tmpref16, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1367(line=48, offs=13) -- 1541(line=55, offs=18) -*/ -ATSif( -tmp17 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1400(line=49, offs=19) -- 1405(line=49, offs=24) -*/ -ATSINSmove(tmp22, atspre_g0int_mul_int(arg0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1396(line=49, offs=15) -- 1410(line=49, offs=29) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, tmp22) ; -ATSINSmove_tlcal(apy1, tmpref15) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSfgoto(__patsflab_exp_5) ; -ATStailcal_end() - -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1442(line=51, offs=15) -- 1541(line=55, offs=18) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1466(line=52, offs=21) -- 1467(line=52, offs=22) -*/ -/* -ATSINStmpdec(tmpref23) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1478(line=52, offs=33) -- 1483(line=52, offs=38) -*/ -ATSINSmove(tmp25, atspre_g0int_mul_int(arg0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1474(line=52, offs=29) -- 1488(line=52, offs=43) -*/ -ATSINSmove(tmp24, exp_5(tmp25, tmpref15)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1470(line=52, offs=25) -- 1488(line=52, offs=43) -*/ -ATSINSmove(tmpref23, atspre_g0int_mul_int(arg0, tmp24)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1522(line=54, offs=17) -- 1523(line=54, offs=18) -*/ -ATSINSmove(tmpret9, tmpref23) ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1442(line=51, offs=15) -- 1541(line=55, offs=18) -*/ -/* -INSletpop() -*/ -} /* ATSendif */ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1282(line=44, offs=11) -- 1555(line=56, offs=14) -*/ -/* -INSletpop() -*/ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1579(line=58, offs=11) -- 1580(line=58, offs=12) -*/ -ATSINSmove(tmpret9, ATSPMVi0nt(1)) ; -} /* ATSendif */ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret9) ; -} /* end of [exp_5] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) -*/ -/* -local: -global: gt_g1int_int$6$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = tk(4703) -tmparg = S2Evar(tk(4703)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret11, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp12, atstkind_t0ype(atstyvar_type(tk))) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) -*/ -ATSINSflab(__patsflab_gt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) -*/ -ATSINSmove(tmp12, PMVtmpltcst(g1int2int)(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) -*/ -ATSINSmove(tmpret11, PMVtmpltcst(g1int_gt)(arg0, tmp12)) ; - -ATSfunbody_end() -ATSreturn(tmpret11) ; -} /* end of [ATSLIB_056_prelude__gt_g1int_int__6] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) -*/ -/* -local: -global: gt_g1int_int$6$1(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4703) -tmparg = S2Evar(tk(4703)) -tmpsub = Some(tk(4703) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__gt_g1int_int__6__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret11__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp12__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) -*/ -ATSINSflab(__patsflab_gt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) -*/ -ATSINSmove(tmp12__1, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) -*/ -ATSINSmove(tmpret11__1, atspre_g1int_gt_int(arg0, tmp12__1)) ; - -ATSfunbody_end() -ATSreturn(tmpret11__1) ; -} /* end of [ATSLIB_056_prelude__gt_g1int_int__6__1] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19, atstkind_t0ype(atstyvar_type(tk))) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19, PMVtmpltcst(g0int2int)(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18, PMVtmpltcst(g0int_eq)(arg0, tmp19)) ; - -ATSfunbody_end() -ATSreturn(tmpret18) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$1(level=1) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__1, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__1, atspre_g0int_eq_int(arg0, tmp19__1)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__1) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1595(line=61, offs=4) -- 1735(line=66, offs=6) -*/ -/* -local: witness_0$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_int) -sqrt_int_17(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret26, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpref27, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp28, atstkind_t0ype(atstype_float)) ; -ATStmpdec(tmp29, atstkind_t0ype(atstype_float)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1595(line=61, offs=4) -- 1735(line=66, offs=6) -*/ -ATSINSflab(__patsflab_sqrt_int_17): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1641(line=62, offs=3) -- 1735(line=66, offs=6) -*/ -/* -letpush(beg) -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1653(line=63, offs=9) -- 1658(line=63, offs=14) -*/ -/* -ATSINStmpdec(tmpref27) ; -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1689(line=63, offs=45) -- 1702(line=63, offs=58) -*/ -ATSINSmove(tmp29, atspre_g0int2float_int_float(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1678(line=63, offs=34) -- 1704(line=63, offs=60) -*/ -ATSINSmove(tmp28, atslib_libats_libc_sqrt_float(tmp29)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1666(line=63, offs=22) -- 1705(line=63, offs=61) -*/ -ATSINSmove(tmpref27, atspre_g0float2int_float_int(tmp28)) ; - -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1715(line=65, offs=5) -- 1728(line=65, offs=18) -*/ -ATSINSmove(tmpret26, witness_0(tmpref27)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1641(line=62, offs=3) -- 1735(line=66, offs=6) -*/ -/* -INSletpop() -*/ -ATSfunbody_end() -ATSreturn(tmpret26) ; -} /* end of [sqrt_int_17] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1771(line=69, offs=4) -- 2352(line=92, offs=10) -*/ -/* -local: sqrt_int_17$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), is_prime_20$0(level=0) -local: -global: -*/ -ATSstatic() -atstkind_t0ype(atstype_bool) -is_prime_20(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret30, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp51, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1771(line=69, offs=4) -- 2352(line=92, offs=10) -*/ -ATSINSflab(__patsflab_is_prime_20): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1807(line=70, offs=3) -- 2352(line=92, offs=10) -*/ -ATScaseof_beg() -/* -** ibranchlst-beg -*/ -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1824(line=71, offs=7) -- 1825(line=71, offs=8) -*/ -ATSINSlab(__atstmplab3): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1780(line=69, offs=13) -- 1781(line=69, offs=14) -*/ -ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab5) ; } ; -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1825(line=71, offs=8) -- 1825(line=71, offs=8) -*/ -ATSINSlab(__atstmplab4): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1829(line=71, offs=12) -- 1834(line=71, offs=17) -*/ -ATSINSmove(tmpret30, ATSPMVbool_false()) ; -ATSbranch_end() - -ATSbranch_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1842(line=72, offs=8) -- 1842(line=72, offs=8) -*/ -ATSINSlab(__atstmplab5): -/* -emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) -*/ -/* -ibranch-mbody: -*/ -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1867(line=74, offs=9) -- 2342(line=91, offs=12) -*/ -/* -letpush(beg) -*/ -/* -letpush(end) -*/ - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2318(line=90, offs=19) -- 2328(line=90, offs=29) -*/ -ATSINSmove(tmp51, sqrt_int_17(arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2310(line=90, offs=11) -- 2330(line=90, offs=31) -*/ -ATSINSmove(tmpret30, loop_21(arg0, ATSPMVi0nt(2), tmp51)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1867(line=74, offs=9) -- 2342(line=91, offs=12) -*/ -/* -INSletpop() -*/ -ATSbranch_end() - -/* -** ibranchlst-end -*/ -ATScaseof_end() - -ATSfunbody_end() -ATSreturn(tmpret30) ; -} /* end of [is_prime_20] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1885(line=75, offs=15) -- 2288(line=88, offs=21) -*/ -/* -local: loop_21$0(level=1) -global: loop_21$0(level=1) -local: k$5106(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -global: k$5106(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) -*/ -ATSstatic() -atstkind_t0ype(atstype_bool) -loop_21(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; -ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmpret31, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp32, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp37, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp40, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp41, atstkind_t0ype(atstype_int)) ; -ATStmpdec(tmp42, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp47, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp50, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -/* -emit_funent_fnxdeclst: -*/ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1885(line=75, offs=15) -- 2288(line=88, offs=21) -*/ -ATSINSflab(__patsflab_loop_21): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1975(line=76, offs=16) -- 1984(line=76, offs=25) -*/ -ATSINSmove(tmp32, ATSLIB_056_prelude__lt_g1int_int__22__1(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 1972(line=76, offs=13) -- 2288(line=88, offs=21) -*/ -ATSif( -tmp32 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2007(line=77, offs=18) -- 2012(line=77, offs=23) -*/ -ATSINSmove(tmp40, atspre_g0int_mod_int(env0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2007(line=77, offs=18) -- 2016(line=77, offs=27) -*/ -ATSINSmove(tmp37, ATSLIB_056_prelude__eq_g0int_int__12__2(tmp40, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2004(line=77, offs=15) -- 2097(line=80, offs=35) -*/ -ATSif( -tmp37 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2038(line=78, offs=17) -- 2043(line=78, offs=22) -*/ -ATSINSmove(tmpret31, ATSPMVbool_false()) ; -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2084(line=80, offs=22) -- 2089(line=80, offs=27) -*/ -ATSINSmove(tmp41, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2079(line=80, offs=17) -- 2097(line=80, offs=35) -*/ -ATStailcal_beg() -ATSINSmove_tlcal(apy0, tmp41) ; -ATSINSmove_tlcal(apy1, arg1) ; -ATSINSargmove_tlcal(arg0, apy0) ; -ATSINSargmove_tlcal(arg1, apy1) ; -ATSINSfgoto(__patsflab_loop_21) ; -ATStailcal_end() - -} /* ATSendif */ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2132(line=82, offs=18) -- 2141(line=82, offs=27) -*/ -ATSINSmove(tmp42, ATSLIB_056_prelude__eq_g1int_int__26__1(arg0, arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2129(line=82, offs=15) -- 2288(line=88, offs=21) -*/ -ATSif( -tmp42 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2166(line=83, offs=20) -- 2171(line=83, offs=25) -*/ -ATSINSmove(tmp50, atspre_g0int_mod_int(env0, arg0)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2166(line=83, offs=20) -- 2175(line=83, offs=29) -*/ -ATSINSmove(tmp47, ATSLIB_056_prelude__eq_g0int_int__12__3(tmp50, ATSPMVi0nt(0))) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2163(line=83, offs=17) -- 2248(line=86, offs=23) -*/ -ATSif( -tmp47 -) ATSthen() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2199(line=84, offs=19) -- 2204(line=84, offs=24) -*/ -ATSINSmove(tmpret31, ATSPMVbool_false()) ; -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2244(line=86, offs=19) -- 2248(line=86, offs=23) -*/ -ATSINSmove(tmpret31, ATSPMVbool_true()) ; -} /* ATSendif */ -} ATSelse() { -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/ats-src/numerics-internal.dats: 2284(line=88, offs=17) -- 2288(line=88, offs=21) -*/ -ATSINSmove(tmpret31, ATSPMVbool_true()) ; -} /* ATSendif */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn(tmpret31) ; -/* -emit_funent_fnxbodylst: -*/ -} /* end of [loop_21] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) -*/ -/* -local: -global: lt_g1int_int$22$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = tk(4697) -tmparg = S2Evar(tk(4697)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__22(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret33, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp34, atstkind_t0ype(atstyvar_type(tk))) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) -*/ -ATSINSflab(__patsflab_lt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) -*/ -ATSINSmove(tmp34, PMVtmpltcst(g1int2int)(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) -*/ -ATSINSmove(tmpret33, PMVtmpltcst(g1int_lt)(arg0, tmp34)) ; - -ATSfunbody_end() -ATSreturn(tmpret33) ; -} /* end of [ATSLIB_056_prelude__lt_g1int_int__22] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) -*/ -/* -local: -global: lt_g1int_int$22$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4697) -tmparg = S2Evar(tk(4697)) -tmpsub = Some(tk(4697) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__lt_g1int_int__22__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret33__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp34__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) -*/ -ATSINSflab(__patsflab_lt_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) -*/ -ATSINSmove(tmp34__1, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) -*/ -ATSINSmove(tmpret33__1, atspre_g1int_lt_int(arg0, tmp34__1)) ; - -ATSfunbody_end() -ATSreturn(tmpret33__1) ; -} /* end of [ATSLIB_056_prelude__lt_g1int_int__22__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$2(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__2, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__2, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__2, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__2, atspre_g0int_eq_int(arg0, tmp19__2)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__2) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__2] */ - -#if(0) -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) -*/ -/* -local: -global: eq_g1int_int$26$0(level=0) -local: -global: -*/ -ATSextern() -/* -imparg = tk(4709) -tmparg = S2Evar(tk(4709)) -tmpsub = None() -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g1int_int__26(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret43, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp44, atstkind_t0ype(atstyvar_type(tk))) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12823(line=667, offs=1) -- 12877(line=668, offs=42) -*/ -ATSINSflab(__patsflab_eq_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) -*/ -ATSINSmove(tmp44, PMVtmpltcst(g1int2int)(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) -*/ -ATSINSmove(tmpret43, PMVtmpltcst(g1int_eq)(arg0, tmp44)) ; - -ATSfunbody_end() -ATSreturn(tmpret43) ; -} /* end of [ATSLIB_056_prelude__eq_g1int_int__26] */ -#endif // end of [TEMPLATE] - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) -*/ -/* -local: -global: eq_g1int_int$26$1(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4709) -tmparg = S2Evar(tk(4709)) -tmpsub = Some(tk(4709) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g1int_int__26__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret43__1, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp44__1, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12823(line=667, offs=1) -- 12877(line=668, offs=42) -*/ -ATSINSflab(__patsflab_eq_g1int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) -*/ -ATSINSmove(tmp44__1, atspre_g1int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) -*/ -ATSINSmove(tmpret43__1, atspre_g1int_eq_int(arg0, tmp44__1)) ; - -ATSfunbody_end() -ATSreturn(tmpret43__1) ; -} /* end of [ATSLIB_056_prelude__eq_g1int_int__26__1] */ - -/* -/home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) -*/ -/* -local: -global: eq_g0int_int$12$3(level=2) -local: -global: -*/ -ATSstatic() -/* -imparg = tk(4694) -tmparg = S2Evar(tk(4694)) -tmpsub = Some(tk(4694) -> S2Eextkind(atstype_int)) -*/ -atstkind_t0ype(atstype_bool) -ATSLIB_056_prelude__eq_g0int_int__12__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret18__3, atstkind_t0ype(atstype_bool)) ; -ATStmpdec(tmp19__3, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) -*/ -ATSINSflab(__patsflab_eq_g0int_int): -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) -*/ -ATSINSmove(tmp19__3, atspre_g0int2int_int_int(arg1)) ; - -/* -emit_instr: loc0 = /home/vanessa/.atspkg/0.3.8/lib/ats2-postiats-0.3.9/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) -*/ -ATSINSmove(tmpret18__3, atspre_g0int_eq_int(arg0, tmp19__3)) ; - -ATSfunbody_end() -ATSreturn(tmpret18__3) ; -} /* end of [ATSLIB_056_prelude__eq_g0int_int__12__3] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/numerics.dats: 440(line=21, offs=24) -- 458(line=22, offs=13) -*/ -/* -local: is_prime_20$0(level=0) -global: witness_0$0(level=0), sqrt_int_17$0(level=0), is_prime_20$0(level=0), is_prime_ats$30$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_t0ype(atstype_bool) -is_prime_ats(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret52, atstkind_t0ype(atstype_bool)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/numerics.dats: 427(line=21, offs=11) -- 459(line=22, offs=14) -*/ -ATSINSflab(__patsflab_is_prime_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/numerics.dats: 448(line=22, offs=3) -- 458(line=22, offs=13) -*/ -ATSINSmove(tmpret52, is_prime_20(arg0)) ; - -ATSfunbody_end() -ATSreturn(tmpret52) ; -} /* end of [is_prime_ats] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/numerics.dats: 479(line=24, offs=19) -- 499(line=25, offs=12) -*/ -/* -local: exp_5$0(level=0) -global: exp_5$0(level=0), exp_ats$31$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_t0ype(atstype_int) -exp_ats(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret53, atstkind_t0ype(atstype_int)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/numerics.dats: 471(line=24, offs=11) -- 499(line=25, offs=12) -*/ -ATSINSflab(__patsflab_exp_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/numerics.dats: 490(line=25, offs=3) -- 499(line=25, offs=12) -*/ -ATSINSmove(tmpret53, exp_5(arg0, arg1)) ; - -ATSfunbody_end() -ATSreturn(tmpret53) ; -} /* end of [exp_ats] */ - -/* -/home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/numerics.dats: 519(line=27, offs=19) -- 536(line=28, offs=12) -*/ -/* -local: fib_gmp_1$0(level=0) -global: fib_gmp_1$0(level=0), fib_ats$32$0(level=0) -local: -global: -*/ -ATSextern() -atstkind_type(atstype_ptrk) -fib_ats(atstkind_t0ype(atstype_int) arg0) -{ -/* tmpvardeclst(beg) */ -ATStmpdec(tmpret54, atstkind_type(atstype_ptrk)) ; -/* tmpvardeclst(end) */ -ATSfunbody_beg() -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/numerics.dats: 511(line=27, offs=11) -- 537(line=28, offs=13) -*/ -ATSINSflab(__patsflab_fib_ats): -/* -emit_instr: loc0 = /home/vanessa/programming/haskell/junkyard/fast-arithmetic-0.3.2.5/ats-src/numerics.dats: 527(line=28, offs=3) -- 536(line=28, offs=12) -*/ -ATSINSmove(tmpret54, fib_gmp_1(arg0)) ; - -ATSfunbody_end() -ATSreturn(tmpret54) ; -} /* end of [fib_ats] */ - -/* -** for initialization(dynloading) -*/ -ATSdynloadflag_minit(_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_numerics_056_dats__dynloadflag) ; -ATSextern() -atsvoid_t0ype -_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_numerics_056_dats__dynload() -{ -ATSfunbody_beg() -ATSdynload(/*void*/) -ATSdynloadflag_sta( -_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_numerics_056_dats__dynloadflag -) ; -ATSif( -ATSCKiseqz( -_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_numerics_056_dats__dynloadflag -) -) ATSthen() { -ATSdynloadset(_057_home_057_vanessa_057_programming_057_haskell_057_junkyard_057_fast_055_arithmetic_055_0_056_3_056_2_056_5_057_ats_055_src_057_numerics_056_dats__dynloadflag) ; -/* -dynexnlst-initize(beg) -*/ -/* -dynexnlst-initize(end) -*/ -/* local */ -/* in of [local] */ -/* end of [local] */ -} /* ATSendif */ -ATSfunbody_end() -ATSreturn_void(tmpret_void) ; -} /* end of [*_dynload] */ - -/* ****** ****** */ - -/* end-of-compilation-unit */ diff --git a/dist-newstyle/lib/empty b/dist-newstyle/lib/empty new file mode 100644 --- /dev/null +++ b/dist-newstyle/lib/empty diff --git a/fast-arithmetic.cabal b/fast-arithmetic.cabal --- a/fast-arithmetic.cabal +++ b/fast-arithmetic.cabal @@ -1,8 +1,7 @@ name: fast-arithmetic -version: 0.3.2.6 +version: 0.3.3.0 synopsis: Fast functions on integers. -description: Fast functions for number theory and combinatorics with a high level of safety guaranteed by [ATS](http://www.ats-lang.org/). This package also provides a - 'Storable' instance for GMP's @mpz@ type. +description: Fast functions for number theory and combinatorics with a high level of safety guaranteed by [ATS](http://www.ats-lang.org/). homepage: https://github.com/vmchale/fast-arithmetic#readme license: BSD3 license-file: LICENSE @@ -11,10 +10,9 @@ copyright: Copyright: (c) 2018 Vanessa McHale category: Numerics, Math, Algorithms, Number Theory, Combinatorics, FFI, ATS build-type: Custom -extra-source-files: ats-deps/prelude/ATS2-Postiats-include-0.3.8/ccomp/runtime/pats_ccomp_config.h - , ats-src/*.dats - , ats-deps/contrib/atscntrb-libgmp/CATS/gmp.cats +extra-source-files: ats-src/*.dats , atspkg.dhall + , dist-newstyle/lib/empty extra-doc-files: README.md cabal-version: 1.18 @@ -26,18 +24,13 @@ custom-setup setup-depends: base - , ats-setup >= 0.4.0.2 + , ats-pkg >= 2.6.1.0 , Cabal library - c-sources: cbits/numerics.c - , cbits/number-theory.c - , cbits/combinatorics.c - include-dirs: ats-deps/ - , ats-deps/contrib - , ats-deps/prelude/ATS2-Postiats-include-0.3.8/ccomp/runtime - , ats-deps/prelude/ATS2-Postiats-include-0.3.8 hs-source-dirs: src + extra-libraries: numbertheory + extra-lib-dirs: dist-newstyle/lib exposed-modules: Numeric.Pure , Numeric.Integer , Numeric.NumberTheory