FPT and WinFPT Reference Manual - Command-line Commands

| SimCon Home | Reference Manual Home |


SHOW UNUSED LABELS

Syntax:

[DO NOT] SHOW UNUSED LABELS



Function:

FPT lists the statement labels which are unused. For each unused label, FPT reports the file and line on which it occurs and prints the line.

The interactive display may be stopped by the command STOP, which is made to the Page> prompt.

Where to use these commands:

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

No


Example:

A section of an unused label listing is shown below.

FPT> show unused labels

Unused labels
=============

Line:   140,   File: r:\trek7\original_source\treka.for
890   DO 128 i=1,4

Line:   229,   File: r:\trek7\original_source\treka.for
24    FORMAT (F)

Line:   412,   File: r:\trek7\original_source\treka.for
338   IF (ichoe(it) .NE. 1) GOTO 129

Line:   475,   File: r:\trek7\original_source\treka.for
23311 CALL atack

Line:   527,   File: r:\trek7\original_source\treka.for
546   DO 762 i=1,8

Line:   598,   File: r:\trek7\original_source\treka.for
4     temp=FLOAT(MOD(itom,100))/100.0

Line:   659,   File: r:\trek7\original_source\treka.for
21    na=map(i7,i8)

Line:    44,   File: r:\trek7\original_source\trekb.for
24    FORMAT (F)

Line:    45,   File: r:\trek7\original_source\trekb.for
151   IF (warp(it) .GT. twarp(it) .OR. warp(it) .LT. 0) GOTO 6581

Line:   140,   File: r:\trek7\original_source\trekb.for
75    WRITE (l,72)(ibolt(i,js),i=1,4)

Line:   149,   File: r:\trek7\original_source\trekb.for
73    FORMAT (' YOU HAVE',I3,1X,4A4/' ENTER ANGLE: ')

Line:   150,   File: r:\trek7\original_source\trekb.for
77    READ (l,*,ERR=130)angle(it)

Line:   151,   File: r:\trek7\original_source\trekb.for
24    FORMAT (F)

Line:   152,   File: r:\trek7\original_source\trekb.for
 Page>


Copyright ©1995 to 2014 Software Validation Ltd. All rights reserved.