> This fails randomly:
>
> If DateDiff(Now, DateAdd(Date(Now), gb.Day, 2), gb.Day) <> 2 Then
> Return 160
> Endif
>
> Though, today with new revision (3299) I haven't be able to reproduce it.
> I'll look it more closely later.
>
OK, now it fails again.
If DateDiff(Now, DateAdd(Date(Now), gb.Day,
> > But then I don't understand why "Finally" exist...
> > At least that test function is equal without it.
> > Is there proper usage for it, or is it for historical etc reasons?
> >
>
> Finally exists so that you can have some code that is always executed at
> the
> end of the function, even if th
> But then I don't understand why "Finally" exist...
> At least that test function is equal without it.
> Is there proper usage for it, or is it for historical etc reasons?
>
Finally exists so that you can have some code that is always executed at the
end of the function, even if there was an er
But then I don't understand why "Finally" exist...
At least that test function is equal without it.
Is there proper usage for it, or is it for historical etc reasons?
BTW. You didn't get errors from any date commands?
Nor crash from line 1038 of mTest?
I'll send logs about that crash later.
Jussi
> > More...
> >
> > Dim TestSingle As Single
> > Dim pp As Pointer
> >
> > TestSingle = 33.1
> > pp = VarPtr(TestSingle)
> >
> > SinglePtr(pp) = 33.1 is False! Gives -2...
> >
> > Jussi
>
> Actually SinglePtr() cannot work on local variables, because internally
> there is no "Single" local
> More...
>
> Dim TestSingle As Single
> Dim pp As Pointer
>
> TestSingle = 33.1
> pp = VarPtr(TestSingle)
>
> SinglePtr(pp) = 33.1 is False! Gives -2...
>
>
> Jussi
>
Actually SinglePtr() cannot work on local variables, because internally there
is no "Single" local variable, only "Float
> More...
>
> Shouldn't Finally to be read after Catch, not before?
> Now I get:
> TestErrorManagment(1) = 1 <-- Catch is never read!
> TestErrorManagment(2) = 21
>
> I exepected;
> TestErrorManagment(1) = 4
> TestErrorManagment(2) = 21
>
> Right now word Finally doesn't do anything.
>
>
> Pr
More...
Shouldn't Finally to be read after Catch, not before?
Now I get:
TestErrorManagment(1) = 1 <-- Catch is never read!
TestErrorManagment(2) = 21
I exepected;
TestErrorManagment(1) = 4
TestErrorManagment(2) = 21
Right now word Finally doesn't do anything.
Private Function TestErrorManagm
More...
? Week("07/24/2005")
30
Should be 29.
Jussi
On Sat, Nov 13, 2010 at 19:36, Jussi Lahtinen wrote:
> More...
>
> Dim TestSingle As Single
> Dim pp As Pointer
>
> TestSingle = 33.1
> pp = VarPtr(TestSingle)
>
> SinglePtr(pp) = 33.1 is False! Gives -2...
>
>
> Jussi
>
>
>
>
>
> On Fri,
More...
Dim TestSingle As Single
Dim pp As Pointer
TestSingle = 33.1
pp = VarPtr(TestSingle)
SinglePtr(pp) = 33.1 is False! Gives -2...
Jussi
On Fri, Nov 12, 2010 at 23:44, Jussi Lahtinen wrote:
>
> > I'll send my whole project to you later.
>> >
>> > According to documentation this sh
> > I'll send my whole project to you later.
> >
> > According to documentation this should yield True.
> > ? IsBlank(" \\t")
> > I got always False...
>
> It's a typo mistake. Read: IsBlank(" \t")
>
OK.
> >
> > BTW. I'll check all math functions against wolfram|Alpha,
> > so sometimes I'm not s
> I'll send my whole project to you later.
>
> According to documentation this should yield True.
> ? IsBlank(" \\t")
> I got always False...
It's a typo mistake. Read: IsBlank(" \t")
>
> BTW. I'll check all math functions against wolfram|Alpha,
> so sometimes I'm not sure where to put limit of
I'll send my whole project to you later.
According to documentation this should yield True.
? IsBlank(" \\t")
I got always False...
BTW. I'll check all math functions against wolfram|Alpha,
so sometimes I'm not sure where to put limit of acceptable accuracy.
Jussi
2010/11/12 Benoît Minisini
> More from GambasTester project
>
>
> A.
>
> According to documentation these functions are same:
> Debug Ang(-1, 1)
> Debug ATan2(-1, 1)
>
> 2.35619449019235
> -0.785398163397448
>
> So, Atan2 seems to make errors.
The documentation is not accurate enough. Ang() and ATan2() are the same
> > I will look at the log, but I don't understand what you did *exactly* to
> > get
> > the crash.
>
> That is why I wrote "elusive"... I can't figure out what exactly causes
> this crash.
> But copy&paste this to IDE console;
> ? bin(rol(1073741784+ shl(9,2) + shr(24,3),X ),32)
>
> Then replace
More from GambasTester project
A.
According to documentation these functions are same:
Debug Ang(-1, 1)
Debug ATan2(-1, 1)
2.35619449019235
-0.785398163397448
So, Atan2 seems to make errors.
B.
Cos(ACos(0.5)) = 0.5 and Tan(ATan(0.5)) = 0.5 are False!
Tan(ATan(0.5)) - 0.5 gives 1E-16, s
> I will look at the log, but I don't understand what you did *exactly* to
> get
> the crash.
>
That is why I wrote "elusive"... I can't figure out what exactly causes this
crash.
But copy&paste this to IDE console;
? bin(rol(1073741784+ shl(9,2) + shr(24,3),X ),32)
Then replace X with some rando
> Hi!
> I'm doing quick and dirty "GambasTester" project.
> Idea is to fuzz with all commands to find out if all works correctly within
> current revision.
> Of course it is not possible to test all combinations and situations, but
> much better than nothing.
> I know IDE is pretty good tester itse
18 matches
Mail list logo
