dhall 0.1.0 → 0.2.0

data/lib/dhall/util.rb

@@ -1,5 +1,7 @@
 # frozen_string_literal: true
 
+require "timeout"
+
 module Dhall
 	module Util
 		class AllOf
@@ -61,45 +63,43 @@ module Dhall
 			end
 		end
 
-		module BuiltinName
-			NAMES = [
-				"Natural/build",
-				"Natural/fold",
-				"Natural/isZero",
-				"Natural/even",
-				"Natural/odd",
-				"Natural/toInteger",
-				"Natural/show",
-				"Integer/toDouble",
-				"Integer/show",
-				"Double/show",
-				"List/build",
-				"List/fold",
-				"List/length",
-				"List/head",
-				"List/last",
-				"List/indexed",
-				"List/reverse",
-				"Optional/fold",
-				"Optional/build",
-				"Text/show",
-				"Bool",
-				"Optional",
-				"Natural",
-				"Integer",
-				"Double",
-				"Text",
-				"List",
-				"True",
-				"False",
-				"None",
-				"Type",
-				"Kind",
-				"Sort"
-			].freeze
+		class Deadline
+			def self.for_timeout(timeout)
+				if timeout.nil? || timeout.to_f.infinite?
+					NoDeadline.new
+				else
+					new(Time.now + timeout)
+				end
+			end
 
-			def self.===(other)
-				NAMES.include?(other)
+			def initialize(deadline)
+				@deadline = deadline
+			end
+
+			def exceeded?
+				@deadline < Time.now
+			end
+
+			def timeout
+				[0.000000000000001, @deadline - Time.now].max
+			end
+
+			def timeout_block(&block)
+				Timeout.timeout(timeout, TimeoutException, &block)
+			end
+		end
+
+		class NoDeadline
+			def exceeded?
+				false
+			end
+
+			def timeout
+				nil
+			end
+
+			def timeout_block
+				yield
 			end
 		end
 
@@ -126,5 +126,56 @@ module Dhall
 				end]
 			end
 		end
+
+		def self.psych_coder_for(tag, v)
+			c = Psych::Coder.new(tag)
+			case v
+			when Hash
+				c.map = v
+			when Array
+				c.seq = v
+			else
+				c.scalar = v
+			end
+		end
+
+		def self.psych_coder_from(tag, o)
+			coder = Psych::Coder.new(tag)
+
+			if o.respond_to?(:encode_with)
+				o.encode_with(coder)
+			else
+				o.instance_variables.each do |ivar|
+					coder[ivar.to_s[1..-1]] = o.instance_variable_get(ivar)
+				end
+			end
+
+			coder
+		end
+
+		def self.transform_keys(hash_or_not)
+			return hash_or_not unless hash_or_not.is_a?(Hash)
+
+			Hash[hash_or_not.map { |k, v| [(yield k), v] }]
+		end
+
+		def self.utf8_if_possible(str)
+			utf8 = str.dup.force_encoding(Encoding::UTF_8)
+			utf8.valid_encoding? ? utf8 : str
+		end
+
+		def self.text_or_binary(str)
+			unless str.valid_encoding?
+				raise ArgumentError, "invalid byte sequence in #{str.encoding}"
+			end
+
+			if str.encoding == Encoding::BINARY
+				return str if str =~ /(?!\s)[[:cntrl:]]/
+
+				utf8_if_possible(str)
+			else
+				str.encode(Encoding::UTF_8)
+			end
+		end
 	end
 end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: dhall
 version: !ruby/object:Gem::Version
-  version: 0.1.0
+  version: 0.2.0
 platform: ruby
 authors:
 - Stephen Paul Weber
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2019-04-10 00:00:00.000000000 Z
+date: 2019-04-29 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: cbor
@@ -129,6 +129,7 @@ files:
 - lib/dhall/ast.rb
 - lib/dhall/binary.rb
 - lib/dhall/builtins.rb
+- lib/dhall/coder.rb
 - lib/dhall/normalize.rb
 - lib/dhall/parser.citrus
 - lib/dhall/parser.rb