Thanks a lot, and I even realized it can be NIL but forgot to apply it to this logic.
I'll add checks to all such statements, later we may optimize out those not necessary. I'll commit ASAP. Brgds, Viktor On Thu, May 7, 2009 at 5:58 PM, Przemyslaw Czerpak <[email protected]>wrote: > On Thu, 07 May 2009, [email protected] wrote: > > Hi, > > > 2009-05-07 08:55 UTC+0200 Viktor Szakats (harbour.01 syenar hu) > > * source/rtl/tget.prg > > + Added TIMESTAMP support for GETs. > > % Optimizations using SWITCH and FOR EACH. > > Thank you very much anyhow there is one problem with above modification. > SWITCH accepts only integer and string values and ::cType in GET class > is NIL in some cases so when you use > SWITCH ::cType > then RT error is generated for NIL value: > Error BASE/3104 Argument error: SWITCH > You should 1-st test for NIL, f.e. tget.prg[1123] should look like: > > IF Empty( ::cPicMask ) .OR. ::cPicture == NIL && ::cType != NIL > > SWITCH ::cType > CASE "D" > [...] > > best regards, > Przemek > _______________________________________________ > Harbour mailing list > [email protected] > http://lists.harbour-project.org/mailman/listinfo/harbour >
_______________________________________________ Harbour mailing list [email protected] http://lists.harbour-project.org/mailman/listinfo/harbour
