luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

ClassStat: Add the flag for test modules.

Browse source 
[GB.UTIL]
* NEW: ClassStat: Add the flag for test modules.
This commit is contained in:
gambas 2020-05-22 16:02:12 +02:00
parent 9022603257
commit f55faedede
3 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
comp/src/gb.util/.src/Class.class
View file

@ -90,6 +90,7 @@ Static Public Sub Stat(Name As String) As ClassStat
hStat.Optional = BTst(iFlag, 2)
hStat.NoCreate = BTst(iFlag, 3)
hStat.HasFast = BTst(iFlag, 4)
hStat.Test = BTst(iFlag, 5)
GotoNextSection(hFile) ' description
GotoNextSection(hFile) ' constant

1
comp/src/gb.util/.src/ClassStat.class
View file

@ -9,3 +9,4 @@ Public HasFast As Boolean
Public AutoCreate As Boolean
Public NoCreate As Boolean
Public Optional As Boolean
Public Test As Boolean

4
comp/src/gb.util/.src/MMain.module
View file

@ -20,7 +20,9 @@ Public Sub Main()
'Print String.PadLeft("Gambas", 16, "×->")
'Print String.PadRight("Gambas", 16, "×->")
Print Now;; Date.ToISO8601(Now);; Date.ToISO8601(Now, "-0200")
'Print Now;; Date.ToISO8601(Now);; Date.ToISO8601(Now, "-0200")
Print DateAdd(Date.EasterDay(2020), gb.Day, 40)
End