Module: Dhall

Defined in:
lib/dhall.rb,
lib/dhall/ast.rb,
lib/dhall/util.rb,
lib/dhall/coder.rb,
lib/dhall/types.rb,
lib/dhall/binary.rb,
lib/dhall/parser.rb,
lib/dhall/resolve.rb,
lib/dhall/visitor.rb,
lib/dhall/as_dhall.rb,
lib/dhall/builtins.rb,
lib/dhall/normalize.rb,
lib/dhall/typecheck.rb

Defined Under Namespace

Modules: AsDhall, Builtins, ExpressionVisitor, Parser, Resolvers, TypeChecker, Types, Util Classes: Application, Bool, Builtin, BuiltinFunction, Coder, Double, EmptyList, EmptyRecord, EmptyRecordProjection, EmptyRecordType, Enum, Expression, ExpressionResolver, Forall, Function, FunctionProxy, FunctionProxyRaw, If, Import, ImportBannedException, ImportFailedException, ImportLoopException, Integer, Let, LetBlock, LetIn, List, Merge, Natural, Operator, Optional, OptionalNone, Record, RecordProjection, RecordProjectionByExpression, RecordSelection, RecordType, RubyObjectRaw, Text, TextLiteral, TimeoutException, ToMap, TypeAnnotation, Union, UnionType, Variable, Visitor

Constant Summary collapse

BINARY = 
{
	::TrueClass    => ->(e) { Bool.new(value: e) },
	::FalseClass   => ->(e) { Bool.new(value: e) },
	::Float        => ->(e) { Double.new(value: e) },
	::String       => ->(e) { Builtins[e.to_sym] || (raise "Unknown builtin") },
	::Integer      => ->(e) { Variable.new(index: e) },
	::Array        => lambda { |e|
		e = e.map(&method(:handle_tag))
		if e.length == 2 && e.first.is_a?(::String)
			Variable.new(name: e[0], index: e[1])
		else
			tag, *body = e
			BINARY_TAGS[tag]&.decode(*body) ||
				(raise "Unknown expression: #{e.inspect}")
		end
	},
	::CBOR::Tagged => ->(e) { Dhall.decode(handle_tag(e)) }
}.freeze
BINARY_TAGS = 
[
	Application,
	Function,
	Forall,
	Operator,
	List,
	Optional,
	Merge,
	RecordType,
	Record,
	RecordSelection,
	RecordProjection,
	UnionType,
	Union,
	nil,
	If,
	Natural,
	Integer,
	nil,
	TextLiteral,
	nil,
	nil,
	nil,
	nil,
	nil,
	Import,
	LetBlock,
	TypeAnnotation,
	ToMap,
	EmptyList
].freeze

Class Method Summary collapse

Class Method Details

.decode(expression) ⇒ Object 



16
17
18
19
20
21
22
 
# File 'lib/dhall/binary.rb', line 16

def self.decode(expression)
	BINARY.each do |match, use|
		return use[expression] if expression.is_a?(match)
	end

	raise "Unknown expression: #{expression.inspect}"
end

.dump(o) ⇒ Object 



46
47
48
 
# File 'lib/dhall.rb', line 46

def self.dump(o)
	CBOR.encode(o.as_dhall)
end

.from_binary(cbor_binary) ⇒ Object 



12
13
14
 
# File 'lib/dhall/binary.rb', line 12

def self.from_binary(cbor_binary)
	decode(CBOR.decode(cbor_binary))
end

.handle_tag(e) ⇒ Object 



292
293
294
295
296
297
 
# File 'lib/dhall/binary.rb', line 292

def self.handle_tag(e)
	return e unless e.is_a?(::CBOR::Tagged)
	return e.value if e.tag == 55799

	raise "Unknown tag: #{e.inspect}"
end

.load(source, resolver: Resolvers::Default.new, timeout: 10) ⇒ Object 



17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
 
# File 'lib/dhall.rb', line 17

def self.load(
	source,
	resolver: Resolvers::Default.new,
	timeout: 10
)
	deadline = Util::Deadline.for_timeout(timeout)
	Promise.resolve(nil).then {
		load_raw(source.to_s, timeout: timeout).resolve(
			resolver: resolver.with_deadline(deadline)
		)
	}.then do |resolved|
		deadline.timeout_block do
			TypeChecker.for(resolved).annotate(TypeChecker::Context.new).normalize
		end
	end
end

.load_raw(source, timeout: 10) ⇒ Object 



34
35
36
37
38
39
40
41
42
43
44
 
# File 'lib/dhall.rb', line 34

def self.load_raw(source, timeout: 10)
	source = Util.text_or_binary(source)

	Util::Deadline.for_timeout(timeout).timeout_block do
		if source.encoding == Encoding::BINARY
			from_binary(source)
		else
			Parser.parse(source).value
		end
	end
end