*** empty log message ***
[m17n/m17n-docs.git] / utils / usr_filter.rb
index 5d33691..05e3fe8 100755 (executable)
@@ -23,17 +23,22 @@ while gets
   gsub!(/\$[A-Z_]+/) {|m| m.delete!("$").reverse.downcase!.concat(" b@").reverse}
 
    case  $_
-     when /^$/
+     when /^\s*$/
        if doxy == 1 
            buf.push($_)
           end
-     when /\/\/\/\// 
+     when /\/\*=\*\// 
        commentblock(buf)
        buf = []
    
-     when /\/\*\s.*\*\//       # /* comment */ type comment
+     when /^\/\*\s.*\*\//      # /* comment */ type comment
        if doxy == 1            
        buf.push($_.gsub!(/\*\//, " ").gsub!(/\/\*/, "//")) # should be included only in the example code
+       end
+
+     when /\/\*\s.*\*\//       # code + /* comment */ type comment
+       if doxy == 1            
+       buf.push($_.gsub!(/\*\//, " ").gsub!(/\/\*/, "//")) # should be included in the example code
        else
           if doxy == 0 
          commentblock(buf)
@@ -41,6 +46,7 @@ while gets
          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