#--
-# $Id: app.rb 2 2005-03-26 19:16:37Z tilman $
+# $Id: app.rb 39 2005-04-28 21:08:11Z tilman $
#
# Copyright (c) 2005 Tilman Sauerbeck (tilman at code-monkey de)
#
end
o.on_tail("--version", "Show version") do
- puts <<EOT
-redact #{Redact::VERSION}
-
-Copyright (c) 2005 Tilman Sauerbeck (tilman at code-monkey de)
-EOT
+ puts "Redact #{Redact::VERSION}"
exit
end
"-i #{incl}/include " +
"-o #{tf_out.path} #{tf_in.path}"
system(c)
+ unless (0..1).include?($?.exitstatus)
+ raise("Cannot compile Embryo code")
+ end
ret[col.id] = tf_out.read
end
method = (sane == @filename) ? :unshift : :push
s.send(method, SourceFile.new(sane, value.join))
- # include files that are with File.read, too
+ # include files that are read with File.read, too
value.join.grep(/File\.read\(\"(.+)\"\)/) do
sane = Pathname.new($1).cleanpath.to_s
s << SourceFile.new(sane, File.read(sane))