History

Copied some more missing native modules

Dmitry Kabak (userdima committed 13 years ago

Commit d8adc111 parent 92189294 files · +159 −0Browse files

Showing the changes to java (4 of 4 files). Show all

Unified · Split

4 files
  1. java/pkg/java/lang/Double_L.b +66 −0
  2. java/pkg/java/lang/Double_L.m +17 −0
  3. java/pkg/java/lang/Float_L.b +60 −0
  4. java/pkg/java/lang/Float_L.m +16 −0
java/pkg/java/lang/Double_L.b+66−0
@@ -0,0 +1,66 @@
1+implement Double_L;
2+
3+# javal v1.3 generated file: edit with care
4+
5+include "jni.m";
6+ jni : JNI;
7+ ClassModule,
8+ JString,
9+ JArray,
10+ JArrayI,
11+ JArrayC,
12+ JArrayB,
13+ JArrayS,
14+ JArrayJ,
15+ JArrayF,
16+ JArrayD,
17+ JArrayZ,
18+ JArrayJObject,
19+ JArrayJClass,
20+ JArrayJString,
21+ JClass,
22+ JThread,
23+ JObject : import jni;
24+
25+#>> extra pre includes here
26+
27+#<<
28+
29+include "Double_L.m";
30+
31+#>> extra post includes here
32+math : Math;
33+#<<
34+
35+init( jni_p : JNI )
36+{
37+ # save java native inteface mod instance
38+ jni = jni_p;
39+ #>>extra initialization here
40+ math = jni->math;
41+ #<<
42+}
43+
44+doubleToRawLongBits_D_J( p0 : real) : big
45+{#>>
46+ return( math->realbits64(p0) );
47+}#<<
48+
49+longBitsToDouble_J_D( p0 : big) : real
50+{#>>
51+ return( math->bits64real( p0 ) );
52+}#<<
53+
54+valueOf0_rString_D( p0 : JString) : real
55+{#>>
56+ return( real p0.str );
57+}#<<
58+
59+mkstring_D_rString( p0 : real) : JString
60+{#>>
61+ s := string p0;
62+ if(p0 == 0.0)
63+ s += ".0";
64+ return( jni->NewString( s ) );
65+}#<<
66+
java/pkg/java/lang/Double_L.m+17−0
@@ -0,0 +1,17 @@
1+# javal v1.3 generated file: edit with care
2+
3+Double_L : module
4+{
5+ Double_obj : adt
6+ {
7+ cl_mod : ClassModule;
8+ value : real;
9+ };
10+
11+ init : fn( jni_p : JNI );
12+ doubleToRawLongBits_D_J : fn( p0 : real) : big;
13+ longBitsToDouble_J_D : fn( p0 : big) : real;
14+ valueOf0_rString_D : fn( p0 : JString) : real;
15+ mkstring_D_rString : fn( p0 : real) : JString;
16+
17+};
java/pkg/java/lang/Float_L.b+60−0
@@ -0,0 +1,60 @@
1+implement Float_L;
2+
3+# javal v1.3 generated file: edit with care
4+
5+include "jni.m";
6+ jni : JNI;
7+ ClassModule,
8+ JString,
9+ JArray,
10+ JArrayI,
11+ JArrayC,
12+ JArrayB,
13+ JArrayS,
14+ JArrayJ,
15+ JArrayF,
16+ JArrayD,
17+ JArrayZ,
18+ JArrayJObject,
19+ JArrayJClass,
20+ JArrayJString,
21+ JClass,
22+ JThread,
23+ JObject : import jni;
24+
25+#>> extra pre includes here
26+
27+#<<
28+
29+include "Float_L.m";
30+
31+#>> extra post includes here
32+math : Math;
33+#<<
34+
35+init( jni_p : JNI )
36+{
37+ # save java native inteface mod instance
38+ jni = jni_p;
39+ #>>extra initialization here
40+ math = jni->math;
41+ #<<
42+}
43+
44+floatToRawIntBits_F_I( p0 : real) : int
45+{#>>
46+ return( math->realbits32(p0) );
47+}#<<
48+
49+intBitsToFloat_I_F( p0 : int) : real
50+{#>>
51+ return( math->bits32real(p0) );
52+}#<<
53+
54+mkstring_F_rString( p0 : real) : JString
55+{#>>
56+ s := string p0;
57+ if(p0 == 0.0)
58+ s += ".0";
59+ return( jni->NewString( s ) );
60+}#<<
java/pkg/java/lang/Float_L.m+16−0
@@ -0,0 +1,16 @@
1+# javal v1.3 generated file: edit with care
2+
3+Float_L : module
4+{
5+ Float_obj : adt
6+ {
7+ cl_mod : ClassModule;
8+ value : real;
9+ };
10+
11+ init : fn( jni_p : JNI );
12+ floatToRawIntBits_F_I : fn( p0 : real) : int;
13+ intBitsToFloat_I_F : fn( p0 : int) : real;
14+ mkstring_F_rString : fn( p0 : real) : JString;
15+
16+};