lux.compiler.host$compile_LuxRT_frac_methods.class Maven / Gradle / Ivy
Go to download
Show more of this group Show more artifacts with this name
Show all versions of luxc-jvm Show documentation
Show all versions of luxc-jvm Show documentation
The JVM compiler for the Lux programming language.
The newest version!
???? 1H ,lux/compiler/host$compile_LuxRT_frac_methods clojure/lang/AFunction host.clj const__0 Ljava/lang/Object; const__1 Lclojure/lang/Var; const__2 const__3 const__4 const__5 const__6 const__7 const__8 const__9 const__10 const__11 const__12 const__13 const__14 const__15 const__16 const__17 const__18 const__19 const__20 const__21 const__22 ()V @ java/lang/Long # valueOf (J)Ljava/lang/Long; % &
$ ' ) clojure.core + + - clojure/lang/RT / var 8(Ljava/lang/String;Ljava/lang/String;)Lclojure/lang/Var; 1 2
0 3 clojure/lang/Var 5 7
9 lux.compiler.host ; low-4b = ? C int E
G K high-4b M O double Q S java/lang/Double U (D)Ljava/lang/Double; % W
V X Z \ swap2 ^ ` b f
j swap2x1 l n dec p r v long x z bit-set-64? | ~ byte ? ? inc ? ? lux.compiler.base ? wrap-long ? ? ?
? invoke &(Ljava/lang/Object;)Ljava/lang/Object; org/objectweb/asm/ClassWriter ? org/objectweb/asm/Opcodes ?
ACC_PUBLIC I ? ? ? ?
ACC_STATIC ? ? ? ? clojure/lang/Numbers ? add (JJ)J ? ?
? ? intCast (J)I ? ?
0 ? mul_frac ? java/lang/String ? ? [Ljava/lang/String; ? visitMethod m(ILjava/lang/String;Ljava/lang/String;Ljava/lang/String;[Ljava/lang/String;)Lorg/objectweb/asm/MethodVisitor; ? ?
? ? org/objectweb/asm/MethodVisitor ? visitCode ?
? ? LLOAD ? ? ? ? visitVarInsn (II)V ? ?
? ?
getRawRoot ()Ljava/lang/Object; ? ?
6 ? clojure/lang/IFn ? ? ? ? ? LMUL ? ? ? ? visitInsn (I)V ? ?
? ? java/lang/Integer ? (I)Ljava/lang/Integer; % ?
? ? visitLdcInsn (Ljava/lang/Object;)V ? ?
? ? LUSHR ? ? ? ? LADD ? ? ? ? LRETURN ? ? ? ? visitMaxs ? ?
? ? visitEnd ?
? ? G__21579 div_frac ? LDIV ? ? ? ? LSHL ? ? ? ? G__21583 frac-to-real ? (J)D ? L2D ? ? ? ? java/lang/Number ?
doubleCast (Ljava/lang/Object;)D ? ?
0 ? java/lang/Math ? pow (DD)D ?
? (D)D ?
0 DDIV ? ? DADD ? ?
DRETURN ? ?
G__21587 real-to-frac (D)J DLOAD ? ? DREM ? ? DMUL ? ? DUP2 ? ? D2L ? ?! G__21591 org/objectweb/asm/Label$
% ? times5' (I[B)[B)
visitLabel (Lorg/objectweb/asm/Label;)V+,
?- ILOAD/ ? ?0 IFGE2 ? ?3
visitJumpInsn (ILorg/objectweb/asm/Label;)V56
?7 ALOAD9 ? ?: ARETURN<