Ada_SAP: Static Analysis of "tgmtools.adb" [PACKAGE_BODY] ------------------------------------------------------------- Basic Counts: Total Bytes : 19306 Total Lines : 578 Analysis of Source Lines: Lines of Code : 433 Lines of Comments : 52 [+ In-Line Comments: 35 = Total Comments: 87] Blank Lines : 93 Density of Comments : 15.05 % Program Complexity Analysis: Program Control Blocks: 'case' blocks : 4 'exception' blocks : 4 Branches & Iterations: 'if' branches : 22 'elsif' branches : 2 'when' branches : 14 'loop' iterations : 18 Cyclomatic Complexity [if+elsif+when+loop-case+1]: Total CC : 53 Average CC per SubP.: 2 Packages Named in 'WITH' clause/s: Total Count : 0 Instantiated Packages: 1. Float_Io Total Count : 1 Packages made directly visible with USE clause: 1. Float_Io Total Count : 1 Number of SubPrograms Implemented = 29 (local, if not named in corresponding *.ADS file) Procedures: "Create" "Open" "Shift_L" "Shift_L" "Shift_R" "Increment" "Decrement" "GetChoice" "ClearScreen" Total : 9 Functions: "ii" "fi" "bi" "Exist" "ValidDOSName" "ByteCount" "LineCount" "LongestLine" "Capitalize" "StripSpaces" "StripTrailingSpaces" "Lower_Case" "Lower_Case" "Upper_Case" "Upper_Case" "Enclose" "To_Natural" "Repeat" "Repeat" "Char" Total : 20 ============================================================================== Ada_SAP: Static Analysis of "tgmtools.ads" [PACKAGE_SPEC] ------------------------------------------------------------- Basic Counts: Total Bytes : 11468 Total Lines : 306 Analysis of Source Lines: Lines of Code : 80 Lines of Comments : 127 [+ In-Line Comments: 11 = Total Comments: 138] Blank Lines : 99 Density of Comments : 45.10 % Program Complexity Analysis: [no Complexity figures for package specification] Packages Named in 'WITH' clause/s: 1. ADA.TEXT_IO Total Count : 1 Instantiated Packages: Total Count : 0 Packages made directly visible with USE clause: 1. ADA.TEXT_IO Total Count : 1 Number of Public SubPrograms Exported = 37 Number of Private SubPrograms Defined = 0 Procedures: "NL" "NL" "P" "P" "P" "P" "PL" "PL" "Create" "Open" "Shift_L" "Shift_L" "Shift_R" "GetChoice" "Increment" "Decrement" "ClearScreen" Total : 17 Private Procedures: (none) Functions: "ii" "fi" "bi" "Exist" "ValidDOSName" "ByteCount" "LineCount" "LongestLine" "Capitalize" "StripSpaces" "StripTrailingSpaces" "Lower_Case" "Lower_Case" "Upper_Case" "Upper_Case" "Enclose" "To_Natural" "Repeat" "Repeat" "Char" Total : 20 Private Functions: (none) ============================================================================== Sample Screen Output from AdaSAP run ______________________________________________________________________________ Script V1.1 session started Fri Jan 24 03:28:20 1997 C:\ADA95\MYADAP~1\ADASAP > adasap7g sa_pack AdaSAP v0.7g ---------------------------------------------------------------------------- ***** Analysing "sa_pack.ads"... ***** writing to file... ***** DONE! ***** Static Analysis file is "sa_pack.sas" ***** Analysing "sa_pack.adb"... ***** writing to file... ***** DONE! ***** Static Analysis file is "sa_pack.sab" ---------------------------------------------------------------------------- Thank you for testing 'AdaSAP' [PC version 0.7g] Please email comments/bugs/etc to: mayert@sbu.ac.uk C:\ADA95\MYADAP~1\ADASAP > adasap7g sa AdaSAP v0.7g ---------------------------------------------------------------------------- ***** Analysing "sa.ads"... ***** writing to file... ***** DONE! ***** Static Analysis file is "sa.sas" xxxxx No analysis for "sa.adb". File not found. ---------------------------------------------------------------------------- Thank you for testing 'AdaSAP' [PC version 0.7g] Please email comments/bugs/etc to: mayert@sbu.ac.uk C:\ADA95\MYADAP~1\ADASAP > adasap7g client7g AdaSAP v0.7g ---------------------------------------------------------------------------- xxxxx No analysis for "client7g.ads". File not found. ***** Analysing "client7g.adb"... ***** writing to file... ***** DONE! ***** Static Analysis file is "client7g.sab" ---------------------------------------------------------------------------- Thank you for testing 'AdaSAP' [PC version 0.7g] Please email comments/bugs/etc to: mayert@sbu.ac.uk C:\ADA95\MYADAP~1\ADASAP > adasap7g sa_use.adb ! Specified filename is invalid. Max filename length = 8 characters. Do not use .extension. Please try again. C:\ADA95\MYADAP~1\ADASAP > exit Script completed Fri Jan 24 03:31:20 1997