Count Ada statements in files
Date/Time of Processing: Wednesday 25 May 1994 12:52:55Am Overall Assessment of System: OK Classification of System: B Basis of Classification -- Syntax Errors PASS Completeness PASS Independence from External Libraries PASS Independence from a Specific Ada Compiler FAIL Explanations for failures -- System contains compiler-specific pragmas or uses Machine_Code Number of ... Files 1 Library Units 1 Lines 248 Statements 82 Comments 106
languages/ada/asr/components/cas3: File Name Size --------- ---- cas3.zip 4,814 Totals ============== ============== 1 Files 4,814
This procedure calculates the "STATEMENTS" of a valid Ada fragment specified by a FILE_NAME string parameter. It need not be a complete compilation unit, but it should have closed all open parens and strings. The Ada statement is defined by a semicolon terminator outside of comments, parentheses, or string or character literals. This definition is insensitive to formatting or layout of the source. There are exotic cases for which this will misestimate the count but we have never encountered one in real code. This procedure is derived from Bill Whitaker's original COUNT_OF_ADA_STATEMENTS.
DATE VERSION AUTHOR HISTORY 19850215 1.0 R Conn Initial Release 19850506 1.1 R Conn Overflow Traps Added 19850624 1.2 R Conn Bug in Single-Quote Proc Fixed 19890106 1.3 R Conn Improved Ada style; removed need for CSET package
This software is released to the Public Domain (note: software released to the Public Domain is not subject to copyright protection).
This software and its documentation are provided "AS IS" and without any expressed or implied warranties whatsoever. No warranties as to performance, merchantability, or fitness for a particular purpose exist. The user is advised to test the software thoroughly before relying on it. The user must assume the entire risk and liability of using this software. In no event shall any person or organization of people be held responsible for any direct, indirect, consequential or inconsequential damages or lost profits.