X-Git-Url: http://git.chise.org/gitweb/?p=m17n%2Fm17n-docs.git;a=blobdiff_plain;f=utils%2Fusr_filter.rb;h=52ac7106df0c672edc174bc6df2b6bdca2f0bbdb;hp=5d336910c7413fc431bd948cd7cd6eba1cf388c5;hb=70c33845161fed9f14fc4564c2cc0b53facd02bb;hpb=e36f44e8303ee937fec2a6d86dbc9e573fb842a5

diff --git a/utils/usr_filter.rb b/utils/usr_filter.rb
index 5d33691..52ac710 100755
--- a/utils/usr_filter.rb
+++ b/utils/usr_filter.rb
@@ -2,6 +2,7 @@
 
 buf = [] 
 doxy = 0
+example = 0
 
 def commentblock(buf)
     unless buf == []	
@@ -22,25 +23,56 @@ while gets
  #make variables in function descriptions shown in bold
   gsub!(/\$[A-Z_]+/) {|m| m.delete!("$").reverse.downcase!.concat(" b@").reverse}
 
-   case  $_
-     when /^$/
-	if doxy == 1 
-           buf.push($_)
-	   end
-     when /\/\/\/\// 
-    	commentblock(buf)
+  if example == 1
+     case $_ 
+      when /#endif/
+        buf.push($_.gsub!(/#endif/, "@endcode"))
+	example = 0
+      else	
+        buf.push($_)
+    end
+
+    else  # when example == 0
+
+     case  $_
+
+      when /^\s*$/                         
+	 if doxy == 1 			    # empty line in doxygen comment
+            buf.push($_)
+	    end
+
+      when /\/\*=\*\//                      #/*=*/ (flush)
+     	commentblock(buf)
     	buf = []
-   
-     when /\/\*\s.*\*\//	# /* comment */ type comment
-	if doxy == 1		
-	buf.push($_.gsub!(/\*\//, " ").gsub!(/\/\*/, "//")) # should be included only in the example code
-	else
+
+      when /\/\* @[{}] \*\//	# /* comment */ type comment 
+     	commentblock(buf)
+    	buf = []
+        print($_)
+
+      when /^\/\*\s.*\*\//	# /* comment */ type comment 
+#	if doxy == 1		
+#	  # should be included only in the example code
+#	  ## We used to do the following substituion as a workaround of
+#	  ## a Doxygen bug.
+# 	  ## buf.push($_.gsub!(/\*\//, " ").gsub!(/\/\*/, "//"))
+#	  buf.push($_)
+#	end
+
+      when /\/\*\s.*\*\//	# code + /* comment */ type comment
+#	if doxy == 1		
+#	  # should be included in the example code
+#	  ## See the above comment.
+#	  ## buf.push($_.gsub!(/\*\//, " ").gsub!(/\/\*/, "//"))
+#	  buf.push($_) # should be included in the example code
+#	else
           if doxy == 0 
-    	  commentblock(buf)
-    	  buf = []
-	  print $_.gsub!(/\/\*\s.*\*\//," ")	            # should be omiited in code
-	  end
+	    commentblock(buf)
+ 	    buf = []
+ 	    print $_.gsub!(/\/\*\s.*\*\//," ") # should be omiited in code
+#	  end
 	end
+
      when /\/\*{2,3}ja.*\*\//	#japanese one liner
      when /\/\*\*en.*\*\//	#one liner
      when /\/\*\*\*en.*\*\//	#one liner
@@ -58,19 +90,13 @@ while gets
         buf.push($_.gsub!(/\/\*+/, " "))
 	doxy = 1
 
+     when /\/\*/	#other comment
+
      when /EXAMPLE_CODE/ 
+	#start example code lines
         buf.push($_.gsub!(/#if EXAMPLE_CODE/, "\n \n @par Example:\n @code"))
-	doxy = 1
+	example = 1
 
-     when /#endif/
-	if doxy == 1
-           buf.push($_.gsub!(/#endif/, "@endcode"))
-	else
-           commentblock(buf)
-    	   buf = []
-	   print $_
-	end
-        doxy = 0
      when /\*\//
 	if doxy == 1
            buf.push($_.gsub!(/\*\//, " "))
@@ -86,6 +112,7 @@ while gets
     	   buf = []
 	   print($_)
         end
+     end	
    end
 end