edn2023 1.1.4

data/spec/exemplars/map_empty.edn

@@ -0,0 +1 @@
+{}

data/spec/exemplars/map_empty.rb

@@ -0,0 +1 @@
+({})

data/spec/exemplars/map_nested.edn

@@ -0,0 +1 @@
+{:a {:b :c}}

data/spec/exemplars/map_nested.rb

@@ -0,0 +1 @@
+({:a => {:b => :c}})

data/spec/exemplars/map_one_element.edn

@@ -0,0 +1 @@
+{:a :b}

data/spec/exemplars/map_one_element.rb

@@ -0,0 +1 @@
+({:a => :b})

data/spec/exemplars/map_two_entry.edn

@@ -0,0 +1 @@
+{:a 1, :b 2}

data/spec/exemplars/map_two_entry.rb

@@ -0,0 +1 @@
+({:a => 1, :b => 2})

data/spec/exemplars/mmv

@@ -0,0 +1,4 @@
+#!/bin/sh
+
+mv $1.edn $2.edn
+mv $1.rb $2.rb

data/spec/exemplars/nil.edn

@@ -0,0 +1 @@
+nil

data/spec/exemplars/nil.rb

@@ -0,0 +1 @@
+nil

data/spec/exemplars/set_empty.edn

@@ -0,0 +1 @@
+#{}

data/spec/exemplars/set_empty.rb

@@ -0,0 +1 @@
+ Set.new

data/spec/exemplars/set_nested.edn

@@ -0,0 +1 @@
+#{1 #{:abc}}

data/spec/exemplars/set_nested.rb

@@ -0,0 +1 @@
+ Set[1, Set[:abc]]

data/spec/exemplars/set_one_element.edn

@@ -0,0 +1 @@
+#{1}

data/spec/exemplars/set_one_element.rb

@@ -0,0 +1 @@
+ Set[1]

data/spec/exemplars/set_two_elements.edn

@@ -0,0 +1 @@
+#{1 "abc"}

data/spec/exemplars/set_two_elements.rb

@@ -0,0 +1 @@
+ Set[1, "abc"]

data/spec/exemplars/simple_skip.edn

@@ -0,0 +1 @@
+#_123 4

data/spec/exemplars/simple_skip.rb

@@ -0,0 +1 @@
+4

data/spec/exemplars/skip_more_space.edn

@@ -0,0 +1 @@
+#_    123 4

data/spec/exemplars/skip_more_space.rb

@@ -0,0 +1 @@
+ 4

data/spec/exemplars/skip_more_vector_elements.edn

