[uim-commit] r2030 - branches/r5rs/sigscheme/script

[yamaken at freedesktop.org]

Author: yamaken
Date: 2005-11-06 04:04:48 -0800 (Sun, 06 Nov 2005)
New Revision: 2030

Modified:
   branches/r5rs/sigscheme/script/scm_decl.rb
Log:
* sigscheme/script/scm_decl.rb
  - (SCM_DECL_RE):
    * Remove an unnecessary backslash
    * Fix wrong description for $7


Modified: branches/r5rs/sigscheme/script/scm_decl.rb
===================================================================
--- branches/r5rs/sigscheme/script/scm_decl.rb	2005-11-06 12:01:00 UTC (rev 2029)
+++ branches/r5rs/sigscheme/script/scm_decl.rb	2005-11-06 12:04:48 UTC (rev 2030)
@@ -38,11 +38,11 @@
 # $4  :prefix          Op
 # $5  :func_body       call_with_values
 # $6  :args            ScmObj producer, ScmObj consumer, ScmEvalState *eval_state
-# $7  :proc            "call-with-values"
+# $7  :proc            call-with-values
 # $8  :register_func   ProcedureFixedTailRec2
 # $9  :functype_prefix Procedure
 # $10 :functype_spec   FixedTailRec2
-SCM_DECL_RE = /\n((ScmObj)\s+(Scm(Op|Exp)_(.\w+))\(([^\{]+)\))[ \t]*\n\s*\{[^{}]+DECLARE_FUNCTION\(\s*\"([^\"]+)\"[\s,]+([^\s,]+)\)/m
+SCM_DECL_RE = /\n((ScmObj)\s+(Scm(Op|Exp)_(.\w+))\(([^{]+)\))[ \t]*\n\s*\{[^{}]+DECLARE_FUNCTION\(\s*\"([^\"]+)\"[\s,]+([^\s,]+)\)/m
 
 
 class String