packcr 0.0.4 → 0.0.7

data/lib/packcr/stream.rb

@@ -1,10 +1,9 @@
 require "securerandom"
-require "stringio"
 
 class Packcr
   class Stream
-    def initialize(io, name, line)
-      @io = io
+    def initialize(stream, name, line)
+      @stream = stream
       @name = name
       @line = line
       @line_directive_tag = nil
@@ -12,13 +11,13 @@ class Packcr
 
     def write(s, rewrite_line_directive: false)
       if rewrite_line_directive && @line_directive_tag && @line.respond_to?(:+)
-        s.gsub!(@line_directive_tag) { (@line + $`.count("\n") + 1).to_s }
+        s.gsub!(@line_directive_tag) { (@line + ::Regexp.last_match.pre_match.count("\n") + 1).to_s }
         @line_directive_tag = nil
       end
-      @io.write(s)
-      if @line.respond_to?(:+)
-        @line += s.count("\n")
-      end
+      @stream << s
+      return unless @line.respond_to?(:+)
+
+      @line += s.count("\n")
     end
 
     def write_text(s)
@@ -27,6 +26,7 @@ class Packcr
 
     def write_line_directive(fname, lineno)
       return unless @line
+
       if lineno.respond_to?(:+)
         write("#line #{lineno + 1} \"")
       else
@@ -45,22 +45,18 @@ class Packcr
     def write_code_block(code, indent, fname)
       text = code.text
       ptr = text.b
-      len = code.len
       lineno = code.line
-      if len == nil
-        return # for safety
-      end
 
       ptr.sub!(/\A\n+/) do
-        lineno += $&.length
+        lineno += ::Regexp.last_match(0).length
         ""
       end
       ptr.sub!(/[ \v\f\t\r\n]*\z/, "")
 
       min_indent_spaces = nil
       ptr.gsub!(/^([ \v\f\t]*)([^ \v\f\t\r\n])/) do
-        spaces = $1
-        char = $2
+        spaces = ::Regexp.last_match(1)
+        char = ::Regexp.last_match(2)
 
         next char if char == "#"
 
@@ -76,7 +72,7 @@ class Packcr
       if min_indent_spaces
         indent_spaces = " " * indent
         ptr.gsub!(/^#{min_indent_spaces}( *[^\n#])/) do
-          "#{indent_spaces}#{$1}"
+          "#{indent_spaces}#{::Regexp.last_match(1)}"
         end
       end
 
@@ -84,19 +80,23 @@ class Packcr
 
       write_line_directive(fname, lineno)
       ptr.scan(/^(.+?)[ \v\f\t\r]*$|^\r?\n/) do
-        write $1 if $1
+        write ::Regexp.last_match(1) if ::Regexp.last_match(1)
         write "\n"
       end
       write_output_line_directive
     end
 
     def get_code_block(code, indent, fname)
-      buf = StringIO.new
-      line, io, @io, @line = @line, @io, buf, @line && :uuid
+      buf = +""
+      line = @line
+      stream = @stream
+      @stream = buf
+      @line &&= :uuid
       write_code_block(code, indent, fname)
-      return buf.string
+      buf
     ensure
-      @line, @io = line, io
+      @line = line
+      @stream = stream
     end
   end
-end
+end

data/lib/packcr/templates/context/header.c.erb

@@ -0,0 +1,29 @@
+/* A packrat parser generated by PackCR <%= Packcr::VERSION %> */
+
+<%- code(:eheader).each do |code| -%>
+<%=   stream.get_code_block(code, 0, @iname) -%>
+<%- end -%>
+<%- if !code(:eheader).empty? -%>
+
+<%- end -%>
+#ifndef PCC_INCLUDED_<%= @hid %>
+#define PCC_INCLUDED_<%= @hid %>
+
+<%- code(:header).each do |code| -%>
+<%=   stream.get_code_block(code, 0, @iname) -%>
+<%- end -%>
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+typedef struct <%= prefix %>_context_tag <%= prefix %>_context_t;
+
+<%= prefix %>_context_t *<%= prefix %>_create(<%= auxil_def %>auxil);
+int <%= prefix %>_parse(<%= prefix %>_context_t *ctx, <%= value_def %>*ret);
+void <%= prefix %>_destroy(<%= prefix %>_context_t *ctx);
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* !PCC_INCLUDED_<%= @hid %> */