kwalify 0.5.0 → 0.5.1

data/ChangeLog

@@ -1,7 +1,12 @@
 .=title:          ChangeLog
-.?release:        $Release: 0.5.0 $
-.?lastupdate:     $Date: 2005-12-17 13:49:16 +0900 (Sat, 17 Dec 2005) $
-.?version:        $Rev: 42 $
+.?release:        $Release: 0.5.1 $
+.?lastupdate:     $Date: 2005-12-20 12:50:56 +0900 (Tue, 20 Dec 2005) $
+.?version:        $Rev: 44 $
+
+
+.: 2005-12-20 (release 0.5.1)
+   .* Enhances:
+      .- add new command-line option '-E' which show errors in emacs-compatible style.
 
 .: 2005-12-17 (release 0.5.0)
    .* Enhances:

data/README.txt

@@ -1,7 +1,7 @@
 .=title:	README
 .?version:	$Rev: 41 $
 .?lastupdate:	$Date: 2005-11-22 03:24:54 +0900 (Tue, 22 Nov 2005) $
-.?release:	$Release: 0.5.0 $
+.?release:	$Release: 0.5.1 $
 
 
 .$ About Kwalify

data/bin/kwalify

@@ -2,7 +2,7 @@
 
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/doc/users-guide.html

@@ -15,7 +15,7 @@
     <div align="left"><h1>Kwalify Users' Guide (for Ruby and Java)</h1></div>
     <div align="left">
       makoto kuwata &lt;kwa(at)kuwata-lab.com&gt;<br>
-      last update: $Date: 2005-12-17 13:49:16 +0900 (Sat, 17 Dec 2005) $<br>
+      last update: $Date: 2005-12-20 12:50:56 +0900 (Tue, 20 Dec 2005) $<br>
     </div>
 
 <a name="preface"></a>
@@ -173,9 +173,17 @@ $ java -classpath kwalify.jar kwalify.Main -m schema.yaml [schema2.yaml ...]
 <dd class="dd3">
 	Show linenumber on which error found.
 </dd>
+<dt class="dt3"><strong>
+<code>-E</code> </strong></dt>
+<dd class="dd3">
+	Show errors in Emacs-compatible style (implies '-l' option).
+</dd>
 </dl>
 <p>Notice that the command-line option <code>-l</code> is an experimental feature, for kwalify command use original YAML parser instead of Syck parser when this option is specified.
 </p>
