fpt and WinFPT Reference Manual - Command-line Commands
| SimCon Home | Ref Manual Home |
CHECK DATA IN STRUCTURES
Syntax:
[DO NOT] CHECK DATA IN STRUCTURES
Function:
fpt checks for STRUCTURE declarations which contain embedded data.
Fields of structures may be initialised by data by writing a '/' delimited data expression after the field declaration. All records of the structure are then initialised.
Embedded data in structures may cause multiple data initialisation of COMMON blocks. fpt therefore reports all records of structures with embedded data which reside in COMMON blocks. It then reports the number of structures with embedded data, the number used for records in COMMON, and the number of records in COMMON which cause multiple data initialisation of the COMMON blocks.
Where to Use this Command
Operating system command line | Yes |
Configuration file, config.fsp | Yes |
Specification (fsp) files, *.fsp | Yes |
Interactively, to FPT> prompt | Yes |
Interactive command files | Yes |
Embedded in the Fortran code | Yes |
Default
The check is not carried out by default (Note that defaults may be changed in the configuration file).
Examples
The user makes the interactive command:
FPT> check data in struct
fpt reports:
Check of Embedded Data in Structures ==================================== STRUCTURE SAMPLE - records in COMMON blocks: -------------------------------------------- Name Sub-prog/Struct Use/COMMON Address Type Size ---- --------------- ---------- ------- ---- ---- SED EWINI,EW3 PETR 144000 SAMPLE *144 Initialised by embedded data in: EW3,EWINI IGN EWINI,EW3 PETR 0 SAMPLE *144 Initialised by embedded data in: EW3,EWINI -------------------------------------------------------------- Check of Embedded Data in structures Total number of structures with embedded data: 1 Number of structures with embedded data in COMMON: 1 Number records in COMMON initialised in 2 or more sub- programs: 2 --------------------------------------------------------------
See Also
Copyright ©1995 to 2024 Software Validation Ltd. All rights reserved.