Single Array Returning Double

Dear visitor, welcome to Jabaco - Community. If this is your first visit here, please read the Help. It explains in detail how this page works. To use all features of this page, you should consider registering. Please use the registration form, to register here or read more information about the registration process. If you are already registered, please login here.

vpr

Beginner

Posts: 30

Date of registration: May 21st 2014

Saturday, December 24th 2016, 2:53am

Can anyone explain why I get a double when I pass the TypeName function a value from a single array? This code produces:

java.lang.Double
java.lang.Float

	Jabaco Source
1 2 3 4 5 6 7 8 9 10 11	Dim x(0) As Single Dim y As Single Public Sub Form_Load() x(0)=0 Debug.Print(TypeName(x(0))) Debug.Print(TypeName(y)) End Sub

This post has been edited 1 times, last edit by "vpr" (Dec 24th 2016, 2:58am)

Go to the top of the page

Dani

Intermediate

Posts: 325

Date of registration: Nov 19th 2009

Location: GERMANY

Monday, December 26th 2016, 7:15pm

Hey there,
I don't know if it is intentionally meant or a mistake, but I found this in the VBA tree of the framework:
svn\Framework\src\VBA\VBArray.java

Source code

...
	public static VBArraySingle createVBArray(float[] val) throws Exception {
		return (new VBArray(val));
	}
...
        public VBArray(float[] val) throws Exception {
		setBound(0, val.length-1, false);
		for (int i = 0; i <= val.length-1; i++)	setValueDbl(i, val[i]);
	}
...
	public void setValueDbl(int Index, double Value) throws Exception {
		setValue (Index, new Double(Value));
	}
...

So we got a float being passed to setValueDbl(...) !!

Dani

latest Jabaco.jar:
Jabaco.jar on bitbucket since other links are down !!
Jabaco Framework source:
https://code.google.com/p/jabacoframework/source/list