+<p>If you are an Emacs user, try <code>-E</code> option that show errors in format which Emacs can parse and jump to errors.
+You can use <code>C-x `</code> (next-error) to jump into errors.
+</p>
 <br>
 
 
@@ -195,7 +203,7 @@ validator = Kwalify::Validator.new(schema)  # raises Kwalify::SchemaError if wro
 document = YAML.load_file('document.yaml')
 error_list = validator.validate(document)
 unless error_list.empty?
-   error_list.each do |error|     # error is Kwalify::ValidationError
+   error_list.each do |error|     # error is instance of Kwalify::ValidationError
       puts "[#{error.path}] #{error.message}"
    end
 end
@@ -596,7 +604,7 @@ sequence:
         required:   yes
         pattern:    /@/
       password:
-        type:       text                       # new rule
+        type:       text                      # new rule
         length:     { max: 16, min: 8 }
       age:
         type:       int                       # new rule

data/examples/address-book/address-book.schema.yaml

@@ -1,7 +1,7 @@
 ##
 ## Kwalify schema example for address book
 ##
-## $Release: 0.5.0 $
+## $Release: 0.5.1 $
 ## copyright(c) 2005 kuwata-lab all rights reserved.
 ##
 ##

data/examples/invoice/invoice.schema.yaml

@@ -2,7 +2,7 @@
 ### Kwalify schema example for invoice
 ###
 ### $Rev: 41 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/examples/tapkit/tapkit.schema.yaml

@@ -1,7 +1,7 @@
 ##
 ## Kwalify schema example for TapKit
 ##
-## $Release: 0.5.0 $
+## $Release: 0.5.1 $
 ## copyright(c) 2005 kuwata-lab all rights reserved.
 ##
 

data/lib/kwalify.rb

@@ -1,13 +1,13 @@
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 
 
 module Kwalify
 
-   RELEASE = ("$Release: 0.5.0 $" =~ /[.\d]+/) && $&
+   RELEASE = ("$Release: 0.5.1 $" =~ /[.\d]+/) && $&
 
 end
 

data/lib/kwalify/errors.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/lib/kwalify/main.rb

@@ -1,6 +1,6 @@
 ###
-### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Rev: 44 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 
@@ -46,12 +46,19 @@ module Kwalify
          @flag_silent   = false
          @flag_meta     = false
          @flag_untabify = false
+         @flag_emacs    = false
          @flag_linenum  = false
          @flag_debug    = false
          @schema_filename = nil
          @properties    = {}
       end
 
+
+      def debug?
+         @flag_debug
+      end
+
+
       def _inspect()
          s =     ""
          s <<    "command       : #{@command}\n"
@@ -60,6 +67,7 @@ module Kwalify
          s <<    "flag_silent   : #{@flag_silent}\n"
          s <<    "flag_meta     : #{@flag_meta}\n"
          s <<    "flag_untabify : #{@flag_untabify}\n"
+         s <<    "flag_emacs    : #{@flag_emacs}\n"
          s <<    "flag_linenum  : #{@flag_linenum}\n"
          s <<    "flag_debug    : #{@flag_debug}\n"
          s <<    "schema_filename : #{@schema_filename != nil ? @schema_filename : 'null'}\n"
@@ -72,20 +80,25 @@ module Kwalify
 
 
       def execute(argv=ARGV)
+         # parse command-line options
          filenames = _parse_argv(argv)
 
+         # help or version
          s = ''
          s << _version() << "\n" if @flag_version
          s << _usage()           if @flag_help
          return s unless s.empty?
 
-         if @flag_meta || @flag_meta2
+         # validation
+         if @flag_meta2
+            s = _quick_meta_validate(filenames)
+         elsif @flag_meta
             s = _meta_validate(filenames)
          elsif @schema_filename
             if @flag_debug
-               s = _inspect_schema(@flag_schema)
+               s = _inspect_schema(@schema_filename)
             else
-               s = _validate(filenames)
+               s = _validate(filenames, @schema_filename)
             end
          else
             #* key=:command_option_noaction  msg="command-line option '-f' or '-m' required."
@@ -107,8 +120,12 @@ module Kwalify
             #   $stderr.puts "ERROR: #{ex.message}"
             #   exit 1
          rescue => ex
-            $stderr.puts ex.message
-            exit 1
+            if main.debug?
+               raise ex
+            else
+               $stderr.puts ex.message
+               exit 1
+            end
          end
       end
 
@@ -122,161 +139,142 @@ module Kwalify
       end
 
 
-      def _load_yaml(str)
-         str = YamlHelper.untabify(str) if @flag_untabify
-         if @flag_linenum
-            @parser = Kwalify::YamlParser.new(str)
-            doc = @parser.parse()
-         else
-            doc = YAML.load(str)
-            doc = doc.value if _domain_type?(doc)
-         end
-         return doc
+      def _inspect_schema(schema_filename)
+         filename = schema_filename
+         str = File.open(schema_filename) { |f| f.read() }
+         str = YamlUtil.untabify(str) if @flag_untabify
+         schema = YAML.load(str)
+         return nil if schema == nil
+         validator = Kwalify::Validator.new(schema)  # error raised when schema is wrong
+         s = validator._inspect()
+         s << "\n" unless s[-1] == ?\n
+         return s
       end
 
 
-      def _meta_validate(filenames)
-         filenames = [ nil ] if filenames.empty?
-         meta_validator = @flag_meta2 ? nil : Kwalify::MetaValidator.instance()
-         flag_no_validate = @flag_meta2 == true
-         s = ''
-         filenames.each do |filename|
-            s << __meta_validate(meta_validator, filename)
-         end
-         return s
-      end
+      #class QuickMetaValidator
+      #   def validate(schema)
+      #      errors = []
+      #      begin
+      #         validator = Kwalify::Validator.new(schema) # error raised when schema is wrong
+      #      rescue Kwalify::SchemaError => ex
+      #         errors << ex
+      #      end
+      #      return errors
+      #   end
+      #end
 
 
-      def __meta_validate(meta_validator, filename=nil)
-         str = filename ? File.open(filename) { |f| f.read() } : $stdin.read()
-         schema = _load_yaml(str)
-         filename ||= "(stdin)"
-         if !schema || schema.empty?
-            #* key=:meta_empty  msg="%s: empty.\n"
-            return Kwalify.msg(:meta_emtpy) % filename
-         end
-         errors = nil
-         if meta_validator
-            errors = meta_validator.validate(schema)
-         else
+      def _quick_meta_validate(filenames)
+         meta_validator = Object.new
+         def meta_validator.validate(schema)
+            errors = []
             begin
-               validator = Kwalify::Validator.new(schema)  # error raised when schema is wrong
+               validator = Kwalify::Validator.new(schema) # error raised when schema is wrong
             rescue Kwalify::SchemaError => ex
-               errors = [ ex ]
+               errors << ex
             end
+            return errors
          end
-         s = ''
-         if !errors || errors.empty?
-            #* key=:meta_valid  msg="%s: ok.\n"
-            s << (Kwalify.msg(:meta_valid) % filename) unless @flag_silent
-         else
-            #* key=:meta_invalid  msg="%s: NG!\n"
-            s << (Kwalify.msg(:meta_invalid) % filename)
-            s << _errors_to_str(errors)
-         end
+         s = _validate_files(meta_validator, filenames)
          return s
       end
 
 
-      def _errors_to_str(errors)
-         s = ''
-         flag_linenum = @flag_linenum
-         if flag_linenum
-            @parser.set_errors_linenum(errors)
-            errors = errors.sort
-         end
-         errors.each do |error|
-            if flag_linenum
-               s << "  - (line #{error.linenum}) [#{error.path}] #{error.message}\n"
-            else
-               s << "  - [#{error.path}] #{error.message}\n"
-            end
-         end
+      def _meta_validate(filenames)
+         meta_validator = Kwalify::MetaValidator.instance()
+         s = _validate_files(meta_validator, filenames)
          return s
       end
 
 
-      def _validate(filenames)
-         str = File.open(@schema_filename) { |f| f.read() }
-         schema = _load_yaml(str)
-         validator = Kwalify::Validator.new(schema)
-         #
-         filenames = [ nil ] if filenames.empty?
-         s = ''
-         filenames.each do |filename|
-            s << __validate(validator, filename)
+      def _validate(filenames, schema_filename)
+         filename = schema_filename
+         str = File.open(filename) { |f| f.read() }   # or File.read(filename) in ruby1.8
+         str = YamlHelper.untabify(str) if @flag_untabify
+         schema = YAML.load(str)
+         if schema
+            validator = Kwalify::Validator.new(schema)
+            s = _validate_files(validator, filenames)
+         else
+            #* key=:schema_empty  msg="%s: empty schema.\n"
+            s = Kwalify.msg(:schema_emtpy) % filename
          end
          return s
       end
 
 
-      def __validate(validator, filename=nil)
-         str = filename ? File.open(filename) { |f| f.read() } : $stdin.read()
-         filename ||= "(stdin)"
+      def _validate_files(validator, filenames)
          s = ''
-         i = -1
-         _each_yaml_documents(str) do |document|
-            i += 1
-            if !document || document.empty?
-               #* key=:schema_empty  msg="%s#%d: empty.\n"
-               s << (Kwalify.msg(:schema_empty) % i)
-               next
+         filenames = [ nil ] if filenames.empty?
+         filenames.each do |filename|
+            if filename
+               str = File.open(filename) { |f| f.read() }   # or File.read(filename) in ruby1.8
+            else
+               str = $stdin.read()
+               filename = '(stdin)'
             end
-            errors = validator.validate(document)
-            if errors.empty?
-               #* key=:validation_valid  msg="%s#%d: valid.\n"
-               s << (Kwalify.msg(:validation_valid) % [filename, i]) unless @flag_silent
+            str = YamlHelper.untabify(str) if @flag_untabify
+            if @flag_linenum
+               parser = Kwalify::YamlParser.new(str)
+               i = 0
+               while parser.has_next?
+                  doc = parser.parse()
+                  s << _validate_document(validator, doc, filename, i, parser)
+                  i += 1
+               end
             else
-               #* key=:validation_invalid  msg="%s#%d: INVALID\n"
-               s << (Kwalify.msg(:validation_invalid) % [filename, i])
-               s << _errors_to_str(errors)
+               parser = nil
+               i = 0
+               YAML.load_documents(str) do |doc|
+                  s << _validate_document(validator, doc, filename, i, nil)
+                  i += 1
+               end
             end
          end
          return s
       end
 
 
-      def _each_yaml_documents(str, &block)
-         str = YamlHelper.untabify(str) if @flag_untabify
-         if @flag_linenum
-            @parser = Kwalify::YamlParser.new(str)
-            while @parser.has_next()
-               doc = @parser.parse()
-               yield(doc)
-            end
+      def _validate_document(validator, doc, filename, i, parser=nil)
+         s = ''
+         if doc == nil
+            #* key=:validation_empty  msg="%s#%d: empty.\n"
+            s << kwalify.msg(:validation_empty) % [filename, i]
+            return s
+         end
+         errors = validator.validate(doc)
+         if errors == nil || errors.empty?
+            #* key=:validation_valid  msg="%s#%d: valid.\n"
+            s << Kwalify.msg(:validation_valid) % [filename, i] unless @flag_silent
          else
-            YAML::load_documents(str) do |doc|
-               doc = doc.value if _domain_type?(doc)
-               yield(doc)
+            #* key=:validation_invalid  msg="%s#%d: INVALID\n"
+            s << Kwalify.msg(:validation_invalid) % [filename, i]
+            if @flag_linenum
+               #assert parser != nil
+               raise unless parser != nil
+               parser.set_errors_linenum(errors)
+               errors.sort!
+            end
+            errors.each do |error|
+               if @flag_emacs
+                  #assert @flag_linenum
+                  raise unless @flag_linenum
+                  s << "#{filename}:#{error.linenum}: [#{error.path}] #{error.message}\n"
+               elsif @flag_linenum
+                  s << "  - (line #{error.linenum}) [#{error.path}] #{error.message}\n"
+               else
+                  s << "  - [#{error.path}] #{error.message}\n"
+               end
             end
          end
-      end
-
-
-      def _inspect_schema(schema_filename)
-         filename = schema_filename
-         str = filename ? File.open(filename) { |f| f.read() } : $stdin.read()
-         schema = _load_yaml(str)
-         return nil if !schema || schema.empty?
-         validator = Kwalify::Validator.new(schema)  # error raised when schema is wrong
-         s = validator._inspect()
-         s << "\n" unless s[-1] == ?\n
          return s
       end
 
 
       def _usage()
-         s = ''
-         s <<  "Usage1: #{@command} [-hvstl] -f schema.yaml document.yaml [document2.yaml ...]\n"
-         s <<  "Usage2: #{@command} [-hvstl] -m schema.yaml [schema2.yaml ...]\n"
-         s <<  "  -h, --help      :  help\n"
-         s <<  "  -v              :  version\n"
-         s <<  "  -s              :  silent\n"
-         s <<  "  -f schema.yaml  :  schema definition file\n"
-         s <<  "  -m              :  meta-validation mode\n"
-         s <<  "  -t              :  expand tab character automatically\n"
-         s <<  "  -l              :  show linenumber when errored (experimental)\n"
-         return s
+         msg = Kwalify.msg(:command_help) % [@command, @command]
+         return msg
       end
 
 
@@ -284,6 +282,7 @@ module Kwalify
          return RELEASE
       end
 
+
       def _to_value(str)
          case str
          when nil, "null", "nil"         ;   return nil
@@ -297,6 +296,7 @@ module Kwalify
          end
       end
 
+
       def _parse_argv(argv)
          while argv[0] && argv[0][0] == ?-
             optstr = argv.shift
@@ -321,9 +321,10 @@ module Kwalify
                   when ?v  ;  @flag_version  = true
                   when ?s  ;  @flag_silent   = true
                   when ?t  ;  @flag_untabify = true
-                  when ?l  ;  @flag_linenum  = true
                   when ?m  ;  @flag_meta     = true
                   when ?M  ;  @flag_meta2    = true
+                  when ?E  ;  @flag_emacs    = true ; @flag_linenum = true
+                  when ?l  ;  @flag_linenum  = true
                   when ?D  ;  @flag_debug    = true
                   when ?f  ;
                      arg = optstr.empty? ? argv.shift : optstr

data/lib/kwalify/messages.rb

@@ -1,6 +1,6 @@
 ###
-### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Rev: 44 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 
@@ -12,14 +12,31 @@ module Kwalify
       return @@messages[key]
    end
 
-   
+
+
+   @@messages[:command_help] = <<END
+Usage1: %s [-hvstlE] -f schema.yaml doc.yaml [doc2.yaml ...]
+Usage2: %s [-hvstlE] -m schema.yaml [schema2.yaml ...]
+  -h, --help      :  help
+  -v              :  version
+  -s              :  silent
+  -f schema.yaml  :  schema definition file
+  -m              :  meta-validation mode
+  -t              :  expand tab character automatically
+  -l              :  show linenumber when errored (experimental)
+  -E              :  show errors in emacs-style (implies '-l')
+END
+
+
+
    ##----- begin
    # filename: lib/kwalify/main.rb
    @@messages[:command_option_noaction] = "command-line option '-f' or '-m' required."
    @@messages[:meta_empty]           = "%s: empty.\n"
    @@messages[:meta_valid]           = "%s: ok.\n"
    @@messages[:meta_invalid]         = "%s: NG!\n"
-   @@messages[:schema_empty]         = "%s#%d: empty.\n"
+   @@messages[:schema_empty]         = "%s#%d: empty schema.\n"
+   @@messages[:validation_empty]     = "%s#%d: empty.\n"
    @@messages[:validation_valid]     = "%s#%d: valid.\n"
    @@messages[:validation_invalid]   = "%s#%d: INVALID\n"
    @@messages[:command_property_invalid] = "%s: invalid property."
@@ -122,11 +139,11 @@ module Kwalify
 
 
    @@words = {}
-   
+
    def self.word(key)
       return @@words[key] || key
    end
-   
+
    @@words['str']  = 'string'
    @@words['int']  = 'integer'
    @@words['bool'] = 'boolean'

data/lib/kwalify/meta-validator.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/lib/kwalify/rule.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/lib/kwalify/types.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/lib/kwalify/util/assert-diff.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 41 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/lib/kwalify/util/option-parser.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 41 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/lib/kwalify/util/yaml-helper.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 41 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/lib/kwalify/validator.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/lib/kwalify/yaml-parser.rb

@@ -1,6 +1,6 @@
 ###
-### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Rev: 44 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 
@@ -50,7 +50,7 @@ module Kwalify
       end
 
 
-      def has_next()
+      def has_next?
          return @end_flag != 'EOF'
       end
 

data/test/test-main.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/test/test-main.yaml

@@ -1,13 +1,13 @@
 ##
-## $Rev: 42 $
-## $Release: 0.5.0 $
+## $Rev: 44 $
+## $Release: 0.5.1 $
 ## copyright(c) 2005 kuwata-lab all rights reserved.
 ##
 ---
 name:  parseOptions1
 desc:  test Main#parseOptions()
 method: parseOptions
-args: [ -hvsmtlDf, schema.yaml, document.yaml, document2.yaml ]
+args: [ -hvsmtlEDf, schema.yaml, document.yaml, document2.yaml ]
 inspect: |
   command       : kwalify
   flag_help     : true
@@ -15,6 +15,7 @@ inspect: |
   flag_silent   : true
   flag_meta     : true
   flag_untabify : true
+  flag_emacs    : true
   flag_linenum  : true
   flag_debug    : true
   schema_filename : schema.yaml
@@ -35,6 +36,7 @@ inspect: |
   flag_silent   : false
   flag_meta     : false
   flag_untabify : false
+  flag_emacs    : false
   flag_linenum  : true
   flag_debug    : false
   schema_filename : schema.yaml
@@ -53,6 +55,7 @@ inspect: |
   flag_silent   : false
   flag_meta     : false
   flag_untabify : false
+  flag_emacs    : false
   flag_linenum  : false
   flag_debug    : false
   schema_filename : null
@@ -62,6 +65,26 @@ inspect: |
     - document.yaml
 #
 ---
+name:  parseOptions4
+desc:  "'-E' turns on '-l'"
+method: parseOptions
+args:  [ -E, document.yaml ]
+inspect: |
+  command       : kwalify
+  flag_help     : false
+  flag_version  : false
+  flag_silent   : false
+  flag_meta     : false
+  flag_untabify : false
+  flag_emacs    : true
+  flag_linenum  : true
+  flag_debug    : false
+  schema_filename : null
+  properties:
+  filenames:
+    - document.yaml
+#
+---
 name:  optionError1
 desc:  invalid command-line option
 method: parseOptions
@@ -116,7 +139,7 @@ message: "command-line option '-f' or '-m' required."
 error_symbol*:
   ruby: !ruby/sym :command_option_noschema
   java: command.option.noaction
-
+#
 ---
 name:  version
 desc:  option '-v'
@@ -131,8 +154,8 @@ desc:  option '-h'
 method: execute
 args:  [ -hD, document.yaml ]
 expected: |
-  Usage1: kwalify [-hvstl] -f schema.yaml document.yaml [document2.yaml ...]
-  Usage2: kwalify [-hvstl] -m schema.yaml [schema2.yaml ...]
+  Usage1: kwalify [-hvstlE] -f schema.yaml doc.yaml [doc2.yaml ...]
+  Usage2: kwalify [-hvstlE] -m schema.yaml [schema2.yaml ...]
     -h, --help      :  help
     -v              :  version
     -s              :  silent
@@ -140,6 +163,7 @@ expected: |
     -m              :  meta-validation mode
     -t              :  expand tab character automatically
     -l              :  show linenumber when errored (experimental)
+    -E              :  show errors in emacs-style (implies '-l')
 #
 ---
 name:  silent1
@@ -249,7 +273,7 @@ schema: |
     - type:   str
 document: |
 expected: |
-  meta1.schema: ok.
+  meta1.schema#0: valid.
 #
 ---
 name:  meta2
@@ -262,14 +286,40 @@ schema: |
     - type:   str
 document: |
 expected: |
-  meta2.schema: NG!
+  meta2.schema#0: INVALID
     - [/] type 'map' requires 'mapping:'.
     - [/] 'sequence:': not available with mapping.
 #
+---
+name:  emacs
+desc:  show errors in emacs style
+method: execute
+args:  [ -Ef, emacs.schema, emacs.document ]
+schema: |
+  type:   seq
+  sequence:
+    - type:   map
+      mapping:
+       "key":   { type: str, required: yes }
+       "value": { type: any }
+document: |
+  - key: one
+    value: 1
+  - key: 2
+    val: two
+  - kye: three
+    value:
+expected: |
+  emacs.document#0: INVALID
+  emacs.document:3: [/1/key] '2': not a string.
+  emacs.document:4: [/1/val] key 'val:' is undefined.
+  emacs.document:5: [/2] key 'key:' is required.
+  emacs.document:5: [/2/kye] key 'kye:' is undefined.
+#
 
-####
-#### user's guide
-####
+###
+### user's guide
+###
 ---
 name: validation01
 desc: basic validation
@@ -753,4 +803,3 @@ invalid-out: |
   validation15.invalid#0: INVALID
     - (line 4) [/user] key 'email:' is required.
     - (line 5) [/user/name] 'toooooo-looooong-name': too long (length 21 > max 16).
-#

data/test/test-metavalidator.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/test/test-metavalidator.yaml

@@ -1,6 +1,6 @@
 ##
-## $Rev: 42 $
-## $Release: 0.5.0 $
+## $Rev: 2 $
+## $Release: 0.5.1 $
 ## copyright(c) 2005 kuwata-lab all rights reserved.
 ##
 ---

data/test/test-rule.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/test/test-rule.yaml

@@ -1,6 +1,6 @@
 ##
-## $Rev: 42 $
-## $Release: 0.5.0 $
+## $Rev: 2 $
+## $Release: 0.5.1 $
 ## copyright(c) 2005 kuwata-lab all rights reserved.
 ##
 ---

data/test/test-validator.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/test/test-validator.yaml

@@ -1,6 +1,6 @@
 ##
-## $Rev: 42 $
-## $Release: 0.5.0 $
+## $Rev: 2 $
+## $Release: 0.5.1 $
 ## copyright(c) 2005 kuwata-lab all rights reserved.
 ##
 ---

data/test/test-yamlparser.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

data/test/test-yamlparser.yaml

@@ -1,6 +1,6 @@
 ##
-## $Rev: 42 $
-## $Release: 0.5.0 $
+## $Rev: 2 $
+## $Release: 0.5.1 $
 ## copyright(c) 2005 kuwata-lab all rights reserved.
 ##
 ---

data/test/test.rb

@@ -1,6 +1,6 @@
 ###
 ### $Rev: 42 $
-### $Release: 0.5.0 $
+### $Release: 0.5.1 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 

metadata

@@ -3,8 +3,8 @@ rubygems_version: 0.8.10
 specification_version: 1
 name: kwalify
 version: !ruby/object:Gem::Version 
-  version: 0.5.0
-date: 2005-12-18
+  version: 0.5.1
+date: 2005-12-20
 summary: a tiny schema validator for YAML document.
 require_paths: 
 - lib