*** empty log message ***

[m17n/m17n-docs.git] / utils / mkheaderlist.rb

diff --git a/utils/mkheaderlist.rb b/utils/mkheaderlist.rb
new file mode 100755 (executable)
index 0000000..b00d46a
--- /dev/null
+++ b/utils/mkheaderlist.rb
@@ -0,0 +1,32 @@
+#! /usr/bin/ruby
+
+def nextheader(text,index)
+  header = text[index+1..text.size].find{|i| i =~ /\.S(S|H)/} 
+  return header
+  end
+
+grouptext = open("SampleGroup.3","r").readlines.reverse
+
+fd = grouptext.index(grouptext.find{|i| i =~ /SampleFunction/})
+fdheader = nextheader(grouptext,fd)
+
+restofthetext =  grouptext[fd+1..grouptext.size]
+
+fl = restofthetext.index(restofthetext.find{|i| i =~ /SampleFunction/})
+flheader = nextheader(restofthetext,fl)
+
+dd = grouptext.index(grouptext.find{|i| i =~ /long group document/})
+ddheader = nextheader(grouptext,dd)
+
+####
+structext = open("SampleStructure.3","r").readlines.reverse
+
+fieldd = structext.index(structext.find{|i| i =~ /SampleField/})
+fielddheader = nextheader(structext,fieldd)
+
+restofstructext =  structext[fieldd+1..structext.size]
+
+fieldl = restofstructext.index(restofstructext.find{|i| i =~ /SampleField/})
+fieldlheader = nextheader(restofstructext, fieldl)
+
+print fdheader, flheader, ddheader, fielddheader, fieldlheader