From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 27533 invoked by alias); 30 Jan 2003 02:16:01 -0000 Mailing-List: contact gcc-prs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-prs-owner@gcc.gnu.org Received: (qmail 27497 invoked by uid 71); 30 Jan 2003 02:16:00 -0000 Resent-Date: 30 Jan 2003 02:16:00 -0000 Resent-Message-ID: <20030130021600.27496.qmail@sources.redhat.com> Resent-From: gcc-gnats@gcc.gnu.org (GNATS Filer) Resent-Cc: gcc-prs@gcc.gnu.org, gcc-bugs@gcc.gnu.org, gd-hackers@gwydiondylan.org Resent-Reply-To: gcc-gnats@gcc.gnu.org, bfulgham@debian.org Received: (qmail 9441 invoked by uid 48); 30 Jan 2003 02:13:18 -0000 Message-Id: <20030130021318.9433.qmail@sources.redhat.com> Date: Thu, 30 Jan 2003 02:16:00 -0000 From: bfulgham@debian.org Reply-To: bfulgham@debian.org To: gcc-gnats@gcc.gnu.org Cc: gd-hackers@gwydiondylan.org X-Send-Pr-Version: gnatsweb-2.9.3 (1.1.1.1.2.31) X-GNATS-Notify: gd-hackers@gwydiondylan.org Subject: middle-end/9504: Compiling a particular C file causes an internal compiler error X-SW-Source: 2003-01/txt/msg01718.txt.bz2 List-Id: >Number: 9504 >Category: middle-end >Synopsis: Compiling a particular C file causes an internal compiler error >Confidential: no >Severity: serious >Priority: medium >Responsible: unassigned >State: open >Class: sw-bug >Submitter-Id: net >Arrival-Date: Thu Jan 30 02:16:00 UTC 2003 >Closed-Date: >Last-Modified: >Originator: Brent Fulgham >Release: 3.2 20020927 (prerelease) (i686-pc-cygwin) >Organization: >Environment: Reading specs from /bin/../lib/gcc-lib/i686-pc-cygwin/3.2/specs Configured with: /netrel/src/gcc-3.2-3/configure --enable-languages=c,c++,f77,ja va --enable-libgcj --enable-threads=posix --with-system-zlib --enable-nls --with out-included-gettext --enable-interpreter --disable-sjlj-exceptions --disable-ve rsion-specific-runtime-libs --enable-shared --build=i686-pc-linux --host=i686-pc -cygwin --target=i686-pc-cygwin --enable-haifa --prefix=/usr --exec-prefix=/usr --sysconfdir=/etc --libdir=/usr/lib --includedir=/nonexistent/include --libexecd ir=/usr/sbin Thread model: posix gcc version 3.2 20020927 (prerelease) >Description: Compiling a generated C file from the Gwydion Dylan compiler (during bootstrap of the Dylan compiler) causes an Internal Compiler error. These files build cleanly under GCC 2.95: Reading specs from /bin/../lib/gcc-lib/i686-pc-cygwin/3.2/specs Configured with: /netrel/src/gcc-3.2-3/configure --enable-languages=c,c++,f77,java --enable-libgcj --enable-threads=posix --with-system-zlib --enable-nls --without-included-gettext --enable-interpreter --disable-sjlj-exceptions --disable-version-specific-runtime-libs --enable-shared --build=i686-pc-linux --host=i686-pc-cygwin --target=i686-pc-cygwin --enable-haifa --prefix=/usr --exec-prefix=/usr --sysconfdir=/etc --libdir=/usr/lib --includedir=/nonexistent/include --libexecdir=/usr/sbin Thread model: posix gcc version 3.2 20020927 (prerelease) /bin/../lib/gcc-lib/i686-pc-cygwin/3.2/cpp0.exe -lang-c -v -I. -I/cygdrive/c/fulgham/projects/dylan/src/d2c/runtime -iprefix /bin/../lib/gcc-lib/i686-pc-cygwin/3.2/ -D__GNUC__=3 -D__GNUC_MINOR__=2 -D__GNUC_PATCHLEVEL__=0 -D__GXX_ABI_VERSION=102 -D_X86_=1 -D_X86_=1 -Asystem=winnt -D__OPTIMIZE__ -D__STDC_HOSTED__=1 -Acpu=i386 -Amachine=i386 -Di386 -D__i386 -D__i386__ -D__tune_i686__ -D__tune_pentiumpro__ -D__tune_pentium2__ -D__tune_pentium3__ -D__stdcall=__attribute__((__stdcall__)) -D__fastcall=__attribute__((__fastcall__)) -D__cdecl=__attribute__((__cdecl__)) -D_stdcall=__attribute__((__stdcall__)) -D_fastcall=__attribute__((__fastcall__)) -D_cdecl=__attribute__((__cdecl__)) -D__declspec(x)=__attribute__((x)) -D__i386__ -D__i386 -D__CYGWIN32__ -D__CYGWIN__ -Dunix -D__unix__ -D__unix -isystem /usr/lib/gcc-lib/i686-pc-cygwin/3.2/../../../../include/w32api -isystem /usr/lib/gcc-lib/i686-pc-cygwin/3.2/../../../../i686-pc-cygwin/lib/../../include/w32api -DGD_PLATFORM_CYGNUS transcendental.c transcendental.i GNU CPP version 3.2 20020927 (prerelease) (cpplib) (80386, BSD syntax) ignoring nonexistent directory "/i686-pc-cygwin/include" ignoring nonexistent directory "/usr/local/include" ignoring nonexistent directory "/usr/i686-pc-cygwin/include" ignoring duplicate directory "/usr/i686-pc-cygwin/lib/../../include/w32api" ignoring duplicate directory "/usr/lib/gcc-lib/i686-pc-cygwin/3.2/include" #include "..." search starts here: #include <...> search starts here: . /cygdrive/c/fulgham/projects/dylan/src/d2c/runtime /usr/include/w32api /lib/gcc-lib/i686-pc-cygwin/3.2/include /usr/include End of search list. /bin/../lib/gcc-lib/i686-pc-cygwin/3.2/cc1.exe -fpreprocessed transcendental.i -quiet -dumpbase transcendental.c -O2 -version -fomit-frame-pointer -o transcendental.s GNU CPP version 3.2 20020927 (prerelease) (cpplib) (80386, BSD syntax) GNU C version 3.2 20020927 (prerelease) (i686-pc-cygwin) compiled by GNU C version 3.2 20020927 (prerelease). transcendental.c: In function `transcendentalZtranscendentalZasin_METH_3': transcendental.c:3602: Internal compiler error in subst_stack_regs_pat, at reg-stack.c:1441 Please submit a full bug report, with preprocessed source if appropriate. See for instructions. >How-To-Repeat: Repeatable by building compiler. >Fix: >Release-Note: >Audit-Trail: >Unformatted: ----gnatsweb-attachment---- Content-Type: text/plain; name="transcendental.i" Content-Disposition: inline; filename="transcendental.i" # 1 "transcendental.c" # 1 "" # 1 "" # 1 "transcendental.c" # 1 "/usr/include/stdlib.h" 1 3 # 10 "/usr/include/stdlib.h" 3 # 1 "/usr/include/_ansi.h" 1 3 # 15 "/usr/include/_ansi.h" 3 # 1 "/usr/include/newlib.h" 1 3 # 16 "/usr/include/_ansi.h" 2 3 # 1 "/usr/include/sys/config.h" 1 3 # 1 "/usr/include/machine/ieeefp.h" 1 3 # 5 "/usr/include/sys/config.h" 2 3 # 17 "/usr/include/_ansi.h" 2 3 # 11 "/usr/include/stdlib.h" 2 3 # 1 "/lib/gcc-lib/i686-pc-cygwin/3.2/include/stddef.h" 1 3 # 203 "/lib/gcc-lib/i686-pc-cygwin/3.2/include/stddef.h" 3 typedef unsigned int size_t; # 296 "/lib/gcc-lib/i686-pc-cygwin/3.2/include/stddef.h" 3 typedef short unsigned int wchar_t; # 15 "/usr/include/stdlib.h" 2 3 # 1 "/usr/include/sys/reent.h" 1 3 # 14 "/usr/include/sys/reent.h" 3 # 1 "/usr/include/sys/_types.h" 1 3 # 12 "/usr/include/sys/_types.h" 3 typedef long _off_t; __extension__ typedef long long _off64_t; typedef int _ssize_t; # 1 "/lib/gcc-lib/i686-pc-cygwin/3.2/include/stddef.h" 1 3 # 323 "/lib/gcc-lib/i686-pc-cygwin/3.2/include/stddef.h" 3 typedef unsigned int wint_t; # 23 "/usr/include/sys/_types.h" 2 3 typedef struct { int __count; union { wint_t __wch; unsigned char __wchb[4]; } __value; } _mbstate_t; typedef int _flock_t; # 15 "/usr/include/sys/reent.h" 2 3 typedef unsigned long __ULong; # 40 "/usr/include/sys/reent.h" 3 struct _Bigint { struct _Bigint *_next; int _k, _maxwds, _sign, _wds; __ULong _x[1]; }; struct __tm { int __tm_sec; int __tm_min; int __tm_hour; int __tm_mday; int __tm_mon; int __tm_year; int __tm_wday; int __tm_yday; int __tm_isdst; }; # 68 "/usr/include/sys/reent.h" 3 struct _atexit { struct _atexit *_next; int _ind; void (*_fns[32])(void); void *_fnargs[32]; __ULong _fntypes; }; # 91 "/usr/include/sys/reent.h" 3 struct __sbuf { unsigned char *_base; int _size; }; typedef long _fpos_t; # 156 "/usr/include/sys/reent.h" 3 struct __sFILE { unsigned char *_p; int _r; int _w; short _flags; short _file; struct __sbuf _bf; int _lbfsize; void * _cookie; _ssize_t __attribute__((__cdecl__)) (*_read) (void * _cookie, char *_buf, int _n); _ssize_t __attribute__((__cdecl__)) (*_write) (void * _cookie, const char *_buf, int _n); _fpos_t __attribute__((__cdecl__)) (*_seek) (void * _cookie, _fpos_t _offset, int _whence); int __attribute__((__cdecl__)) (*_close) (void * _cookie); struct __sbuf _ub; unsigned char *_up; int _ur; unsigned char _ubuf[3]; unsigned char _nbuf[1]; struct __sbuf _lb; int _blksize; int _offset; struct _reent *_data; _flock_t _lock; }; # 249 "/usr/include/sys/reent.h" 3 typedef struct __sFILE __FILE; struct _glue { struct _glue *_next; int _niobs; __FILE *_iobs; }; # 280 "/usr/include/sys/reent.h" 3 struct _rand48 { unsigned short _seed[3]; unsigned short _mult[3]; unsigned short _add; }; # 532 "/usr/include/sys/reent.h" 3 struct _reent { int _errno; __FILE *_stdin, *_stdout, *_stderr; int _inc; char _emergency[25]; int _current_category; const char *_current_locale; int __sdidinit; void __attribute__((__cdecl__)) (*__cleanup) (struct _reent *); struct _Bigint *_result; int _result_k; struct _Bigint *_p5s; struct _Bigint **_freelist; int _cvtlen; char *_cvtbuf; union { struct { unsigned int _unused_rand; char * _strtok_last; char _asctime_buf[26]; struct __tm _localtime_buf; int _gamma_signgam; __extension__ unsigned long long _rand_next; struct _rand48 _r48; _mbstate_t _mblen_state; _mbstate_t _mbtowc_state; _mbstate_t _wctomb_state; char _l64a_buf[8]; char _signal_buf[24]; int _getdate_err; _mbstate_t _mbrlen_state; _mbstate_t _mbrtowc_state; _mbstate_t _mbsrtowcs_state; _mbstate_t _wcrtomb_state; _mbstate_t _wcsrtombs_state; } _reent; struct { unsigned char * _nextf[30]; unsigned int _nmalloc[30]; } _unused; } _new; struct _atexit *_atexit; struct _atexit _atexit0; void (**(_sig_func))(int); struct _glue __sglue; __FILE __sf[3]; }; # 728 "/usr/include/sys/reent.h" 3 extern struct _reent *_impure_ptr ; void _reclaim_reent (struct _reent *); # 17 "/usr/include/stdlib.h" 2 3 # 1 "/usr/include/machine/stdlib.h" 1 3 # 18 "/usr/include/stdlib.h" 2 3 # 1 "/usr/include/alloca.h" 1 3 # 20 "/usr/include/stdlib.h" 2 3 typedef struct { int quot; int rem; } div_t; typedef struct { long quot; long rem; } ldiv_t; # 45 "/usr/include/stdlib.h" 3 extern __attribute__((dllimport)) int __mb_cur_max; void __attribute__((__cdecl__)) abort (void) __attribute__ ((noreturn)); int __attribute__((__cdecl__)) abs (int); int __attribute__((__cdecl__)) atexit (void (*__func)(void)); double __attribute__((__cdecl__)) atof (const char *__nptr); float __attribute__((__cdecl__)) atoff (const char *__nptr); int __attribute__((__cdecl__)) atoi (const char *__nptr); long __attribute__((__cdecl__)) atol (const char *__nptr); void * __attribute__((__cdecl__)) bsearch (const void * __key, const void * __base, size_t __nmemb, size_t __size, int (* __attribute__((__cdecl__)) _compar) (const void *, const void *)); void * __attribute__((__cdecl__)) calloc (size_t __nmemb, size_t __size); div_t __attribute__((__cdecl__)) div (int __numer, int __denom); void __attribute__((__cdecl__)) exit (int __status) __attribute__ ((noreturn)); void __attribute__((__cdecl__)) free (void *); char * __attribute__((__cdecl__)) getenv (const char *__string); char * __attribute__((__cdecl__)) _getenv_r (struct _reent *, const char *__string); char * __attribute__((__cdecl__)) _findenv (const char *, int *); char * __attribute__((__cdecl__)) _findenv_r (struct _reent *, const char *, int *); long __attribute__((__cdecl__)) labs (long); ldiv_t __attribute__((__cdecl__)) ldiv (long __numer, long __denom); void * __attribute__((__cdecl__)) malloc (size_t __size); int __attribute__((__cdecl__)) mblen (const char *, size_t); int __attribute__((__cdecl__)) _mblen_r (struct _reent *, const char *, size_t, _mbstate_t *); int __attribute__((__cdecl__)) mbtowc (wchar_t *, const char *, size_t); int __attribute__((__cdecl__)) _mbtowc_r (struct _reent *, wchar_t *, const char *, size_t, _mbstate_t *); int __attribute__((__cdecl__)) wctomb (char *, wchar_t); int __attribute__((__cdecl__)) _wctomb_r (struct _reent *, char *, wchar_t, _mbstate_t *); size_t __attribute__((__cdecl__)) mbstowcs (wchar_t *, const char *, size_t); size_t __attribute__((__cdecl__)) _mbstowcs_r (struct _reent *, wchar_t *, const char *, size_t, _mbstate_t *); size_t __attribute__((__cdecl__)) wcstombs (char *, const wchar_t *, size_t); size_t __attribute__((__cdecl__)) _wcstombs_r (struct _reent *, char *, const wchar_t *, size_t, _mbstate_t *); int __attribute__((__cdecl__)) mkstemp (char *); char * __attribute__((__cdecl__)) mktemp (char *); void __attribute__((__cdecl__)) qsort (void * __base, size_t __nmemb, size_t __size, int(*_compar)(const void *, const void *)); int __attribute__((__cdecl__)) rand (void); void * __attribute__((__cdecl__)) realloc (void * __r, size_t __size); void __attribute__((__cdecl__)) srand (unsigned __seed); double __attribute__((__cdecl__)) strtod (const char *__n, char **__end_PTR); double __attribute__((__cdecl__)) _strtod_r (struct _reent *,const char *__n, char **__end_PTR); float __attribute__((__cdecl__)) strtof (const char *__n, char **__end_PTR); long __attribute__((__cdecl__)) strtol (const char *__n, char **__end_PTR, int __base); long __attribute__((__cdecl__)) _strtol_r (struct _reent *,const char *__n, char **__end_PTR, int __base); unsigned long __attribute__((__cdecl__)) strtoul (const char *__n, char **__end_PTR, int __base); unsigned long __attribute__((__cdecl__)) _strtoul_r (struct _reent *,const char *__n, char **__end_PTR, int __base); int __attribute__((__cdecl__)) system (const char *__string); long __attribute__((__cdecl__)) a64l (const char *__input); char * __attribute__((__cdecl__)) l64a (long __input); char * __attribute__((__cdecl__)) _l64a_r (struct _reent *,long __input); int __attribute__((__cdecl__)) on_exit (void (*__func)(int, void *),void * __arg); void __attribute__((__cdecl__)) _Exit (int __status) __attribute__ ((noreturn)); int __attribute__((__cdecl__)) putenv (const char *__string); int __attribute__((__cdecl__)) _putenv_r (struct _reent *, const char *__string); int __attribute__((__cdecl__)) setenv (const char *__string, const char *__value, int __overwrite); int __attribute__((__cdecl__)) _setenv_r (struct _reent *, const char *__string, const char *__value, int __overwrite); char * __attribute__((__cdecl__)) gcvt (double,int,char *); char * __attribute__((__cdecl__)) gcvtf (float,int,char *); char * __attribute__((__cdecl__)) fcvt (double,int,int *,int *); char * __attribute__((__cdecl__)) fcvtf (float,int,int *,int *); char * __attribute__((__cdecl__)) ecvt (double,int,int *,int *); char * __attribute__((__cdecl__)) ecvtbuf (double, int, int*, int*, char *); char * __attribute__((__cdecl__)) fcvtbuf (double, int, int*, int*, char *); char * __attribute__((__cdecl__)) ecvtf (float,int,int *,int *); char * __attribute__((__cdecl__)) dtoa (double, int, int, int *, int*, char**); int __attribute__((__cdecl__)) rand_r (unsigned *__seed); double __attribute__((__cdecl__)) drand48 (void); double __attribute__((__cdecl__)) _drand48_r (struct _reent *); double __attribute__((__cdecl__)) erand48 (unsigned short [3]); double __attribute__((__cdecl__)) _erand48_r (struct _reent *, unsigned short [3]); long __attribute__((__cdecl__)) jrand48 (unsigned short [3]); long __attribute__((__cdecl__)) _jrand48_r (struct _reent *, unsigned short [3]); void __attribute__((__cdecl__)) lcong48 (unsigned short [7]); void __attribute__((__cdecl__)) _lcong48_r (struct _reent *, unsigned short [7]); long __attribute__((__cdecl__)) lrand48 (void); long __attribute__((__cdecl__)) _lrand48_r (struct _reent *); long __attribute__((__cdecl__)) mrand48 (void); long __attribute__((__cdecl__)) _mrand48_r (struct _reent *); long __attribute__((__cdecl__)) nrand48 (unsigned short [3]); long __attribute__((__cdecl__)) _nrand48_r (struct _reent *, unsigned short [3]); unsigned short * __attribute__((__cdecl__)) seed48 (unsigned short [3]); unsigned short * __attribute__((__cdecl__)) _seed48_r (struct _reent *, unsigned short [3]); void __attribute__((__cdecl__)) srand48 (long); void __attribute__((__cdecl__)) _srand48_r (struct _reent *, long); long long __attribute__((__cdecl__)) strtoll (const char *__n, char **__end_PTR, int __base); long long __attribute__((__cdecl__)) _strtoll_r (struct _reent *, const char *__n, char **__end_PTR, int __base); unsigned long long __attribute__((__cdecl__)) strtoull (const char *__n, char **__end_PTR, int __base); unsigned long long __attribute__((__cdecl__)) _strtoull_r (struct _reent *, const char *__n, char **__end_PTR, int __base); char * __attribute__((__cdecl__)) realpath (const char *, char *); void __attribute__((__cdecl__)) unsetenv (const char *__string); void __attribute__((__cdecl__)) _unsetenv_r (struct _reent *, const char *__string); int __attribute__((__cdecl__)) random (void); long __attribute__((__cdecl__)) srandom (unsigned __seed); char * __attribute__((__cdecl__)) ptsname (int); int __attribute__((__cdecl__)) grantpt (int); int __attribute__((__cdecl__)) unlockpt (int); char * __attribute__((__cdecl__)) _dtoa_r (struct _reent *, double, int, int, int *, int*, char**); int __attribute__((__cdecl__)) _system_r (struct _reent *, const char *); void __attribute__((__cdecl__)) __eprintf (const char *, const char *, unsigned int, const char *); # 213 "/usr/include/stdlib.h" 3 # 2 "transcendental.c" 2 # 1 "/usr/include/stdio.h" 1 3 # 34 "/usr/include/stdio.h" 3 # 1 "/lib/gcc-lib/i686-pc-cygwin/3.2/include/stddef.h" 1 3 # 35 "/usr/include/stdio.h" 2 3 # 1 "/lib/gcc-lib/i686-pc-cygwin/3.2/include/stdarg.h" 1 3 # 44 "/lib/gcc-lib/i686-pc-cygwin/3.2/include/stdarg.h" 3 typedef __builtin_va_list __gnuc_va_list; # 38 "/usr/include/stdio.h" 2 3 # 46 "/usr/include/stdio.h" 3 # 1 "/usr/include/sys/types.h" 1 3 # 24 "/usr/include/sys/types.h" 3 typedef short int __int16_t; typedef unsigned short int __uint16_t; typedef int __int32_t; typedef unsigned int __uint32_t; __extension__ typedef long long __int64_t; __extension__ typedef unsigned long long __uint64_t; # 59 "/usr/include/sys/types.h" 3 # 1 "/lib/gcc-lib/i686-pc-cygwin/3.2/include/stddef.h" 1 3 # 149 "/lib/gcc-lib/i686-pc-cygwin/3.2/include/stddef.h" 3 typedef int ptrdiff_t; # 60 "/usr/include/sys/types.h" 2 3 # 1 "/usr/include/machine/types.h" 1 3 # 36 "/usr/include/machine/types.h" 3 typedef long int __off_t; typedef int __pid_t; __extension__ typedef long long int __loff_t; # 61 "/usr/include/sys/types.h" 2 3 # 82 "/usr/include/sys/types.h" 3 typedef unsigned char u_char; typedef unsigned short u_short; typedef unsigned int u_int; typedef unsigned long u_long; typedef unsigned short ushort; typedef unsigned int uint; typedef unsigned long clock_t; typedef long time_t; struct timespec { time_t tv_sec; long tv_nsec; }; struct itimerspec { struct timespec it_interval; struct timespec it_value; }; typedef long daddr_t; typedef char * caddr_t; typedef unsigned long ino_t; # 130 "/usr/include/sys/types.h" 3 typedef unsigned long vm_offset_t; typedef unsigned long vm_size_t; typedef char int8_t; typedef unsigned char u_int8_t; typedef short int16_t; typedef unsigned short u_int16_t; typedef int int32_t; typedef unsigned int u_int32_t; typedef long long int64_t; typedef unsigned long long u_int64_t; typedef int32_t register_t; # 169 "/usr/include/sys/types.h" 3 typedef int pid_t; typedef long key_t; typedef _ssize_t ssize_t; typedef char * addr_t; typedef int mode_t; # 188 "/usr/include/sys/types.h" 3 typedef unsigned short nlink_t; # 210 "/usr/include/sys/types.h" 3 typedef long fd_mask; typedef struct _types_fd_set { fd_mask fds_bits[(((64)+(((sizeof (fd_mask) * 8))-1))/((sizeof (fd_mask) * 8)))]; } _types_fd_set; # 246 "/usr/include/sys/types.h" 3 typedef unsigned long clockid_t; typedef unsigned long timer_t; typedef long useconds_t; # 1 "/usr/include/sys/features.h" 1 3 # 260 "/usr/include/sys/types.h" 2 3 # 364 "/usr/include/sys/types.h" 3 # 1 "/usr/include/cygwin/types.h" 1 3 # 20 "/usr/include/cygwin/types.h" 3 # 1 "/usr/include/sys/sysmacros.h" 1 3 # 21 "/usr/include/cygwin/types.h" 2 3 typedef struct timespec timespec_t, timestruc_t; typedef long __off32_t; typedef long long __off64_t; typedef __off32_t off_t; typedef short __dev16_t; typedef unsigned long __dev32_t; typedef __dev16_t dev_t; typedef long blksize_t; typedef long __blkcnt32_t; typedef long long __blkcnt64_t; typedef __blkcnt32_t blkcnt_t; typedef unsigned short __uid16_t; typedef unsigned short __gid16_t; typedef unsigned long __uid32_t; typedef unsigned long __gid32_t; typedef __uid16_t uid_t; typedef __gid16_t gid_t; typedef struct __pthread_t {char __dummy;} *pthread_t; typedef struct __pthread_mutex_t {char __dummy;} *pthread_mutex_t; typedef struct __pthread_key_t {char __dummy;} *pthread_key_t; typedef struct __pthread_attr_t {char __dummy;} *pthread_attr_t; typedef struct __pthread_mutexattr_t {char __dummy;} *pthread_mutexattr_t; typedef struct __pthread_condattr_t {char __dummy;} *pthread_condattr_t; typedef struct __pthread_cond_t {char __dummy;} *pthread_cond_t; typedef struct { pthread_mutex_t mutex; int state; } pthread_once_t; typedef struct __pthread_rwlock_t {char __dummy;} *pthread_rwlock_t; typedef struct __pthread_rwlockattr_t {char __dummy;} *pthread_rwlockattr_t; # 365 "/usr/include/sys/types.h" 2 3 # 47 "/usr/include/stdio.h" 2 3 typedef _fpos_t fpos_t; typedef __FILE FILE; # 1 "/usr/include/sys/stdio.h" 1 3 # 58 "/usr/include/stdio.h" 2 3 # 162 "/usr/include/stdio.h" 3 FILE * __attribute__((__cdecl__)) tmpfile (void); char * __attribute__((__cdecl__)) tmpnam (char *); int __attribute__((__cdecl__)) fclose (FILE *); int __attribute__((__cdecl__)) fflush (FILE *); FILE * __attribute__((__cdecl__)) freopen (const char *, const char *, FILE *); void __attribute__((__cdecl__)) setbuf (FILE *, char *); int __attribute__((__cdecl__)) setvbuf (FILE *, char *, int, size_t); int __attribute__((__cdecl__)) fprintf (FILE *, const char *, ...); int __attribute__((__cdecl__)) fscanf (FILE *, const char *, ...); int __attribute__((__cdecl__)) printf (const char *, ...); int __attribute__((__cdecl__)) scanf (const char *, ...); int __attribute__((__cdecl__)) sscanf (const char *, const char *, ...); int __attribute__((__cdecl__)) vfprintf (FILE *, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) vprintf (const char *, __gnuc_va_list); int __attribute__((__cdecl__)) vsprintf (char *, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) fgetc (FILE *); char * __attribute__((__cdecl__)) fgets (char *, int, FILE *); int __attribute__((__cdecl__)) fputc (int, FILE *); int __attribute__((__cdecl__)) fputs (const char *, FILE *); int __attribute__((__cdecl__)) getc (FILE *); int __attribute__((__cdecl__)) getchar (void); char * __attribute__((__cdecl__)) gets (char *); int __attribute__((__cdecl__)) putc (int, FILE *); int __attribute__((__cdecl__)) putchar (int); int __attribute__((__cdecl__)) puts (const char *); int __attribute__((__cdecl__)) ungetc (int, FILE *); size_t __attribute__((__cdecl__)) fread (void *, size_t _size, size_t _n, FILE *); size_t __attribute__((__cdecl__)) fwrite (const void * , size_t _size, size_t _n, FILE *); int __attribute__((__cdecl__)) fgetpos (FILE *, fpos_t *); int __attribute__((__cdecl__)) fseek (FILE *, long, int); int __attribute__((__cdecl__)) fsetpos (FILE *, const fpos_t *); long __attribute__((__cdecl__)) ftell ( FILE *); void __attribute__((__cdecl__)) rewind (FILE *); void __attribute__((__cdecl__)) clearerr (FILE *); int __attribute__((__cdecl__)) feof (FILE *); int __attribute__((__cdecl__)) ferror (FILE *); void __attribute__((__cdecl__)) perror (const char *); FILE * __attribute__((__cdecl__)) fopen (const char *_name, const char *_type); int __attribute__((__cdecl__)) sprintf (char *, const char *, ...); int __attribute__((__cdecl__)) remove (const char *); int __attribute__((__cdecl__)) rename (const char *, const char *); int __attribute__((__cdecl__)) asprintf (char **, const char *, ...); int __attribute__((__cdecl__)) fseeko (FILE *, off_t, int); off_t __attribute__((__cdecl__)) ftello ( FILE *); int __attribute__((__cdecl__)) vfiprintf (FILE *, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) iprintf (const char *, ...); int __attribute__((__cdecl__)) fiprintf (FILE *, const char *, ...); int __attribute__((__cdecl__)) siprintf (char *, const char *, ...); char * __attribute__((__cdecl__)) tempnam (const char *, const char *); int __attribute__((__cdecl__)) vasprintf (char **, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) vsnprintf (char *, size_t, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) vfscanf (FILE *, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) vscanf (const char *, __gnuc_va_list); int __attribute__((__cdecl__)) vsscanf (const char *, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) fcloseall (void); int __attribute__((__cdecl__)) snprintf (char *, size_t, const char *, ...); # 231 "/usr/include/stdio.h" 3 FILE * __attribute__((__cdecl__)) fdopen (int, const char *); int __attribute__((__cdecl__)) fileno (FILE *); int __attribute__((__cdecl__)) getw (FILE *); int __attribute__((__cdecl__)) pclose (FILE *); FILE * __attribute__((__cdecl__)) popen (const char *, const char *); int __attribute__((__cdecl__)) putw (int, FILE *); void __attribute__((__cdecl__)) setbuffer (FILE *, char *, int); int __attribute__((__cdecl__)) setlinebuf (FILE *); int __attribute__((__cdecl__)) getc_unlocked (FILE *); int __attribute__((__cdecl__)) getchar_unlocked (void); void __attribute__((__cdecl__)) flockfile (FILE *); int __attribute__((__cdecl__)) ftrylockfile (FILE *); void __attribute__((__cdecl__)) funlockfile (FILE *); int __attribute__((__cdecl__)) putc_unlocked (int, FILE *); int __attribute__((__cdecl__)) putchar_unlocked (int); int __attribute__((__cdecl__)) _asprintf_r (struct _reent *, char **, const char *, ...); int __attribute__((__cdecl__)) _fcloseall_r (struct _reent *); FILE * __attribute__((__cdecl__)) _fdopen_r (struct _reent *, int, const char *); FILE * __attribute__((__cdecl__)) _fopen_r (struct _reent *, const char *, const char *); int __attribute__((__cdecl__)) _fscanf_r (struct _reent *, FILE *, const char *, ...); int __attribute__((__cdecl__)) _getchar_r (struct _reent *); char * __attribute__((__cdecl__)) _gets_r (struct _reent *, char *); int __attribute__((__cdecl__)) _iprintf_r (struct _reent *, const char *, ...); int __attribute__((__cdecl__)) _mkstemp_r (struct _reent *, char *); char * __attribute__((__cdecl__)) _mktemp_r (struct _reent *, char *); void __attribute__((__cdecl__)) _perror_r (struct _reent *, const char *); int __attribute__((__cdecl__)) _printf_r (struct _reent *, const char *, ...); int __attribute__((__cdecl__)) _putchar_r (struct _reent *, int); int __attribute__((__cdecl__)) _puts_r (struct _reent *, const char *); int __attribute__((__cdecl__)) _remove_r (struct _reent *, const char *); int __attribute__((__cdecl__)) _rename_r (struct _reent *, const char *_old, const char *_new); int __attribute__((__cdecl__)) _scanf_r (struct _reent *, const char *, ...); int __attribute__((__cdecl__)) _sprintf_r (struct _reent *, char *, const char *, ...); int __attribute__((__cdecl__)) _snprintf_r (struct _reent *, char *, size_t, const char *, ...); int __attribute__((__cdecl__)) _sscanf_r (struct _reent *, const char *, const char *, ...); char * __attribute__((__cdecl__)) _tempnam_r (struct _reent *, const char *, const char *); FILE * __attribute__((__cdecl__)) _tmpfile_r (struct _reent *); char * __attribute__((__cdecl__)) _tmpnam_r (struct _reent *, char *); int __attribute__((__cdecl__)) _vasprintf_r (struct _reent *, char **, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) _vfprintf_r (struct _reent *, FILE *, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) _vprintf_r (struct _reent *, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) _vsprintf_r (struct _reent *, char *, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) _vsnprintf_r (struct _reent *, char *, size_t, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) _vfscanf_r (struct _reent *, FILE *, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) _vscanf_r (struct _reent *, const char *, __gnuc_va_list); int __attribute__((__cdecl__)) _vsscanf_r (struct _reent *, const char *, const char *, __gnuc_va_list); ssize_t __attribute__((__cdecl__)) __getdelim (char **, size_t *, int, FILE *); ssize_t __attribute__((__cdecl__)) __getline (char **, size_t *, FILE *); # 309 "/usr/include/stdio.h" 3 int __attribute__((__cdecl__)) __srget (FILE *); int __attribute__((__cdecl__)) __swbuf (int, FILE *); FILE *__attribute__((__cdecl__)) funopen (const void * _cookie, int (*readfn)(void * _cookie, char *_buf, int _n), int (*writefn)(void * _cookie, const char *_buf, int _n), fpos_t (*seekfn)(void * _cookie, fpos_t _off, int _whence), int (*closefn)(void * _cookie)); # 334 "/usr/include/stdio.h" 3 static __inline__ int __sgetc(FILE *__p) { int __c = (--(__p)->_r < 0 ? __srget(__p) : (int)(*(__p)->_p++)); if ((__p->_flags & 0x4000) && (__c == '\r')) { int __c2 = (--(__p)->_r < 0 ? __srget(__p) : (int)(*(__p)->_p++)); if (__c2 == '\n') __c = __c2; else ungetc(__c2, __p); } return __c; } # 416 "/usr/include/stdio.h" 3 # 4 "transcendental.c" 2 # 1 "/cygdrive/c/fulgham/projects/dylan/src/d2c/runtime/runtime.h" 1 typedef int boolean; typedef char bool; # 12 "/cygdrive/c/fulgham/projects/dylan/src/d2c/runtime/runtime.h" typedef struct heapobj *heapptr_t; typedef struct descriptor { heapptr_t heapptr; union { long l; float f; void *ptr; } dataword; } descriptor_t; typedef descriptor_t *(*entry_t)(); extern heapptr_t allocate(int bytes); extern descriptor_t *allocate_stack(void); extern void destroy(void* ptr); extern heapptr_t make_trampoline(void *func, descriptor_t closure, int nkeys, char *signature); extern descriptor_t *catch(descriptor_t *(*fn)(descriptor_t *sp, void *state, heapptr_t thunk), descriptor_t *sp, heapptr_t func); extern void throw(void *state, descriptor_t *stack_top); extern descriptor_t *pad_cluster(descriptor_t *start, descriptor_t *end, int min_values); extern descriptor_t *values_sequence(descriptor_t *sp, heapptr_t vector); extern heapptr_t make_double_float(double value); extern double double_float_value(heapptr_t df); extern heapptr_t make_extended_float(long double value); extern long double extended_float_value(heapptr_t xf); typedef struct { long hi; long lo; } gd_long_long; extern heapptr_t make_double_integer(gd_long_long value); extern gd_long_long double_integer_value(heapptr_t xf); extern int double_integer_eq(gd_long_long a, gd_long_long b); extern int double_integer_lt(gd_long_long a, gd_long_long b); extern gd_long_long double_integer_add(gd_long_long a, gd_long_long b); extern gd_long_long double_integer_mul(gd_long_long a, gd_long_long b); extern gd_long_long double_integer_sub(gd_long_long a, gd_long_long b); extern gd_long_long double_integer_neg(gd_long_long a); extern gd_long_long double_integer_div(gd_long_long a, gd_long_long b); extern gd_long_long double_integer_mod(gd_long_long a, gd_long_long b); extern gd_long_long double_integer_logior(gd_long_long a, gd_long_long b); extern gd_long_long double_integer_logxor(gd_long_long a, gd_long_long b); extern gd_long_long double_integer_logand(gd_long_long a, gd_long_long b); extern gd_long_long double_integer_lognot(gd_long_long a); extern gd_long_long double_integer_shl(gd_long_long a, long b); extern gd_long_long double_integer_shr(gd_long_long a, long b); extern gd_long_long integer_to_double_integer(long b); extern long double_integer_to_integer(gd_long_long b); extern heapptr_t initial_symbols; extern void not_reached(void); extern void no_core_dumps(void); # 1 "/usr/include/errno.h" 1 3 typedef int error_t; # 1 "/usr/include/sys/errno.h" 1 3 # 15 "/usr/include/sys/errno.h" 3 extern int *__errno (void); extern __attribute__((dllimport)) const char * const _sys_errlist[]; extern __attribute__((dllimport)) int _sys_nerr; extern __attribute__((dllimport)) const char * const sys_errlist[]; extern __attribute__((dllimport)) int sys_nerr; # 7 "/usr/include/errno.h" 2 3 # 87 "/cygdrive/c/fulgham/projects/dylan/src/d2c/runtime/runtime.h" 2 # 6 "transcendental.c" 2 # 1 "/usr/include/math.h" 1 3 # 1 "/usr/include/machine/ieeefp.h" 1 3 # 8 "/usr/include/math.h" 2 3 union __dmath { __ULong i[2]; double d; }; extern __attribute__((dllimport)) const union __dmath __infinity[]; # 35 "/usr/include/math.h" 3 extern double atan (double); extern double cos (double); extern double sin (double); extern double tan (double); extern double tanh (double); extern double frexp (double, int *); extern double modf (double, double *); extern double ceil (double); extern double fabs (double); extern double floor (double); extern double acos (double); extern double asin (double); extern double atan2 (double, double); extern double cosh (double); extern double sinh (double); extern double exp (double); extern double ldexp (double, int); extern double log (double); extern double log10 (double); extern double pow (double, double); extern double sqrt (double); extern double fmod (double, double); # 72 "/usr/include/math.h" 3 typedef float float_t; typedef double double_t; # 82 "/usr/include/math.h" 3 extern int __fpclassifyf (float x); extern int __fpclassifyd (double x); # 121 "/usr/include/math.h" 3 extern double infinity (void); extern double nan (void); extern int isnan (double); extern int isinf (double); extern int finite (double); extern double copysign (double, double); extern int ilogb (double); extern double asinh (double); extern double cbrt (double); extern double nextafter (double, double); extern double rint (double); extern double scalbn (double, int); extern double exp2 (double); extern double scalbln (double, long int); extern double tgamma (double); extern double nearbyint (double); extern long int lrint (double); extern double round (double); extern long int lround (double); extern double trunc (double); extern double remquo (double, double, int *); extern double copysign (double, double); extern double fdim (double, double); extern double fmax (double, double); extern double fmin (double, double); extern double fma (double, double, double); extern void sincos (double, double *, double *); extern double log1p (double); extern double expm1 (double); extern double acosh (double); extern double atanh (double); extern double remainder (double, double); extern double gamma (double); extern double gamma_r (double, int *); extern double lgamma (double); extern double lgamma_r (double, int *); extern double erf (double); extern double erfc (double); extern double y0 (double); extern double y1 (double); extern double yn (int, double); extern double j0 (double); extern double j1 (double); extern double jn (int, double); extern double hypot (double, double); extern double cabs(); extern double drem (double, double); # 189 "/usr/include/math.h" 3 extern float atanf (float); extern float cosf (float); extern float sinf (float); extern float tanf (float); extern float tanhf (float); extern float frexpf (float, int *); extern float modff (float, float *); extern float ceilf (float); extern float fabsf (float); extern float floorf (float); extern float acosf (float); extern float asinf (float); extern float atan2f (float, float); extern float coshf (float); extern float sinhf (float); extern float expf (float); extern float ldexpf (float, int); extern float logf (float); extern float log10f (float); extern float powf (float, float); extern float sqrtf (float); extern float fmodf (float, float); # 221 "/usr/include/math.h" 3 extern float exp2f (float); extern float scalblnf (float, long int); extern float tgammaf (float); extern float nearbyintf (float); extern long int lrintf (float); extern float roundf (float); extern long int lroundf (float); extern float truncf (float); extern float remquof (float, float, int *); extern float copysignf (float, float); extern float fdimf (float, float); extern float fmaxf (float, float); extern float fminf (float, float); extern float fmaf (float, float, float); extern float infinityf (void); extern float nanf (void); extern int isnanf (float); extern int isinff (float); extern int finitef (float); extern float copysignf (float, float); extern int ilogbf (float); extern float asinhf (float); extern float cbrtf (float); extern float nextafterf (float, float); extern float rintf (float); extern float scalbnf (float, int); extern float log1pf (float); extern float expm1f (float); extern void sincosf (float, float *, float *); extern float acoshf (float); extern float atanhf (float); extern float remainderf (float, float); extern float gammaf (float); extern float gammaf_r (float, int *); extern float lgammaf (float); extern float lgammaf_r (float, int *); extern float erff (float); extern float erfcf (float); extern float y0f (float); extern float y1f (float); extern float ynf (int, float); extern float j0f (float); extern float j1f (float); extern float jnf (int, float); extern float hypotf (float, float); extern float cabsf(); extern float dremf (float, float); extern int *__signgam (void); # 290 "/usr/include/math.h" 3 struct exception { int type; char *name; double arg1; double arg2; double retval; int err; }; extern int matherr (struct exception *e); # 345 "/usr/include/math.h" 3 enum __fdlibm_version { __fdlibm_ieee = -1, __fdlibm_svid, __fdlibm_xopen, __fdlibm_posix }; extern __attribute__((dllimport)) const enum __fdlibm_version __fdlib_version; # 365 "/usr/include/math.h" 3 # 8 "transcendental.c" 2 extern descriptor_t dylanZtrue; extern descriptor_t dylanZfalse; # 30 "transcendental.c" void transcendentalZLINE_1248(descriptor_t *orig_sp) { descriptor_t *cluster_0_top; return; } double transcendentalZtranscendentalZCdouble_pi = 0; int transcendentalZtranscendentalZCdouble_pi_initialized = 0; void transcendentalZLINE_109(descriptor_t *orig_sp) { transcendentalZtranscendentalZCdouble_pi = 0.3141592653589793e1; transcendentalZtranscendentalZCdouble_pi_initialized = 1; return; } float transcendentalZtranscendentalZCsingle_pi = 0; int transcendentalZtranscendentalZCsingle_pi_initialized = 0; void transcendentalZLINE_112(descriptor_t *orig_sp) { descriptor_t *cluster_0_top; double L_temp; if (!transcendentalZtranscendentalZCdouble_pi_initialized) abort(); L_temp = transcendentalZtranscendentalZCdouble_pi; transcendentalZtranscendentalZCsingle_pi = ((float)L_temp); transcendentalZtranscendentalZCsingle_pi_initialized = 1; return; } double transcendentalZtranscendentalZCdouble_e = 0; int transcendentalZtranscendentalZCdouble_e_initialized = 0; void transcendentalZLINE_116(descriptor_t *orig_sp) { transcendentalZtranscendentalZCdouble_e = 0.2718281828459045e1; transcendentalZtranscendentalZCdouble_e_initialized = 1; return; } float transcendentalZtranscendentalZCsingle_e = 0; int transcendentalZtranscendentalZCsingle_e_initialized = 0; void transcendentalZLINE_120(descriptor_t *orig_sp) { descriptor_t *cluster_0_top; double L_temp; if (!transcendentalZtranscendentalZCdouble_e_initialized) abort(); L_temp = transcendentalZtranscendentalZCdouble_e; transcendentalZtranscendentalZCsingle_e = ((float)L_temp); transcendentalZtranscendentalZCsingle_e_initialized = 1; return; } extern heapptr_t dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(descriptor_t *orig_sp, long A0, descriptor_t A1); extern void dylanZdylan_visceraZno_applicable_methods_error_FUN(descriptor_t *orig_sp, heapptr_t A0, heapptr_t A1); extern struct heapobj transcendentalZtranscendentalZsin_ROOT; extern double transcendentalZtranscendentalZsin_METH(descriptor_t *orig_sp, double A0, heapptr_t A1); extern struct heapobj dylanZempty_list_ROOT; extern float transcendentalZtranscendentalZsin_METH_2(descriptor_t *orig_sp, float A0, heapptr_t A1); extern descriptor_t transcendentalZliteral; extern float transcendentalZtranscendentalZsin_METH_3(descriptor_t *orig_sp, long A0, heapptr_t A1); descriptor_t transcendentalZtranscendentalZsin_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; descriptor_t L_result0; heapptr_t L_instance_2; heapptr_t L_instance_3; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZsin_ROOT, L_instance); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZsin_METH(orig_sp, double_float_value(A_arg0.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZsin_METH_2(orig_sp, A_arg0.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZsin_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZsin_METH_3(orig_sp, A_arg0.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZsin_ROOT, L_instance_3); not_reached(); } return L_result0; } extern void dylanZdylan_visceraZtype_error_FUN(descriptor_t *orig_sp, descriptor_t A0, heapptr_t A1); extern struct heapobj dylanZdylan_visceraZCLS_real_HEAP; extern void dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(descriptor_t *orig_sp, boolean A0, long A1, long A2); descriptor_t * transcendentalZtranscendentalZsin_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_arg; descriptor_t L_result0; if ((A_nargs == 1)) { L_args = ((void *)(orig_sp - 1)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_arg = L_temp; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZsin_DISCRIM_FUN(orig_sp, L_arg); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 1, A_nargs); not_reached(); } } extern struct heapobj transcendentalZtranscendentalZcos_ROOT; extern double transcendentalZtranscendentalZcos_METH(descriptor_t *orig_sp, double A0, heapptr_t A1); extern float transcendentalZtranscendentalZcos_METH_2(descriptor_t *orig_sp, float A0, heapptr_t A1); extern float transcendentalZtranscendentalZcos_METH_3(descriptor_t *orig_sp, long A0, heapptr_t A1); descriptor_t transcendentalZtranscendentalZcos_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; descriptor_t L_result0; heapptr_t L_instance_2; heapptr_t L_instance_3; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZcos_ROOT, L_instance); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZcos_METH(orig_sp, double_float_value(A_arg0.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZcos_METH_2(orig_sp, A_arg0.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZcos_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZcos_METH_3(orig_sp, A_arg0.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZcos_ROOT, L_instance_3); not_reached(); } return L_result0; } descriptor_t * transcendentalZtranscendentalZcos_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_arg; descriptor_t L_result0; if ((A_nargs == 1)) { L_args = ((void *)(orig_sp - 1)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_arg = L_temp; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZcos_DISCRIM_FUN(orig_sp, L_arg); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 1, A_nargs); not_reached(); } } extern struct heapobj transcendentalZtranscendentalZtan_ROOT; extern double transcendentalZtranscendentalZtan_METH(descriptor_t *orig_sp, double A0, heapptr_t A1); extern float transcendentalZtranscendentalZtan_METH_2(descriptor_t *orig_sp, float A0, heapptr_t A1); extern float transcendentalZtranscendentalZtan_METH_3(descriptor_t *orig_sp, long A0, heapptr_t A1); descriptor_t transcendentalZtranscendentalZtan_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; descriptor_t L_result0; heapptr_t L_instance_2; heapptr_t L_instance_3; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZtan_ROOT, L_instance); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZtan_METH(orig_sp, double_float_value(A_arg0.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZtan_METH_2(orig_sp, A_arg0.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZtan_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZtan_METH_3(orig_sp, A_arg0.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZtan_ROOT, L_instance_3); not_reached(); } return L_result0; } descriptor_t * transcendentalZtranscendentalZtan_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_arg; descriptor_t L_result0; if ((A_nargs == 1)) { L_args = ((void *)(orig_sp - 1)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_arg = L_temp; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZtan_DISCRIM_FUN(orig_sp, L_arg); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 1, A_nargs); not_reached(); } } extern struct heapobj transcendentalZtranscendentalZasin_ROOT; extern double transcendentalZtranscendentalZasin_METH(descriptor_t *orig_sp, double A0, heapptr_t A1); extern float transcendentalZtranscendentalZasin_METH_2(descriptor_t *orig_sp, float A0, heapptr_t A1); extern float transcendentalZtranscendentalZasin_METH_3(descriptor_t *orig_sp, long A0, heapptr_t A1); descriptor_t transcendentalZtranscendentalZasin_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; descriptor_t L_result0; heapptr_t L_instance_2; heapptr_t L_instance_3; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZasin_ROOT, L_instance); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZasin_METH(orig_sp, double_float_value(A_arg0.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZasin_METH_2(orig_sp, A_arg0.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZasin_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZasin_METH_3(orig_sp, A_arg0.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZasin_ROOT, L_instance_3); not_reached(); } return L_result0; } descriptor_t * transcendentalZtranscendentalZasin_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_arg; descriptor_t L_result0; if ((A_nargs == 1)) { L_args = ((void *)(orig_sp - 1)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_arg = L_temp; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZasin_DISCRIM_FUN(orig_sp, L_arg); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 1, A_nargs); not_reached(); } } extern struct heapobj transcendentalZtranscendentalZacos_ROOT; extern double transcendentalZtranscendentalZacos_METH(descriptor_t *orig_sp, double A0, heapptr_t A1); extern float transcendentalZtranscendentalZacos_METH_2(descriptor_t *orig_sp, float A0, heapptr_t A1); extern float transcendentalZtranscendentalZacos_METH_3(descriptor_t *orig_sp, long A0, heapptr_t A1); descriptor_t transcendentalZtranscendentalZacos_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; descriptor_t L_result0; heapptr_t L_instance_2; heapptr_t L_instance_3; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZacos_ROOT, L_instance); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZacos_METH(orig_sp, double_float_value(A_arg0.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZacos_METH_2(orig_sp, A_arg0.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZacos_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZacos_METH_3(orig_sp, A_arg0.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZacos_ROOT, L_instance_3); not_reached(); } return L_result0; } descriptor_t * transcendentalZtranscendentalZacos_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_arg; descriptor_t L_result0; if ((A_nargs == 1)) { L_args = ((void *)(orig_sp - 1)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_arg = L_temp; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZacos_DISCRIM_FUN(orig_sp, L_arg); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 1, A_nargs); not_reached(); } } extern struct heapobj transcendentalZtranscendentalZatan_ROOT; extern double transcendentalZtranscendentalZatan_METH(descriptor_t *orig_sp, double A0, heapptr_t A1); extern float transcendentalZtranscendentalZatan_METH_2(descriptor_t *orig_sp, float A0, heapptr_t A1); extern float transcendentalZtranscendentalZatan_METH_3(descriptor_t *orig_sp, long A0, heapptr_t A1); descriptor_t transcendentalZtranscendentalZatan_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; descriptor_t L_result0; heapptr_t L_instance_2; heapptr_t L_instance_3; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan_ROOT, L_instance); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZatan_METH(orig_sp, double_float_value(A_arg0.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZatan_METH_2(orig_sp, A_arg0.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZatan_METH_3(orig_sp, A_arg0.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan_ROOT, L_instance_3); not_reached(); } return L_result0; } descriptor_t * transcendentalZtranscendentalZatan_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_arg; descriptor_t L_result0; if ((A_nargs == 1)) { L_args = ((void *)(orig_sp - 1)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_arg = L_temp; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZatan_DISCRIM_FUN(orig_sp, L_arg); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 1, A_nargs); not_reached(); } } extern struct heapobj transcendentalZtranscendentalZatan2_ROOT; extern double transcendentalZtranscendentalZatan2_METH(descriptor_t *orig_sp, double A0, double A1, heapptr_t A2); extern double transcendentalZtranscendentalZatan2_METH_2(descriptor_t *orig_sp, double A0, float A1, heapptr_t A2); extern double transcendentalZtranscendentalZatan2_METH_3(descriptor_t *orig_sp, double A0, long A1, heapptr_t A2); extern double transcendentalZtranscendentalZatan2_METH_4(descriptor_t *orig_sp, float A0, double A1, heapptr_t A2); extern float transcendentalZtranscendentalZatan2_METH_5(descriptor_t *orig_sp, float A0, float A1, heapptr_t A2); extern float transcendentalZtranscendentalZatan2_METH_6(descriptor_t *orig_sp, float A0, long A1, heapptr_t A2); extern descriptor_t transcendentalZliteral_2; extern double transcendentalZtranscendentalZatan2_METH_7(descriptor_t *orig_sp, long A0, double A1, heapptr_t A2); extern float transcendentalZtranscendentalZatan2_METH_8(descriptor_t *orig_sp, long A0, float A1, heapptr_t A2); extern float transcendentalZtranscendentalZatan2_METH_9(descriptor_t *orig_sp, long A0, long A1, heapptr_t A2); descriptor_t transcendentalZtranscendentalZatan2_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 , descriptor_t A_arg1 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; double L_arg0; long L_unique_id_2; heapptr_t L_instance_2; descriptor_t L_temp; descriptor_t L_result0; heapptr_t L_instance_3; descriptor_t L_temp_2; heapptr_t L_instance_4; descriptor_t L_temp_3; float L_arg0_2; long L_unique_id_3; heapptr_t L_instance_5; descriptor_t L_temp_4; heapptr_t L_instance_6; descriptor_t L_temp_5; heapptr_t L_instance_7; descriptor_t L_temp_6; heapptr_t L_instance_8; long L_arg0_3; long L_unique_id_4; heapptr_t L_instance_9; descriptor_t L_temp_7; heapptr_t L_instance_10; descriptor_t L_temp_8; heapptr_t L_instance_11; descriptor_t L_temp_9; heapptr_t L_instance_12; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; (*(descriptor_t *)((char *)L_instance + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan2_ROOT, L_instance); not_reached(); } else { L_arg0 = double_float_value(A_arg0.heapptr); L_unique_id_2 = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg1.heapptr + 0)) + 8)); if ((L_unique_id_2 < 38)) { if ((L_unique_id_2 < 37)) { if ((L_unique_id_2 < 36)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); L_temp.heapptr = make_double_float(L_arg0); L_temp.dataword.l = 0; (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = L_temp; (*(descriptor_t *)((char *)L_instance_2 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan2_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZatan2_METH(orig_sp, L_arg0, double_float_value(A_arg1.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZatan2_METH_2(orig_sp, L_arg0, A_arg1.dataword.f, &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else if ((L_unique_id_2 < 40)) { if ((L_unique_id_2 < 39)) { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); L_temp_2.heapptr = make_double_float(L_arg0); L_temp_2.dataword.l = 0; (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = L_temp_2; (*(descriptor_t *)((char *)L_instance_3 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan2_ROOT, L_instance_3); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZatan2_METH_3(orig_sp, L_arg0, A_arg1.dataword.l, &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_instance_4 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); L_temp_3.heapptr = make_double_float(L_arg0); L_temp_3.dataword.l = 0; (*(descriptor_t *)((char *)L_instance_4 + 8 + 0 * sizeof(descriptor_t))) = L_temp_3; (*(descriptor_t *)((char *)L_instance_4 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan2_ROOT, L_instance_4); not_reached(); } } } else { L_arg0_2 = A_arg0.dataword.f; L_unique_id_3 = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg1.heapptr + 0)) + 8)); if ((L_unique_id_3 < 38)) { if ((L_unique_id_3 < 37)) { if ((L_unique_id_3 < 36)) { L_instance_5 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); L_temp_4.heapptr = transcendentalZliteral.heapptr; L_temp_4.dataword.f = L_arg0_2; (*(descriptor_t *)((char *)L_instance_5 + 8 + 0 * sizeof(descriptor_t))) = L_temp_4; (*(descriptor_t *)((char *)L_instance_5 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan2_ROOT, L_instance_5); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZatan2_METH_4(orig_sp, L_arg0_2, double_float_value(A_arg1.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZatan2_METH_5(orig_sp, L_arg0_2, A_arg1.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id_3 < 40)) { if ((L_unique_id_3 < 39)) { L_instance_6 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); L_temp_5.heapptr = transcendentalZliteral.heapptr; L_temp_5.dataword.f = L_arg0_2; (*(descriptor_t *)((char *)L_instance_6 + 8 + 0 * sizeof(descriptor_t))) = L_temp_5; (*(descriptor_t *)((char *)L_instance_6 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan2_ROOT, L_instance_6); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZatan2_METH_6(orig_sp, L_arg0_2, A_arg1.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_7 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); L_temp_6.heapptr = transcendentalZliteral.heapptr; L_temp_6.dataword.f = L_arg0_2; (*(descriptor_t *)((char *)L_instance_7 + 8 + 0 * sizeof(descriptor_t))) = L_temp_6; (*(descriptor_t *)((char *)L_instance_7 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan2_ROOT, L_instance_7); not_reached(); } } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_8 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); (*(descriptor_t *)((char *)L_instance_8 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; (*(descriptor_t *)((char *)L_instance_8 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan2_ROOT, L_instance_8); not_reached(); } else { L_arg0_3 = A_arg0.dataword.l; L_unique_id_4 = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg1.heapptr + 0)) + 8)); if ((L_unique_id_4 < 38)) { if ((L_unique_id_4 < 37)) { if ((L_unique_id_4 < 36)) { L_instance_9 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); L_temp_7.heapptr = transcendentalZliteral_2.heapptr; L_temp_7.dataword.l = L_arg0_3; (*(descriptor_t *)((char *)L_instance_9 + 8 + 0 * sizeof(descriptor_t))) = L_temp_7; (*(descriptor_t *)((char *)L_instance_9 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan2_ROOT, L_instance_9); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZatan2_METH_7(orig_sp, L_arg0_3, double_float_value(A_arg1.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZatan2_METH_8(orig_sp, L_arg0_3, A_arg1.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id_4 < 40)) { if ((L_unique_id_4 < 39)) { L_instance_10 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); L_temp_8.heapptr = transcendentalZliteral_2.heapptr; L_temp_8.dataword.l = L_arg0_3; (*(descriptor_t *)((char *)L_instance_10 + 8 + 0 * sizeof(descriptor_t))) = L_temp_8; (*(descriptor_t *)((char *)L_instance_10 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan2_ROOT, L_instance_10); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZatan2_METH_9(orig_sp, L_arg0_3, A_arg1.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_11 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); L_temp_9.heapptr = transcendentalZliteral_2.heapptr; L_temp_9.dataword.l = L_arg0_3; (*(descriptor_t *)((char *)L_instance_11 + 8 + 0 * sizeof(descriptor_t))) = L_temp_9; (*(descriptor_t *)((char *)L_instance_11 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan2_ROOT, L_instance_11); not_reached(); } } } else { L_instance_12 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); (*(descriptor_t *)((char *)L_instance_12 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; (*(descriptor_t *)((char *)L_instance_12 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZatan2_ROOT, L_instance_12); not_reached(); } return L_result0; } descriptor_t * transcendentalZtranscendentalZatan2_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_temp_3; long L_unique_id_2; descriptor_t L_arg; boolean L_temp_4; descriptor_t L_arg_2; descriptor_t L_result0; if ((A_nargs == 2)) { L_args = ((void *)(orig_sp - 2)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_temp_3 = (((descriptor_t *)L_args)[1]); L_unique_id_2 = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp_3.heapptr + 0)) + 8)); L_arg = L_temp; if ((L_unique_id_2 < 35)) { L_temp_4 = 0; } else if ((40 < L_unique_id_2)) { L_temp_4 = 0; } else { L_temp_4 = 1; } if (L_temp_4) { L_arg_2 = L_temp_3; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZatan2_DISCRIM_FUN(orig_sp, L_arg, L_arg_2); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp_3, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 2, A_nargs); not_reached(); } } extern struct heapobj transcendentalZtranscendentalZsinh_ROOT; extern double transcendentalZtranscendentalZsinh_METH(descriptor_t *orig_sp, double A0, heapptr_t A1); extern float transcendentalZtranscendentalZsinh_METH_2(descriptor_t *orig_sp, float A0, heapptr_t A1); extern float transcendentalZtranscendentalZsinh_METH_3(descriptor_t *orig_sp, long A0, heapptr_t A1); descriptor_t transcendentalZtranscendentalZsinh_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; descriptor_t L_result0; heapptr_t L_instance_2; heapptr_t L_instance_3; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZsinh_ROOT, L_instance); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZsinh_METH(orig_sp, double_float_value(A_arg0.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZsinh_METH_2(orig_sp, A_arg0.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZsinh_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZsinh_METH_3(orig_sp, A_arg0.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZsinh_ROOT, L_instance_3); not_reached(); } return L_result0; } descriptor_t * transcendentalZtranscendentalZsinh_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_arg; descriptor_t L_result0; if ((A_nargs == 1)) { L_args = ((void *)(orig_sp - 1)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_arg = L_temp; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZsinh_DISCRIM_FUN(orig_sp, L_arg); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 1, A_nargs); not_reached(); } } extern struct heapobj transcendentalZtranscendentalZcosh_ROOT; extern double transcendentalZtranscendentalZcosh_METH(descriptor_t *orig_sp, double A0, heapptr_t A1); extern float transcendentalZtranscendentalZcosh_METH_2(descriptor_t *orig_sp, float A0, heapptr_t A1); extern float transcendentalZtranscendentalZcosh_METH_3(descriptor_t *orig_sp, long A0, heapptr_t A1); descriptor_t transcendentalZtranscendentalZcosh_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; descriptor_t L_result0; heapptr_t L_instance_2; heapptr_t L_instance_3; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZcosh_ROOT, L_instance); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZcosh_METH(orig_sp, double_float_value(A_arg0.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZcosh_METH_2(orig_sp, A_arg0.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZcosh_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZcosh_METH_3(orig_sp, A_arg0.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZcosh_ROOT, L_instance_3); not_reached(); } return L_result0; } descriptor_t * transcendentalZtranscendentalZcosh_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_arg; descriptor_t L_result0; if ((A_nargs == 1)) { L_args = ((void *)(orig_sp - 1)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_arg = L_temp; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZcosh_DISCRIM_FUN(orig_sp, L_arg); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 1, A_nargs); not_reached(); } } extern struct heapobj transcendentalZtranscendentalZtanh_ROOT; extern double transcendentalZtranscendentalZtanh_METH(descriptor_t *orig_sp, double A0, heapptr_t A1); extern float transcendentalZtranscendentalZtanh_METH_2(descriptor_t *orig_sp, float A0, heapptr_t A1); extern float transcendentalZtranscendentalZtanh_METH_3(descriptor_t *orig_sp, long A0, heapptr_t A1); descriptor_t transcendentalZtranscendentalZtanh_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; descriptor_t L_result0; heapptr_t L_instance_2; heapptr_t L_instance_3; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZtanh_ROOT, L_instance); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZtanh_METH(orig_sp, double_float_value(A_arg0.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZtanh_METH_2(orig_sp, A_arg0.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZtanh_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZtanh_METH_3(orig_sp, A_arg0.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZtanh_ROOT, L_instance_3); not_reached(); } return L_result0; } descriptor_t * transcendentalZtranscendentalZtanh_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_arg; descriptor_t L_result0; if ((A_nargs == 1)) { L_args = ((void *)(orig_sp - 1)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_arg = L_temp; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZtanh_DISCRIM_FUN(orig_sp, L_arg); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 1, A_nargs); not_reached(); } } # 1638 "transcendental.c" extern heapptr_t dylanZdylan_visceraZmake_rest_arg_FUN(descriptor_t *orig_sp, void * A0, long A1); extern struct heapobj transcendentalZtranscendentalZlog_ROOT; extern void dylanZdylan_visceraZverify_keywords_METH_2(descriptor_t *orig_sp, heapptr_t A0, heapptr_t A1, heapptr_t A2); extern struct heapobj transcendentalZliteral_ROOT; extern descriptor_t * transcendentalZtranscendentalZlog_METH_GENERIC(descriptor_t *orig_sp, heapptr_t A0 , long A1 , heapptr_t A2 ); extern descriptor_t transcendentalZtranscendentalZlog_METH; extern descriptor_t * transcendentalZtranscendentalZlog_METH_GENERIC_2(descriptor_t *orig_sp, heapptr_t A0 , long A1 , heapptr_t A2 ); extern descriptor_t transcendentalZtranscendentalZlog_METH_2; extern descriptor_t * transcendentalZtranscendentalZlog_METH_GENERIC_3(descriptor_t *orig_sp, heapptr_t A0 , long A1 , heapptr_t A2 ); extern descriptor_t transcendentalZtranscendentalZlog_METH_3; descriptor_t transcendentalZtranscendentalZlog_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 , heapptr_t A_rest ) { descriptor_t *cluster_0_top; descriptor_t *cluster_1_top; long L_unique_id; heapptr_t L_temp; descriptor_t L_temp_2; descriptor_t L_result0; descriptor_t L_temp_3; heapptr_t L_temp_4; descriptor_t L_temp_5; heapptr_t L_temp_6; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { cluster_0_top = orig_sp + 1; orig_sp[0] = A_arg0; cluster_1_top = values_sequence(cluster_0_top, A_rest); cluster_0_top = cluster_1_top; L_temp = dylanZdylan_visceraZmake_rest_arg_FUN(cluster_0_top, orig_sp + 0, cluster_0_top - orig_sp - 0); dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZlog_ROOT, L_temp); not_reached(); } else { dylanZdylan_visceraZverify_keywords_METH_2(orig_sp, A_rest, &transcendentalZliteral_ROOT, &dylanZempty_list_ROOT); L_temp_2.heapptr = make_double_float(double_float_value(A_arg0.heapptr)); L_temp_2.dataword.l = 0; cluster_0_top = orig_sp + 1; orig_sp[0] = L_temp_2; cluster_1_top = values_sequence(cluster_0_top, A_rest); cluster_0_top = cluster_1_top; cluster_0_top = transcendentalZtranscendentalZlog_METH_GENERIC(cluster_0_top, transcendentalZtranscendentalZlog_METH.heapptr, cluster_0_top - orig_sp, &dylanZempty_list_ROOT); L_result0 = (orig_sp == cluster_0_top ? dylanZfalse : orig_sp[0]); } } else { dylanZdylan_visceraZverify_keywords_METH_2(orig_sp, A_rest, &transcendentalZliteral_ROOT, &dylanZempty_list_ROOT); L_temp_3.heapptr = transcendentalZliteral.heapptr; L_temp_3.dataword.f = A_arg0.dataword.f; cluster_0_top = orig_sp + 1; orig_sp[0] = L_temp_3; cluster_1_top = values_sequence(cluster_0_top, A_rest); cluster_0_top = cluster_1_top; cluster_0_top = transcendentalZtranscendentalZlog_METH_GENERIC_2(cluster_0_top, transcendentalZtranscendentalZlog_METH_2.heapptr, cluster_0_top - orig_sp, &dylanZempty_list_ROOT); L_result0 = (orig_sp == cluster_0_top ? dylanZfalse : orig_sp[0]); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { cluster_0_top = orig_sp + 1; orig_sp[0] = A_arg0; cluster_1_top = values_sequence(cluster_0_top, A_rest); cluster_0_top = cluster_1_top; L_temp_4 = dylanZdylan_visceraZmake_rest_arg_FUN(cluster_0_top, orig_sp + 0, cluster_0_top - orig_sp - 0); dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZlog_ROOT, L_temp_4); not_reached(); } else { dylanZdylan_visceraZverify_keywords_METH_2(orig_sp, A_rest, &transcendentalZliteral_ROOT, &dylanZempty_list_ROOT); L_temp_5.heapptr = transcendentalZliteral_2.heapptr; L_temp_5.dataword.l = A_arg0.dataword.l; cluster_0_top = orig_sp + 1; orig_sp[0] = L_temp_5; cluster_1_top = values_sequence(cluster_0_top, A_rest); cluster_0_top = cluster_1_top; cluster_0_top = transcendentalZtranscendentalZlog_METH_GENERIC_3(cluster_0_top, transcendentalZtranscendentalZlog_METH_3.heapptr, cluster_0_top - orig_sp, &dylanZempty_list_ROOT); L_result0 = (orig_sp == cluster_0_top ? dylanZfalse : orig_sp[0]); } } else { cluster_0_top = orig_sp + 1; orig_sp[0] = A_arg0; cluster_1_top = values_sequence(cluster_0_top, A_rest); cluster_0_top = cluster_1_top; L_temp_6 = dylanZdylan_visceraZmake_rest_arg_FUN(cluster_0_top, orig_sp + 0, cluster_0_top - orig_sp - 0); dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZlog_ROOT, L_temp_6); not_reached(); } return L_result0; } extern void dylanZdylan_visceraZodd_number_of_keywordSLASHvalue_arguments_error_FUN(descriptor_t *orig_sp); extern struct heapobj dylanZdylan_visceraZCLS_symbol_HEAP; descriptor_t * transcendentalZtranscendentalZlog_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; heapptr_t L_rest; descriptor_t L_arg; long L_index; descriptor_t L_temp_3; descriptor_t L_result0; if ((A_nargs < 1)) { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 0, 1, A_nargs); not_reached(); } else { if (((A_nargs & 1) == 0)) { dylanZdylan_visceraZodd_number_of_keywordSLASHvalue_arguments_error_FUN(orig_sp); not_reached(); } else { L_args = ((void *)(orig_sp - A_nargs)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_rest = dylanZdylan_visceraZmake_rest_arg_FUN(orig_sp, (descriptor_t *)L_args + 1, A_nargs - 1); L_arg = L_temp; L_index = (A_nargs - 2); while (1) { if ((L_index < 1)) { goto block0; } else { L_temp_3 = (((descriptor_t *)L_args)[L_index]); if ((&dylanZdylan_visceraZCLS_symbol_HEAP == (*(heapptr_t *)((char *)L_temp_3.heapptr + 0)))) { L_index = (L_index - 2); } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp_3, &dylanZdylan_visceraZCLS_symbol_HEAP); not_reached(); } } } block0:; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZlog_DISCRIM_FUN(orig_sp, L_arg, L_rest); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } } } extern struct heapobj SYM_base_HEAP; extern double transcendentalZtranscendentalZlog_METH_4(descriptor_t *orig_sp, double A0, heapptr_t A1, heapptr_t A2, descriptor_t A3); descriptor_t * transcendentalZtranscendentalZlog_METH_GENERIC(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs , heapptr_t A_next_method_info ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_arg; heapptr_t L_rest; double L_arg_2; descriptor_t L_base; long L_index; descriptor_t L_key; descriptor_t L_value; long L_unique_id; boolean L_temp; double L_result0; descriptor_t L_temp_2; L_args = ((void *)(orig_sp - A_nargs)); L_arg = (((descriptor_t *)L_args)[0]); L_rest = dylanZdylan_visceraZmake_rest_arg_FUN(orig_sp, (descriptor_t *)L_args + 1, A_nargs - 1); L_arg_2 = double_float_value(L_arg.heapptr); L_base.heapptr = 0; L_base.dataword.l = 0; L_index = (A_nargs - 2); while (1) { if ((L_index < 1)) { goto block0; } else { L_key = (((descriptor_t *)L_args)[L_index]); L_value = (((descriptor_t *)L_args)[(L_index + 1)]); if ((L_key.heapptr == &SYM_base_HEAP)) { L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_value.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp = 0; } else if ((40 < L_unique_id)) { L_temp = 0; } else { L_temp = 1; } if (L_temp) { L_base = L_value; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_value, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { } L_index = (L_index - 2); } } block0:; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZlog_METH_4(orig_sp, L_arg_2, A_next_method_info, L_rest, L_base); L_temp_2.heapptr = make_double_float(L_result0); L_temp_2.dataword.l = 0; orig_sp[0] = L_temp_2; return orig_sp + 1; } extern float transcendentalZtranscendentalZlog_METH_5(descriptor_t *orig_sp, float A0, heapptr_t A1, heapptr_t A2, descriptor_t A3); descriptor_t * transcendentalZtranscendentalZlog_METH_GENERIC_2(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs , heapptr_t A_next_method_info ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_arg; heapptr_t L_rest; float L_arg_2; descriptor_t L_base; long L_index; descriptor_t L_key; descriptor_t L_value; long L_unique_id; boolean L_temp; float L_result0; descriptor_t L_temp_2; L_args = ((void *)(orig_sp - A_nargs)); L_arg = (((descriptor_t *)L_args)[0]); L_rest = dylanZdylan_visceraZmake_rest_arg_FUN(orig_sp, (descriptor_t *)L_args + 1, A_nargs - 1); L_arg_2 = L_arg.dataword.f; L_base.heapptr = 0; L_base.dataword.l = 0; L_index = (A_nargs - 2); while (1) { if ((L_index < 1)) { goto block0; } else { L_key = (((descriptor_t *)L_args)[L_index]); L_value = (((descriptor_t *)L_args)[(L_index + 1)]); if ((L_key.heapptr == &SYM_base_HEAP)) { L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_value.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp = 0; } else if ((40 < L_unique_id)) { L_temp = 0; } else { L_temp = 1; } if (L_temp) { L_base = L_value; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_value, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { } L_index = (L_index - 2); } } block0:; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZlog_METH_5(orig_sp, L_arg_2, A_next_method_info, L_rest, L_base); L_temp_2.heapptr = transcendentalZliteral.heapptr; L_temp_2.dataword.f = L_result0; orig_sp[0] = L_temp_2; return orig_sp + 1; } extern float transcendentalZtranscendentalZlog_METH_6(descriptor_t *orig_sp, long A0, heapptr_t A1, heapptr_t A2, descriptor_t A3); descriptor_t * transcendentalZtranscendentalZlog_METH_GENERIC_3(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs , heapptr_t A_next_method_info ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_arg; heapptr_t L_rest; long L_arg_2; descriptor_t L_base; long L_index; descriptor_t L_key; descriptor_t L_value; long L_unique_id; boolean L_temp; float L_result0; descriptor_t L_temp_2; L_args = ((void *)(orig_sp - A_nargs)); L_arg = (((descriptor_t *)L_args)[0]); L_rest = dylanZdylan_visceraZmake_rest_arg_FUN(orig_sp, (descriptor_t *)L_args + 1, A_nargs - 1); L_arg_2 = L_arg.dataword.l; L_base.heapptr = 0; L_base.dataword.l = 0; L_index = (A_nargs - 2); while (1) { if ((L_index < 1)) { goto block0; } else { L_key = (((descriptor_t *)L_args)[L_index]); L_value = (((descriptor_t *)L_args)[(L_index + 1)]); if ((L_key.heapptr == &SYM_base_HEAP)) { L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_value.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp = 0; } else if ((40 < L_unique_id)) { L_temp = 0; } else { L_temp = 1; } if (L_temp) { L_base = L_value; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_value, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { } L_index = (L_index - 2); } } block0:; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZlog_METH_6(orig_sp, L_arg_2, A_next_method_info, L_rest, L_base); L_temp_2.heapptr = transcendentalZliteral.heapptr; L_temp_2.dataword.f = L_result0; orig_sp[0] = L_temp_2; return orig_sp + 1; } extern struct heapobj transcendentalZtranscendentalZlogn_ROOT; extern double transcendentalZtranscendentalZlogn_METH(descriptor_t *orig_sp, double A0, descriptor_t A1, heapptr_t A2); extern float transcendentalZtranscendentalZlogn_METH_2(descriptor_t *orig_sp, float A0, descriptor_t A1, heapptr_t A2); extern float transcendentalZtranscendentalZlogn_METH_3(descriptor_t *orig_sp, long A0, descriptor_t A1, heapptr_t A2); descriptor_t transcendentalZtranscendentalZlogn_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 , descriptor_t A_arg1 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; descriptor_t L_result0; heapptr_t L_instance_2; heapptr_t L_instance_3; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; (*(descriptor_t *)((char *)L_instance + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZlogn_ROOT, L_instance); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZlogn_METH(orig_sp, double_float_value(A_arg0.heapptr), A_arg1, &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZlogn_METH_2(orig_sp, A_arg0.dataword.f, A_arg1, &dylanZempty_list_ROOT); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; (*(descriptor_t *)((char *)L_instance_2 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZlogn_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZlogn_METH_3(orig_sp, A_arg0.dataword.l, A_arg1, &dylanZempty_list_ROOT); } } else { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; (*(descriptor_t *)((char *)L_instance_3 + 8 + 1 * sizeof(descriptor_t))) = A_arg1; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZlogn_ROOT, L_instance_3); not_reached(); } return L_result0; } descriptor_t * transcendentalZtranscendentalZlogn_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_temp_3; long L_unique_id_2; descriptor_t L_arg; boolean L_temp_4; descriptor_t L_arg_2; descriptor_t L_result0; if ((A_nargs == 2)) { L_args = ((void *)(orig_sp - 2)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_temp_3 = (((descriptor_t *)L_args)[1]); L_unique_id_2 = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp_3.heapptr + 0)) + 8)); L_arg = L_temp; if ((L_unique_id_2 < 35)) { L_temp_4 = 0; } else if ((40 < L_unique_id_2)) { L_temp_4 = 0; } else { L_temp_4 = 1; } if (L_temp_4) { L_arg_2 = L_temp_3; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZlogn_DISCRIM_FUN(orig_sp, L_arg, L_arg_2); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp_3, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 2, A_nargs); not_reached(); } } extern struct heapobj transcendentalZtranscendentalZexp_ROOT; extern double transcendentalZtranscendentalZexp_METH(descriptor_t *orig_sp, double A0, heapptr_t A1); extern float transcendentalZtranscendentalZexp_METH_2(descriptor_t *orig_sp, float A0, heapptr_t A1); extern float transcendentalZtranscendentalZexp_METH_3(descriptor_t *orig_sp, long A0, heapptr_t A1); descriptor_t transcendentalZtranscendentalZexp_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; descriptor_t L_result0; heapptr_t L_instance_2; heapptr_t L_instance_3; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZexp_ROOT, L_instance); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZexp_METH(orig_sp, double_float_value(A_arg0.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZexp_METH_2(orig_sp, A_arg0.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZexp_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZexp_METH_3(orig_sp, A_arg0.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZexp_ROOT, L_instance_3); not_reached(); } return L_result0; } descriptor_t * transcendentalZtranscendentalZexp_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_arg; descriptor_t L_result0; if ((A_nargs == 1)) { L_args = ((void *)(orig_sp - 1)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_arg = L_temp; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZexp_DISCRIM_FUN(orig_sp, L_arg); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 1, A_nargs); not_reached(); } } extern struct heapobj transcendentalZtranscendentalZsqrt_ROOT; extern double transcendentalZtranscendentalZsqrt_METH(descriptor_t *orig_sp, double A0, heapptr_t A1); extern float transcendentalZtranscendentalZsqrt_METH_2(descriptor_t *orig_sp, float A0, heapptr_t A1); extern float transcendentalZtranscendentalZsqrt_METH_3(descriptor_t *orig_sp, long A0, heapptr_t A1); descriptor_t transcendentalZtranscendentalZsqrt_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A_arg0 ) { descriptor_t *cluster_0_top; long L_unique_id; heapptr_t L_instance; descriptor_t L_result0; heapptr_t L_instance_2; heapptr_t L_instance_3; L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)A_arg0.heapptr + 0)) + 8)); if ((L_unique_id < 38)) { if ((L_unique_id < 37)) { if ((L_unique_id < 36)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZsqrt_ROOT, L_instance); not_reached(); } else { L_result0.heapptr = make_double_float(transcendentalZtranscendentalZsqrt_METH(orig_sp, double_float_value(A_arg0.heapptr), &dylanZempty_list_ROOT)); L_result0.dataword.l = 0; } } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZsqrt_METH_2(orig_sp, A_arg0.dataword.f, &dylanZempty_list_ROOT); } } else if ((L_unique_id < 40)) { if ((L_unique_id < 39)) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZsqrt_ROOT, L_instance_2); not_reached(); } else { L_result0.heapptr = transcendentalZliteral.heapptr; L_result0.dataword.f = transcendentalZtranscendentalZsqrt_METH_3(orig_sp, A_arg0.dataword.l, &dylanZempty_list_ROOT); } } else { L_instance_3 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_3 + 8 + 0 * sizeof(descriptor_t))) = A_arg0; dylanZdylan_visceraZno_applicable_methods_error_FUN(orig_sp, &transcendentalZtranscendentalZsqrt_ROOT, L_instance_3); not_reached(); } return L_result0; } descriptor_t * transcendentalZtranscendentalZsqrt_DISCRIM_GENERAL(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_temp; long L_unique_id; boolean L_temp_2; descriptor_t L_arg; descriptor_t L_result0; if ((A_nargs == 1)) { L_args = ((void *)(orig_sp - 1)); L_temp = (((descriptor_t *)L_args)[0]); L_unique_id = (*(long *)((char *)(*(heapptr_t *)((char *)L_temp.heapptr + 0)) + 8)); if ((L_unique_id < 35)) { L_temp_2 = 0; } else if ((40 < L_unique_id)) { L_temp_2 = 0; } else { L_temp_2 = 1; } if (L_temp_2) { L_arg = L_temp; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZsqrt_DISCRIM_FUN(orig_sp, L_arg); orig_sp[0] = L_result0; return orig_sp + 1; } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp, &dylanZdylan_visceraZCLS_real_HEAP); not_reached(); } } else { dylanZdylan_visceraZwrong_number_of_arguments_error_FUN(orig_sp, 1, 1, A_nargs); not_reached(); } } # 2492 "transcendental.c" extern void dylanZdylan_visceraZerror_METH(descriptor_t *orig_sp, descriptor_t A0, heapptr_t A1, heapptr_t A2); extern struct heapobj transcendentalZstr_ROOT; extern boolean dylanZdylan_visceraZLESSEQUAL_DISCRIM_FUN(descriptor_t *orig_sp, descriptor_t A0, descriptor_t A1); extern struct heapobj transcendentalZstr_ROOT_2; extern struct heapobj dylanZdylan_visceraZCLS_double_float_HEAP; extern struct heapobj dylanZdylan_visceraZCLS_single_float_HEAP; extern struct heapobj dylanZdylan_visceraZCLS_integer_HEAP; double transcendentalZtranscendentalZlog_METH_4(descriptor_t *orig_sp, double A_x , heapptr_t A_next_method_info , heapptr_t A_rest , descriptor_t A_base ) { descriptor_t *cluster_0_top; descriptor_t L_base; double L_temp; descriptor_t L_temp_2; descriptor_t L_base_2; heapptr_t L_instance; descriptor_t L_temp_3; descriptor_t L_temp_4; descriptor_t L_temp_5; boolean L_condition; heapptr_t L_instance_2; descriptor_t L_temp_6; double L_temp_7; heapptr_t L_PCTobject_class; boolean L_temp_8; boolean L_result; boolean L_condition_2; float L_temp_9; boolean L_result_2; double L_y; boolean L_result_3; boolean L_temp_10; boolean L_result_4; boolean L_condition_3; boolean L_result_5; double L_arg0; double L_arg1; if ((A_base.heapptr != ((void *)0))) { L_base = A_base; } else { if (!transcendentalZtranscendentalZCdouble_e_initialized) abort(); L_temp = transcendentalZtranscendentalZCdouble_e; L_temp_2.heapptr = make_double_float(L_temp); L_temp_2.dataword.l = 0; L_base = L_temp_2; } L_base_2 = L_base; if ((A_x < ((double)0))) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp_3.heapptr = make_double_float(A_x); L_temp_3.dataword.l = 0; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp_3; L_temp_4.heapptr = &transcendentalZstr_ROOT; L_temp_4.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_4, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_temp_5.heapptr = transcendentalZliteral_2.heapptr; L_temp_5.dataword.l = 1; L_condition = dylanZdylan_visceraZLESSEQUAL_DISCRIM_FUN(orig_sp, L_base_2, L_temp_5); if (L_condition) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = L_base_2; L_temp_6.heapptr = &transcendentalZstr_ROOT_2; L_temp_6.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_6, &dylanZempty_list_ROOT, L_instance_2); not_reached(); } else { if (!transcendentalZtranscendentalZCdouble_e_initialized) abort(); L_temp_7 = transcendentalZtranscendentalZCdouble_e; L_PCTobject_class = (*(heapptr_t *)((char *)L_base_2.heapptr + 0)); L_temp_8 = (&dylanZdylan_visceraZCLS_double_float_HEAP == L_PCTobject_class); if (L_temp_8) { L_result = (L_temp_7 == double_float_value(L_base_2.heapptr)); } else { L_result = 0; } if (L_result) { L_condition_2 = 1; } else { if (!transcendentalZtranscendentalZCsingle_e_initialized) abort(); L_temp_9 = transcendentalZtranscendentalZCsingle_e; if ((&dylanZdylan_visceraZCLS_single_float_HEAP == L_PCTobject_class)) { L_result_2 = (L_temp_9 == L_base_2.dataword.f); } else { L_result_2 = 0; } L_condition_2 = L_result_2; } if (L_condition_2) { L_y = log(A_x); } else { if ((&dylanZdylan_visceraZCLS_integer_HEAP == L_PCTobject_class)) { L_result_3 = (10 == L_base_2.dataword.l); } else { L_result_3 = 0; } if (L_result_3) { L_temp_10 = 1; } else { if (L_temp_8) { L_result_4 = (0.1e2 == double_float_value(L_base_2.heapptr)); } else { L_result_4 = 0; } L_temp_10 = L_result_4; } if (L_temp_10) { L_condition_3 = 1; } else { if ((&dylanZdylan_visceraZCLS_single_float_HEAP == L_PCTobject_class)) { L_result_5 = (0.1e2 == L_base_2.dataword.f); } else { L_result_5 = 0; } L_condition_3 = L_result_5; } if (L_condition_3) { L_y = log10(A_x); } else { L_arg0 = log(A_x); if (L_temp_8) { L_arg1 = log(double_float_value(L_base_2.heapptr)); L_y = (L_arg0 / L_arg1); } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_base_2, &dylanZdylan_visceraZCLS_double_float_HEAP); not_reached(); } } } return L_y; } } } float transcendentalZtranscendentalZlog_METH_5(descriptor_t *orig_sp, float A_x , heapptr_t A_next_method_info , heapptr_t A_rest , descriptor_t A_base ) { descriptor_t *cluster_0_top; descriptor_t L_base; double L_temp; descriptor_t L_temp_2; descriptor_t L_base_2; heapptr_t L_instance; descriptor_t L_temp_3; descriptor_t L_temp_4; descriptor_t L_temp_5; boolean L_condition; heapptr_t L_instance_2; descriptor_t L_temp_6; double L_temp_7; heapptr_t L_PCTobject_class; boolean L_temp_8; boolean L_result; boolean L_condition_2; float L_temp_9; boolean L_result_2; float L_y; boolean L_result_3; boolean L_temp_10; boolean L_result_4; boolean L_condition_3; boolean L_result_5; float L_arg0; double L_arg1; descriptor_t L_temp_11; if ((A_base.heapptr != ((void *)0))) { L_base = A_base; } else { if (!transcendentalZtranscendentalZCdouble_e_initialized) abort(); L_temp = transcendentalZtranscendentalZCdouble_e; L_temp_2.heapptr = make_double_float(L_temp); L_temp_2.dataword.l = 0; L_base = L_temp_2; } L_base_2 = L_base; if ((A_x < ((float)0))) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp_3.heapptr = transcendentalZliteral.heapptr; L_temp_3.dataword.f = A_x; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp_3; L_temp_4.heapptr = &transcendentalZstr_ROOT; L_temp_4.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_4, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_temp_5.heapptr = transcendentalZliteral_2.heapptr; L_temp_5.dataword.l = 1; L_condition = dylanZdylan_visceraZLESSEQUAL_DISCRIM_FUN(orig_sp, L_base_2, L_temp_5); if (L_condition) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = L_base_2; L_temp_6.heapptr = &transcendentalZstr_ROOT_2; L_temp_6.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_6, &dylanZempty_list_ROOT, L_instance_2); not_reached(); } else { if (!transcendentalZtranscendentalZCdouble_e_initialized) abort(); L_temp_7 = transcendentalZtranscendentalZCdouble_e; L_PCTobject_class = (*(heapptr_t *)((char *)L_base_2.heapptr + 0)); L_temp_8 = (&dylanZdylan_visceraZCLS_double_float_HEAP == L_PCTobject_class); if (L_temp_8) { L_result = (L_temp_7 == double_float_value(L_base_2.heapptr)); } else { L_result = 0; } if (L_result) { L_condition_2 = 1; } else { if (!transcendentalZtranscendentalZCsingle_e_initialized) abort(); L_temp_9 = transcendentalZtranscendentalZCsingle_e; if ((&dylanZdylan_visceraZCLS_single_float_HEAP == L_PCTobject_class)) { L_result_2 = (L_temp_9 == L_base_2.dataword.f); } else { L_result_2 = 0; } L_condition_2 = L_result_2; } if (L_condition_2) { L_y = log(A_x); } else { if ((&dylanZdylan_visceraZCLS_integer_HEAP == L_PCTobject_class)) { L_result_3 = (10 == L_base_2.dataword.l); } else { L_result_3 = 0; } if (L_result_3) { L_temp_10 = 1; } else { if (L_temp_8) { L_result_4 = (0.1e2 == double_float_value(L_base_2.heapptr)); } else { L_result_4 = 0; } L_temp_10 = L_result_4; } if (L_temp_10) { L_condition_3 = 1; } else { if ((&dylanZdylan_visceraZCLS_single_float_HEAP == L_PCTobject_class)) { L_result_5 = (0.1e2 == L_base_2.dataword.f); } else { L_result_5 = 0; } L_condition_3 = L_result_5; } if (L_condition_3) { L_y = log10(A_x); } else { L_arg0 = log(A_x); if (L_temp_8) { L_arg1 = log(double_float_value(L_base_2.heapptr)); L_temp_11.heapptr = make_double_float((((double)L_arg0) / L_arg1)); L_temp_11.dataword.l = 0; dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp_11, &dylanZdylan_visceraZCLS_single_float_HEAP); not_reached(); } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_base_2, &dylanZdylan_visceraZCLS_double_float_HEAP); not_reached(); } } } return L_y; } } } float transcendentalZtranscendentalZlog_METH_6(descriptor_t *orig_sp, long A_x , heapptr_t A_next_method_info , heapptr_t A_rest , descriptor_t A_base ) { descriptor_t *cluster_0_top; descriptor_t L_base; double L_temp; descriptor_t L_temp_2; descriptor_t L_base_2; heapptr_t L_instance; descriptor_t L_temp_3; descriptor_t L_temp_4; descriptor_t L_temp_5; boolean L_condition; heapptr_t L_instance_2; descriptor_t L_temp_6; double L_temp_7; heapptr_t L_PCTobject_class; boolean L_temp_8; boolean L_result; boolean L_condition_2; float L_temp_9; boolean L_result_2; float L_y; boolean L_result_3; boolean L_temp_10; boolean L_result_4; boolean L_condition_3; boolean L_result_5; float L_arg0; double L_arg1; descriptor_t L_temp_11; if ((A_base.heapptr != ((void *)0))) { L_base = A_base; } else { if (!transcendentalZtranscendentalZCdouble_e_initialized) abort(); L_temp = transcendentalZtranscendentalZCdouble_e; L_temp_2.heapptr = make_double_float(L_temp); L_temp_2.dataword.l = 0; L_base = L_temp_2; } L_base_2 = L_base; if ((A_x < 0)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp_3.heapptr = transcendentalZliteral_2.heapptr; L_temp_3.dataword.l = A_x; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp_3; L_temp_4.heapptr = &transcendentalZstr_ROOT; L_temp_4.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_4, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_temp_5.heapptr = transcendentalZliteral_2.heapptr; L_temp_5.dataword.l = 1; L_condition = dylanZdylan_visceraZLESSEQUAL_DISCRIM_FUN(orig_sp, L_base_2, L_temp_5); if (L_condition) { L_instance_2 = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); (*(descriptor_t *)((char *)L_instance_2 + 8 + 0 * sizeof(descriptor_t))) = L_base_2; L_temp_6.heapptr = &transcendentalZstr_ROOT_2; L_temp_6.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_6, &dylanZempty_list_ROOT, L_instance_2); not_reached(); } else { if (!transcendentalZtranscendentalZCdouble_e_initialized) abort(); L_temp_7 = transcendentalZtranscendentalZCdouble_e; L_PCTobject_class = (*(heapptr_t *)((char *)L_base_2.heapptr + 0)); L_temp_8 = (&dylanZdylan_visceraZCLS_double_float_HEAP == L_PCTobject_class); if (L_temp_8) { L_result = (L_temp_7 == double_float_value(L_base_2.heapptr)); } else { L_result = 0; } if (L_result) { L_condition_2 = 1; } else { if (!transcendentalZtranscendentalZCsingle_e_initialized) abort(); L_temp_9 = transcendentalZtranscendentalZCsingle_e; if ((&dylanZdylan_visceraZCLS_single_float_HEAP == L_PCTobject_class)) { L_result_2 = (L_temp_9 == L_base_2.dataword.f); } else { L_result_2 = 0; } L_condition_2 = L_result_2; } if (L_condition_2) { L_y = log(((float)A_x)); } else { if ((&dylanZdylan_visceraZCLS_integer_HEAP == L_PCTobject_class)) { L_result_3 = (10 == L_base_2.dataword.l); } else { L_result_3 = 0; } if (L_result_3) { L_temp_10 = 1; } else { if (L_temp_8) { L_result_4 = (0.1e2 == double_float_value(L_base_2.heapptr)); } else { L_result_4 = 0; } L_temp_10 = L_result_4; } if (L_temp_10) { L_condition_3 = 1; } else { if ((&dylanZdylan_visceraZCLS_single_float_HEAP == L_PCTobject_class)) { L_result_5 = (0.1e2 == L_base_2.dataword.f); } else { L_result_5 = 0; } L_condition_3 = L_result_5; } if (L_condition_3) { L_y = log10(((float)A_x)); } else { L_arg0 = log(((float)A_x)); if (L_temp_8) { L_arg1 = log(double_float_value(L_base_2.heapptr)); L_temp_11.heapptr = make_double_float((((double)L_arg0) / L_arg1)); L_temp_11.dataword.l = 0; dylanZdylan_visceraZtype_error_FUN(orig_sp, L_temp_11, &dylanZdylan_visceraZCLS_single_float_HEAP); not_reached(); } else { dylanZdylan_visceraZtype_error_FUN(orig_sp, L_base_2, &dylanZdylan_visceraZCLS_double_float_HEAP); not_reached(); } } } return L_y; } } } double transcendentalZtranscendentalZlogn_METH(descriptor_t *orig_sp, double A_x , descriptor_t A_b , heapptr_t A2) { heapptr_t L_instance; descriptor_t L_temp; double L_y; L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); L_temp.heapptr = &SYM_base_HEAP; L_temp.dataword.l = 0; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; (*(descriptor_t *)((char *)L_instance + 8 + 1 * sizeof(descriptor_t))) = A_b; L_y = transcendentalZtranscendentalZlog_METH_4(orig_sp, A_x, &dylanZempty_list_ROOT, L_instance, A_b); return L_y; } float transcendentalZtranscendentalZlogn_METH_2(descriptor_t *orig_sp, float A_x , descriptor_t A_b , heapptr_t A2) { heapptr_t L_instance; descriptor_t L_temp; float L_y; L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); L_temp.heapptr = &SYM_base_HEAP; L_temp.dataword.l = 0; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; (*(descriptor_t *)((char *)L_instance + 8 + 1 * sizeof(descriptor_t))) = A_b; L_y = transcendentalZtranscendentalZlog_METH_5(orig_sp, A_x, &dylanZempty_list_ROOT, L_instance, A_b); return L_y; } float transcendentalZtranscendentalZlogn_METH_3(descriptor_t *orig_sp, long A_x , descriptor_t A_b , heapptr_t A2) { heapptr_t L_instance; descriptor_t L_temp; float L_y; L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 2, dylanZfalse); L_temp.heapptr = &SYM_base_HEAP; L_temp.dataword.l = 0; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; (*(descriptor_t *)((char *)L_instance + 8 + 1 * sizeof(descriptor_t))) = A_b; L_y = transcendentalZtranscendentalZlog_METH_6(orig_sp, A_x, &dylanZempty_list_ROOT, L_instance, A_b); return L_y; } long transcendentalZtranscendentalZisqrt_METH(descriptor_t *orig_sp, long A_x , heapptr_t A1) { descriptor_t *cluster_0_top; heapptr_t L_instance; descriptor_t L_temp; descriptor_t L_temp_2; float L_arg0; if ((A_x < 0)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp.heapptr = transcendentalZliteral_2.heapptr; L_temp.dataword.l = A_x; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; L_temp_2.heapptr = &transcendentalZstr_ROOT; L_temp_2.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_2, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_arg0 = sqrt(((float)A_x)); return ((long)floor(L_arg0)); } } descriptor_t * transcendentalZtranscendentalZisqrt_METH_GENERIC(descriptor_t *orig_sp, heapptr_t A_self , long A_nargs , heapptr_t A_next_method_info ) { descriptor_t *cluster_0_top; void * L_args; descriptor_t L_arg; long L_arg_2; long L_result0; descriptor_t L_temp; L_args = ((void *)(orig_sp - 1)); L_arg = (((descriptor_t *)L_args)[0]); L_arg_2 = L_arg.dataword.l; orig_sp = L_args; L_result0 = transcendentalZtranscendentalZisqrt_METH(orig_sp, L_arg_2, A_next_method_info); L_temp.heapptr = transcendentalZliteral_2.heapptr; L_temp.dataword.l = L_result0; orig_sp[0] = L_temp; return orig_sp + 1; } float transcendentalZtranscendentalZsqrt_METH_3(descriptor_t *orig_sp, long A_x , heapptr_t A1) { descriptor_t *cluster_0_top; heapptr_t L_instance; descriptor_t L_temp; descriptor_t L_temp_2; float L_y; if ((A_x < 0)) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp.heapptr = transcendentalZliteral_2.heapptr; L_temp.dataword.l = A_x; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; L_temp_2.heapptr = &transcendentalZstr_ROOT; L_temp_2.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_2, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_y = sqrtf(((float)A_x)); return L_y; } } float transcendentalZtranscendentalZsqrt_METH_2(descriptor_t *orig_sp, float A_x , heapptr_t A1) { descriptor_t *cluster_0_top; heapptr_t L_instance; descriptor_t L_temp; descriptor_t L_temp_2; float L_y; if ((A_x < ((float)0))) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp.heapptr = transcendentalZliteral.heapptr; L_temp.dataword.f = A_x; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; L_temp_2.heapptr = &transcendentalZstr_ROOT; L_temp_2.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_2, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_y = sqrtf(A_x); return L_y; } } double transcendentalZtranscendentalZsqrt_METH(descriptor_t *orig_sp, double A_x , heapptr_t A1) { descriptor_t *cluster_0_top; heapptr_t L_instance; descriptor_t L_temp; descriptor_t L_temp_2; double L_y; if ((A_x < ((double)0))) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp.heapptr = make_double_float(A_x); L_temp.dataword.l = 0; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; L_temp_2.heapptr = &transcendentalZstr_ROOT; L_temp_2.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_2, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_y = sqrt(A_x); return L_y; } } float transcendentalZtranscendentalZexp_METH_3(descriptor_t *orig_sp, long A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = expf(((float)A_x)); return L_y; } float transcendentalZtranscendentalZexp_METH_2(descriptor_t *orig_sp, float A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = expf(A_x); return L_y; } double transcendentalZtranscendentalZexp_METH(descriptor_t *orig_sp, double A_x , heapptr_t A1) { descriptor_t *cluster_0_top; double L_y; L_y = exp(A_x); return L_y; } float transcendentalZtranscendentalZsin_METH_3(descriptor_t *orig_sp, long A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = sinf(((float)A_x)); return L_y; } float transcendentalZtranscendentalZsin_METH_2(descriptor_t *orig_sp, float A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = sinf(A_x); return L_y; } double transcendentalZtranscendentalZsin_METH(descriptor_t *orig_sp, double A_x , heapptr_t A1) { descriptor_t *cluster_0_top; double L_y; L_y = sin(A_x); return L_y; } float transcendentalZtranscendentalZcos_METH_3(descriptor_t *orig_sp, long A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = cosf(((float)A_x)); return L_y; } float transcendentalZtranscendentalZcos_METH_2(descriptor_t *orig_sp, float A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = cosf(A_x); return L_y; } double transcendentalZtranscendentalZcos_METH(descriptor_t *orig_sp, double A_x , heapptr_t A1) { descriptor_t *cluster_0_top; double L_y; L_y = cos(A_x); return L_y; } float transcendentalZtranscendentalZtan_METH_3(descriptor_t *orig_sp, long A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = tanf(((float)A_x)); return L_y; } float transcendentalZtranscendentalZtan_METH_2(descriptor_t *orig_sp, float A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = tanf(A_x); return L_y; } double transcendentalZtranscendentalZtan_METH(descriptor_t *orig_sp, double A_x , heapptr_t A1) { descriptor_t *cluster_0_top; double L_y; L_y = tan(A_x); return L_y; } extern struct heapobj transcendentalZstr_ROOT_3; float transcendentalZtranscendentalZasin_METH_3(descriptor_t *orig_sp, long A_x , heapptr_t A1) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; descriptor_t L_temp_2; float L_y; if ((A_x < -1)) { L_condition = 1; } else { L_condition = (1 < A_x); } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp.heapptr = transcendentalZliteral_2.heapptr; L_temp.dataword.l = A_x; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; L_temp_2.heapptr = &transcendentalZstr_ROOT_3; L_temp_2.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_2, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_y = asinf(((float)A_x)); return L_y; } } float transcendentalZtranscendentalZasin_METH_2(descriptor_t *orig_sp, float A_x , heapptr_t A1) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; descriptor_t L_temp_2; float L_y; if ((A_x < ((float)-1))) { L_condition = 1; } else { L_condition = (((float)1) < A_x); } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp.heapptr = transcendentalZliteral.heapptr; L_temp.dataword.f = A_x; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; L_temp_2.heapptr = &transcendentalZstr_ROOT_3; L_temp_2.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_2, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_y = asinf(A_x); return L_y; } } double transcendentalZtranscendentalZasin_METH(descriptor_t *orig_sp, double A_x , heapptr_t A1) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; descriptor_t L_temp_2; double L_y; if ((A_x < ((double)-1))) { L_condition = 1; } else { L_condition = (((double)1) < A_x); } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp.heapptr = make_double_float(A_x); L_temp.dataword.l = 0; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; L_temp_2.heapptr = &transcendentalZstr_ROOT_3; L_temp_2.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_2, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_y = asin(A_x); return L_y; } } float transcendentalZtranscendentalZacos_METH_3(descriptor_t *orig_sp, long A_x , heapptr_t A1) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; descriptor_t L_temp_2; float L_y; if ((A_x < -1)) { L_condition = 1; } else { L_condition = (1 < A_x); } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp.heapptr = transcendentalZliteral_2.heapptr; L_temp.dataword.l = A_x; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; L_temp_2.heapptr = &transcendentalZstr_ROOT_3; L_temp_2.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_2, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_y = acosf(((float)A_x)); return L_y; } } float transcendentalZtranscendentalZacos_METH_2(descriptor_t *orig_sp, float A_x , heapptr_t A1) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; descriptor_t L_temp_2; float L_y; if ((A_x < ((float)-1))) { L_condition = 1; } else { L_condition = (((float)1) < A_x); } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp.heapptr = transcendentalZliteral.heapptr; L_temp.dataword.f = A_x; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; L_temp_2.heapptr = &transcendentalZstr_ROOT_3; L_temp_2.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_2, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_y = acosf(A_x); return L_y; } } double transcendentalZtranscendentalZacos_METH(descriptor_t *orig_sp, double A_x , heapptr_t A1) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; descriptor_t L_temp_2; double L_y; if ((A_x < ((double)-1))) { L_condition = 1; } else { L_condition = (((double)1) < A_x); } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 1, dylanZfalse); L_temp.heapptr = make_double_float(A_x); L_temp.dataword.l = 0; (*(descriptor_t *)((char *)L_instance + 8 + 0 * sizeof(descriptor_t))) = L_temp; L_temp_2.heapptr = &transcendentalZstr_ROOT_3; L_temp_2.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp_2, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_y = acos(A_x); return L_y; } } float transcendentalZtranscendentalZatan_METH_3(descriptor_t *orig_sp, long A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = atanf(((float)A_x)); return L_y; } float transcendentalZtranscendentalZatan_METH_2(descriptor_t *orig_sp, float A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = atanf(A_x); return L_y; } double transcendentalZtranscendentalZatan_METH(descriptor_t *orig_sp, double A_x , heapptr_t A1) { descriptor_t *cluster_0_top; double L_y; L_y = atan(A_x); return L_y; } extern struct heapobj transcendentalZstr_ROOT_4; float transcendentalZtranscendentalZatan2_METH_9(descriptor_t *orig_sp, long A_y , long A_x , heapptr_t A2) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; float L_z; if ((A_y == 0)) { L_condition = (A_x == 0); } else { L_condition = 0; } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 0, dylanZfalse); L_temp.heapptr = &transcendentalZstr_ROOT_4; L_temp.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_z = atan2f(((float)A_y), ((float)A_x)); return L_z; } } float transcendentalZtranscendentalZatan2_METH_5(descriptor_t *orig_sp, float A_y , float A_x , heapptr_t A2) { descriptor_t *cluster_0_top; float L_b; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; float L_z; L_b = ((float)0); if ((A_y == L_b)) { L_condition = (A_x == L_b); } else { L_condition = 0; } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 0, dylanZfalse); L_temp.heapptr = &transcendentalZstr_ROOT_4; L_temp.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_z = atan2f(A_y, A_x); return L_z; } } double transcendentalZtranscendentalZatan2_METH(descriptor_t *orig_sp, double A_y , double A_x , heapptr_t A2) { descriptor_t *cluster_0_top; double L_b; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; double L_z; L_b = ((double)0); if ((A_y == L_b)) { L_condition = (A_x == L_b); } else { L_condition = 0; } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 0, dylanZfalse); L_temp.heapptr = &transcendentalZstr_ROOT_4; L_temp.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_z = atan2(A_y, A_x); return L_z; } } double transcendentalZtranscendentalZatan2_METH_3(descriptor_t *orig_sp, double A_y , long A_x , heapptr_t A2) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; double L_z; if ((A_y == ((double)0))) { L_condition = (A_x == 0); } else { L_condition = 0; } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 0, dylanZfalse); L_temp.heapptr = &transcendentalZstr_ROOT_4; L_temp.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_z = atan2(A_y, ((double)A_x)); return L_z; } } float transcendentalZtranscendentalZatan2_METH_6(descriptor_t *orig_sp, float A_y , long A_x , heapptr_t A2) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; float L_z; if ((A_y == ((float)0))) { L_condition = (A_x == 0); } else { L_condition = 0; } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 0, dylanZfalse); L_temp.heapptr = &transcendentalZstr_ROOT_4; L_temp.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_z = atan2f(A_y, ((float)A_x)); return L_z; } } float transcendentalZtranscendentalZatan2_METH_8(descriptor_t *orig_sp, long A_y , float A_x , heapptr_t A2) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; float L_z; if ((A_y == 0)) { L_condition = (A_x == ((float)0)); } else { L_condition = 0; } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 0, dylanZfalse); L_temp.heapptr = &transcendentalZstr_ROOT_4; L_temp.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_z = atan2f(((float)A_y), A_x); return L_z; } } double transcendentalZtranscendentalZatan2_METH_7(descriptor_t *orig_sp, long A_y , double A_x , heapptr_t A2) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; double L_z; if ((A_y == 0)) { L_condition = (A_x == ((double)0)); } else { L_condition = 0; } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 0, dylanZfalse); L_temp.heapptr = &transcendentalZstr_ROOT_4; L_temp.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_z = atan2(((double)A_y), A_x); return L_z; } } double transcendentalZtranscendentalZatan2_METH_2(descriptor_t *orig_sp, double A_y , float A_x , heapptr_t A2) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; double L_z; if ((A_y == ((double)0))) { L_condition = (A_x == ((float)0)); } else { L_condition = 0; } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 0, dylanZfalse); L_temp.heapptr = &transcendentalZstr_ROOT_4; L_temp.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_z = atan2(A_y, ((double)A_x)); return L_z; } } double transcendentalZtranscendentalZatan2_METH_4(descriptor_t *orig_sp, float A_y , double A_x , heapptr_t A2) { descriptor_t *cluster_0_top; boolean L_condition; heapptr_t L_instance; descriptor_t L_temp; double L_z; if ((A_y == ((float)0))) { L_condition = (A_x == ((double)0)); } else { L_condition = 0; } if (L_condition) { L_instance = dylanZdylan_visceraZCLS_simple_object_vector_MAKER_FUN(orig_sp, 0, dylanZfalse); L_temp.heapptr = &transcendentalZstr_ROOT_4; L_temp.dataword.l = 0; dylanZdylan_visceraZerror_METH(orig_sp, L_temp, &dylanZempty_list_ROOT, L_instance); not_reached(); } else { L_z = atan2(((double)A_y), A_x); return L_z; } } float transcendentalZtranscendentalZsinh_METH_3(descriptor_t *orig_sp, long A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = sinf(((float)A_x)); return L_y; } float transcendentalZtranscendentalZsinh_METH_2(descriptor_t *orig_sp, float A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = sinf(A_x); return L_y; } double transcendentalZtranscendentalZsinh_METH(descriptor_t *orig_sp, double A_x , heapptr_t A1) { descriptor_t *cluster_0_top; double L_y; L_y = sinh(A_x); return L_y; } float transcendentalZtranscendentalZcosh_METH_3(descriptor_t *orig_sp, long A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = cosf(((float)A_x)); return L_y; } float transcendentalZtranscendentalZcosh_METH_2(descriptor_t *orig_sp, float A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = cosf(A_x); return L_y; } double transcendentalZtranscendentalZcosh_METH(descriptor_t *orig_sp, double A_x , heapptr_t A1) { descriptor_t *cluster_0_top; double L_y; L_y = cosh(A_x); return L_y; } float transcendentalZtranscendentalZtanh_METH_3(descriptor_t *orig_sp, long A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = tanf(((float)A_x)); return L_y; } float transcendentalZtranscendentalZtanh_METH_2(descriptor_t *orig_sp, float A_x , heapptr_t A1) { descriptor_t *cluster_0_top; float L_y; L_y = tanf(A_x); return L_y; } double transcendentalZtranscendentalZtanh_METH(descriptor_t *orig_sp, double A_x , heapptr_t A1) { descriptor_t *cluster_0_top; double L_y; L_y = tanh(A_x); return L_y; }