Count Ada statements in files
Date/Time of Processing: Wednesday 25 May 1994 10:59:43Am Overall Assessment of System: OK Classification of System: A Basis of Classification -- Syntax Errors PASS Completeness PASS Independence from External Libraries PASS Independence from a Specific Ada Compiler PASS Number of ... Files 1 Library Units 1 Lines 135 Statements 54 Comments 40
languages/ada/asr/components/countada: File Name Size --------- ---- countada.zip 4,281 Totals ============== ============== 1 Files 4,281
This function 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 parentheses and and string brackets. The number of statements of code is returned as an integer. The Ada statement is defined by a semicolon terminator outside of comments, parentheses, or string or character literals. The definition is insensitive to formatting or layout of the source. This copy of the function is embedded in a test and driver program. The driver has a feature of correcting for the common error of leaving out the extensiOn on a file name. The nature of this extension is system dependent and a ".TXT" extension is used.
DATE VERSION AUTHOR HISTORY 1985 1.0 WIS JPMO Initial Release
This prologue must be included in all copies of this software. This software is copyright by the author. This software is released to the Ada community. This software is released to the Public Domain (note: software released to the Public Domain is not subject to copyright protection). Restrictions on use or distribution: NONE
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.