Index: app/src/dgp/dgc
===================================================================
--- app/src/dgp/dgc	(revision 3748bd1db46143a281581cb44dc804da0190cbc2)
+++ app/src/dgp/dgc	(revision 9ace5d204d63628901f9f128d3f99ce5f7c973c0)
@@ -98,4 +98,5 @@
 my $nreq=0;
 my $nlink=0;
+my $nflag=0;
 
 my %cats;
@@ -113,5 +114,4 @@
 	open(OUTPUT, ">$outputfile") or die("Can't open output file: $outputfile!");
 }
-
 
 
@@ -192,4 +192,9 @@
 	    }
 	}
+    }
+    elsif(/^FLAG\s+\S+$/)
+    {
+	++$nflag;
+	print OUTPUT "$_\n"
     }
     elsif(/^$/) {
@@ -249,4 +254,5 @@
 printf STDERR "%6d RIGHT statements\n", $nright;
 printf STDERR "%6d LINK  statements\n", $nlink;
+printf STDERR "%6d FLAG  statements\n", $nflag;