Count number of lines of code?

Michel_Bujardet · September 10, 2014, 1:14pm

indeed

Thomas_ROBISSON · September 10, 2014, 1:59pm

?

I open the XML file with TextEdit and I search “”, it answered 8409 lines. Same as your code Michel (of course).

Markus_Winter · September 10, 2014, 2:25pm

61420 lines of my own code, 290211 lines including other people’s code.

Programmed and debugged on the Mac, and first Win compile runs without a hitch

I’m getting good at this [/exuberance]

Kem_Tekinay · September 10, 2014, 2:26pm

If you want to count actual lines of code, ignoring blank lines and lines that contain solely comments, this RegEx pattern in a loop will do it:

^ *<sourceline>(?![ \\t]*(?://|'|REM))[^\\r\
]*[A-Z][^\\r\
]+</sourceline>$

Assuming you read the text in the variable source, this is the code:

dim rx as new RegEx
rx.SearchPattern = "^ *<sourceline>(?![ \\t]*(?://|'|REM))[^\\r\
]*[A-Z][^\\r\
]+</sourceline>$"

dim lineCount as integer
dim match as RegExMatch = rx.Search( source )
while match <> nil
  lineCount = lineCount + 1
  match = rx.Search()
wend

// lineCount has what you need

Kem_Tekinay · September 10, 2014, 2:36pm

Oh, I made that way too complicated. This is the simplified pattern:

^ *<sourceline>[a-z#]

And if you want to ignore the lines that Xojo inserts, e.g., “Sub ”, “Function ”, “End Sub”, and “End Function”, use this:

^ *<sourceline>(?!End Sub|End Function|Sub |Function )[a-z#]

Jeremy_Cowgar · September 10, 2014, 2:41pm

And of course you can stick with the single line grep and feed it the regex Kem came up with:

$ grep -cie "^ *<sourceline>[a-z#]" myProj.xojo_xml_project
21

You could pipe it through wc if you want to get word and character counts:

$ grep -ie "^ *<sourceline>[a-z#]" myProj.xojo_xml_project | wc
      21      63    1086

Kem_Tekinay · September 10, 2014, 2:56pm

Without testing, I’d guess grep would be significantly faster than pure Xojo code. It would also be faster to use RegExMBS instead of the native RegEx, if you can, and I’d expect that speed to approach that of grep.

Jeremy_Cowgar · September 10, 2014, 3:38pm

131ms across 62kloc for grep, did not try Xojo solution.

Markus_Winter · September 11, 2014, 8:06am

Beauty!

Thanks everyone

Michel_Bujardet · September 11, 2014, 11:29am

You should have said you wanted nothing but a RegEx solution

Markus_Winter · September 11, 2014, 11:48am

I didn’t.

I’m grateful for all solutions, however you can only check one post as the answer post, and RegEx gives the best possible speed.

Jeremy_Cowgar · September 11, 2014, 1:30pm

Our of curiosity, what is the speed comparison so we can benefit as well? i.e. time grep … vs. timing the regex?

Thanks Markus!