@@ -0,0 +1 @@
+[#_ "hello" 1 2]

data/spec/exemplars/skip_more_vector_elements.rb

@@ -0,0 +1 @@
+ [1, 2]

data/spec/exemplars/skip_some_vector_elements.edn

@@ -0,0 +1 @@
+[#_64 1 #_ 65]

data/spec/exemplars/skip_some_vector_elements.rb

@@ -0,0 +1 @@
+ [1]

data/spec/exemplars/skip_two_vector_elements.edn

@@ -0,0 +1 @@
+[#_1 #_"hello"]

data/spec/exemplars/skip_two_vector_elements.rb

@@ -0,0 +1 @@
+ []

data/spec/exemplars/skip_vector_element.edn

@@ -0,0 +1 @@
+[#_1]

data/spec/exemplars/skip_vector_element.rb

@@ -0,0 +1 @@
+ []

data/spec/exemplars/skip_with_spaces.edn

@@ -0,0 +1 @@
+#_ 123 4

data/spec/exemplars/skip_with_spaces.rb

@@ -0,0 +1 @@
+ 4

data/spec/exemplars/skip_yet_more_space.edn

@@ -0,0 +1 @@
+#_    123   74

data/spec/exemplars/skip_yet_more_space.rb

@@ -0,0 +1 @@
+74

data/spec/exemplars/special_symbol.edn

@@ -0,0 +1 @@
+<

data/spec/exemplars/special_symbol.rb

@@ -0,0 +1 @@
+ EDN::Type::Symbol.new('<')

data/spec/exemplars/string_with_newline.edn

@@ -0,0 +1 @@
+"hello\nworld"

data/spec/exemplars/string_with_newline.rb

@@ -0,0 +1 @@
+ "hello\nworld"

data/spec/exemplars/symbol.edn

@@ -0,0 +1 @@
+whatever

data/spec/exemplars/symbol.rb

@@ -0,0 +1 @@
+EDN::Type::Symbol.new('whatever')

data/spec/exemplars/symbol_begins_with_false.edn

@@ -0,0 +1 @@
+falsey

data/spec/exemplars/symbol_begins_with_false.rb

@@ -0,0 +1 @@
+ EDN::Type::Symbol.new('falsey')

data/spec/exemplars/symbol_begins_with_nil.edn

@@ -0,0 +1 @@
+nillable

data/spec/exemplars/symbol_begins_with_nil.rb

@@ -0,0 +1 @@
+ EDN::Type::Symbol.new('nillable')

data/spec/exemplars/symbol_with_dash.edn

@@ -0,0 +1 @@
+true-foo

data/spec/exemplars/symbol_with_dash.rb

@@ -0,0 +1 @@
+ EDN::Type::Symbol.new('true-foo')

data/spec/exemplars/symbol_with_namespace.edn

@@ -0,0 +1 @@
+hello/world

data/spec/exemplars/symbol_with_namespace.rb

@@ -0,0 +1 @@
+ EDN::Type::Symbol.new('hello/world')

data/spec/exemplars/tagged_instant.edn

@@ -0,0 +1 @@
+#inst "2012-09-10T16:16:03-04:00"

data/spec/exemplars/tagged_instant.rb

@@ -0,0 +1 @@
+ DateTime.rfc3339("2012-09-10T16:16:03-04:00")

data/spec/exemplars/tagged_uuid.edn

@@ -0,0 +1 @@
+#uuid "f81d4fae-7dec-11d0-a765-00a0c91e6bf6"

data/spec/exemplars/tagged_uuid.rb

@@ -0,0 +1 @@
+ "f81d4fae-7dec-11d0-a765-00a0c91e6bf6"

data/spec/exemplars/true.edn

@@ -0,0 +1 @@
+true

data/spec/exemplars/true.rb

@@ -0,0 +1 @@
+ true

data/spec/exemplars/utf8.edn

@@ -0,0 +1 @@
+"øhi utf8"

data/spec/exemplars/utf8.rb

@@ -0,0 +1 @@
+  "øhi utf8"

data/spec/exemplars/vector_empty.edn

@@ -0,0 +1 @@
+[]

data/spec/exemplars/vector_empty.rb

@@ -0,0 +1 @@
+ []

data/spec/exemplars/vector_mixed.edn

@@ -0,0 +1 @@
+["hello" 1 2]

data/spec/exemplars/vector_mixed.rb

@@ -0,0 +1 @@
+ ['hello', 1, 2]

data/spec/exemplars/vector_nested.edn

@@ -0,0 +1 @@
+[[1 [:hi]]]

data/spec/exemplars/vector_nested.rb

@@ -0,0 +1 @@
+ [[1, [:hi]]]

data/spec/exemplars/vector_one_element.edn

@@ -0,0 +1 @@
+[1]

data/spec/exemplars/vector_one_element.rb

@@ -0,0 +1 @@
+ [1]

data/spec/exemplars/whole_number_with_exp.edn

@@ -0,0 +1 @@
+3e10

data/spec/exemplars/whole_number_with_exp.rb

@@ -0,0 +1 @@
+ 3.0e10

data/spec/spec_helper.rb

@@ -0,0 +1,164 @@
+require 'rspec'
+require 'edn'
+require 'rantly'
+require 'date'
+require 'time'
+
+REPEAT = (ENV["REPEAT"] || 150).to_i
+
+RSpec.configure do |c|
+  c.fail_fast = true
+  c.filter_run_including :focused => true
+  c.alias_example_to :fit, :focused => true
+  c.run_all_when_everything_filtered = true
+
+  c.filter_run :focus
+  c.run_all_when_everything_filtered = true
+end
+
+def io_for(s)
+  StringIO.new(s)
+end
+
+module RantlyHelpers
+
+  KEYWORD = lambda { |_|
+    call(SYMBOL).to_sym.to_edn
+  }
+
+  SYMBOL = lambda { |_|
+    branch(PLAIN_SYMBOL, NAMESPACED_SYMBOL)
+  }
+
+  PLAIN_SYMBOL = lambda { |_|
+    sized(range(1, 100)) {
+      s = string(/[[:alnum:]]|[\.\*\+\!\-\?\$_%<>&=:#]/)
+      guard s !~ /^[0-9]/
+      guard s !~ /^[\+\-\.][0-9]/
+      guard s !~ /^[\:\#]/
+      s
+    }
+  }
+
+  NAMESPACED_SYMBOL = lambda { |_|
+    [call(PLAIN_SYMBOL), call(PLAIN_SYMBOL)].join("/")
+  }
+
+  INTEGER = lambda { |_| integer.to_edn }
+
+  STRING = lambda { |_| sized(range(1, 100)) { string.to_edn } }
+
+  RUBY_STRING = lambda { |_| sized(range(1, 100)) { string } }
+
+  FLOAT = lambda { |_| (float * range(-4000, 5000)).to_edn }
+
+  FLOAT_WITH_EXP = lambda { |_|
+    # limited range because of Infinity
+    f = float.to_s
+    guard f !~ /[Ee]/
+
+    [f, choose("e", "E", "e+", "E+", "e-", "e+"), range(1, 100)].
+    map(&:to_s).
+    join("")
+  }
+
+  RUBY_CHAR = lambda { |_|
+    "\\" +
+    sized(1) {
+      freq([1, [:choose, "\n", "\r", " ", "\t"]],
+           [5, [:string, :graph]])
+    }
+  }
+
+  CHARACTER = lambda { |_|
+    "\\" +
+    sized(1) {
+      freq([1, [:choose, "newline", "return", "space", "tab"]],
+           [5, [:string, :graph]])
+    }
+  }
+
+  BOOL_OR_NIL = lambda { |_|
+    choose("true", "false", "nil")
+  }
+
+  ARRAY = lambda { |_|
+    array(range(1, 10)) { call(ELEMENT) }
+  }
+
+  VECTOR = lambda { |_|
+    '[' + call(ARRAY).join(', ') + ']'
+  }
+
+  LIST = lambda { |_|
+    '(' + call(ARRAY).join(', ') + ')'
+  }
+
+  SET = lambda { |_|
+    '#{' + call(ARRAY).join(', ') + '}'
+  }
+
+  MAP = lambda { |_|
+    size = range(0, 10)
+    keys = array(size) { call(ELEMENT) }
+    elements = array(size) { call(ELEMENT) }
+    arrays = keys.zip(elements)
+    '{' + arrays.map { |array| array.join(" ") }.join(", ") + '}'
+  }
+
+  ELEMENT = lambda { |_|
+    freq([8, BASIC_ELEMENT],
+         [2, ELEMENT_WITH_METADATA],
+         [1, INST],
+         [1, TAGGED_ELEMENT])
+  }
+
+  BASIC_ELEMENT = lambda { |_|
+    branch(INTEGER,
+           FLOAT,
+           FLOAT_WITH_EXP,
+           STRING,
+           KEYWORD,
+           SYMBOL,
+           CHARACTER,
+           BOOL_OR_NIL,
+           VECTOR,
+           LIST,
+           SET,
+           MAP)
+  }
+
+  METADATA = lambda { |_|
+    size = range(1, 4)
+    keys = array(size) { branch(KEYWORD, SYMBOL, STRING) }
+    elements = array(size) { call(ELEMENT) }
+    arrays = keys.zip(elements)
+    '^{' + arrays.map { |array| array.join(" ") }.join(", ") + '}'
+  }
+
+  ELEMENT_WITH_METADATA = lambda { |_|
+    [call(METADATA), branch(SYMBOL, VECTOR, LIST, SET, MAP)].join(" ")
+  }
+
+  TAG = lambda { |_|
+    tag = call(SYMBOL)
+    guard tag =~ /^[A-Za-z]/
+    "##{tag}"
+  }
+
+  TAGGED_ELEMENT = lambda { |_|
+    [call(TAG), call(BASIC_ELEMENT)].join(" ")
+  }
+
+  INST = lambda { |_|
+    begin
+      DateTime.new(range(0, 2500), range(1, 12), range(1, 28), range(0, 23), range(0, 59), range(0, 59), "#{range(-12,12)}").to_edn
+    rescue ArgumentError
+      guard false
+    end
+  }
+
+  def rant(fun, count = REPEAT)
+    Rantly(count) { call(fun) }
+  end
+end