pretty_debug 0.3.12 → 0.3.13

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 880e84fa86195e096990ca5457a1008c2dfc6931
-  data.tar.gz: 5b99c798a66fb358988bdecb21085da69fd1b46a
+  metadata.gz: e25d6a8b6da79b8366241bf88cad7f841bc775eb
+  data.tar.gz: d6db434114fdc8e46a99ef799282d9c057398c0f
 SHA512:
-  metadata.gz: 29da74764409a181d959fd87054bbaab909c8514baf6cf2abf68b7db4ec9cae16eb5342bedf499572a6edf5b6219526843b9afdad7c3e899d7d86372dacb5744
-  data.tar.gz: 549932a814ee2fa313b7d930283aaeb67c75aa5d71e71a7ced9be6239b2c3fa646271f3d1e723038d019dea72a13b123c91e2983051d6a3f03c9f222150b36c9
+  metadata.gz: 2d51fd3e149f798e85e1a491327e5ba5882e012fca1f250f4acd8c5459fefcb5353d65dc21526bfbde659612219d3eabdab41c9c7bf0a592a706341534e3aa28
+  data.tar.gz: 6a74c14b61b2ad0f54b3ac82a0aaf670f576057cd62ead6f6f7ea009a1386abed8ff0995cab57175220572fda034d9479cdc0984e6950f79027f1b2032ce6217

data/lib/pretty_debug.rb

@@ -1,7 +1,74 @@
 #!ruby
-require "string"
 require "utility"
 
+#############################################
+# File
+#############################################
+
+class File
+	def self.relativize f; f.sub(%r{\A/}, "") end
+	def self.expand_path_relative f; expand_path(f, caller_location(1).dirname) end
+end
+
+class Dir
+	def self.glob_relative f; glob(File.expand_path(f, caller_location(1).dirname)) end
+end
+
+module Kernel
+	def caller_location i; caller_locations(i + 1, 1).first end
+	def load_relative f, *rest; 
+		load(File.expand_path(f, caller_location(1).dirname), *rest)
+	end
+end
+
+#############################################
+# String
+#############################################
+
+class String
+	@@indent = "  "
+	def indent n = 1; gsub(/^/, @@indent * n) end
+	def unindent; gsub(/^#{match(/^\s+/)}/, "").chomp end
+	def unchomp; sub(/#$/?\z/, $/) end
+	def unchomp!; sub!(/#$/?\z/, $/) end
+	def ellipsis n
+		if length <= n then self
+		elsif n.odd? then "#{slice(0..n/2-3)}...#{slice(-n/2+2..-1)}"
+		else "#{slice(0..n/2-3)}...#{slice(-n/2+1..-1)}"
+		end
+	end
+	def common_prefix other
+		i = 0
+		loop{break unless self[i] and self[i] == other[i]; i += 1}
+		self[0, i]
+	end
+	def common_affix other
+		i = - 1
+		loop{break unless self[i] and self[i] == other[i]; i -= 1}
+		self[i + 1, -(i + 1)]
+	end
+	def write_to f; write_to!(f) rescue nil end
+	def write_to! f; File.write(f, self) end
+	def binary_write_to f; binary_write_to!(f) rescue nil end
+	def binary_write_to! f; File.write(f, self, "wb") end
+	def add_to f; add_to!(f) rescue nil end
+	def add_to! f; File.open(f, "a+") do |io|
+			io.readlines.last.tap{|l| io.puts if l && l.end_with?($/).!}
+			io.write(self)
+		end
+	end
+	# Raises an error if either save, read, or round-trip-matching fails.
+	def safely_write_to dest, tmp = "#{Dir.tmpdir}/safe-save"
+		write_to!(tmp)
+		raise "Round trip `save-read` failed on `#{dest}`." unless File.read(tmp) == self
+		File.rename(tmp, dest)
+	end
+end
+
+#############################################
+# 
+#############################################
+
 class Exception
 	attr_accessor :backtrace_locations
 	def complement_backtrace_locations
@@ -22,8 +89,21 @@ class Thread::Backtrace::PseudoLocation
 	end
 end
 
+class Thread::Backtrace::Location
+	def dirname; File.dirname(path) end
+	def basename; File.basename(path) end
+end
+
 module Kernel
-	alias old_raise :raise
+	## Supress warning message ("already initialized constants", etc.).
+	def supress_warning
+		original_verbose, $VERBOSE = $VERBOSE, nil
+		yield
+		$VERBOSE =  original_verbose
+	end
+	ErrorMsgProcess = Mutex.new
+	def log h; ErrorMsgProcess.synchronize{puts(h.ltsv)} end
+	alias old_raise :raise unless defined?(old_raise)
 	def raise *args
 		old_raise *args
 	rescue => e
@@ -150,12 +230,7 @@ end
 #############################################
 
 class Hash
-	def ltsv *args
-		if args.empty? then
-			map{|k, v| "#{k}:#{v.to_s.tr("\t", " ")}"} else
-			args.map{|k| "#{k}:#{self[k].to_s.tr("\t", " ")}"}
-		end.join("\t")
-	end
+	def ltsv; map{|k, v| "#{k}:#{v.to_s.tr("\t", " ")}"}.join("\t") end
 end
 class String
 	def parse_ltsv; Hash[chomp.split("\t").map{|f| f.split(":", 2)}] end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: pretty_debug
 version: !ruby/object:Gem::Version
-  version: 0.3.12
+  version: 0.3.13
 platform: ruby
 authors:
 - sawa
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2013-09-18 00:00:00.000000000 Z
+date: 2013-09-20 00:00:00.000000000 Z
 dependencies: []
 description: ''
 email: []