code-ruby 3.1.2 → 4.0.0

data/spec/code/object/function_spec.rb

@@ -1,268 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe Code::Object::Function do
-  [
-    ["even? = (i) => { i.even? } even?(2)", "true"],
-    ["even? = (i:) => { i.even? } even?(i: 2)", "true"],
-    ["add = (a, b) => { a + b } add(1, 2)", "3"],
-    ["minus = (a:, b:) => { a - b } minus(b: 1, a: 2)", "1"]
-  ].each do |input, expected|
-    it "#{input} == #{expected}" do
-      expect(Code.evaluate(input)).to eq(Code.evaluate(expected))
-    end
-  end
-
-  context "valid" do
-    [
-      "f = () => {} f",
-      "f = (x) => {} f(1)",
-      "f = (x:) => {} f(x: 1)"
-    ].each do |input|
-      it "#{input} is valid" do
-        Code.evaluate(input)
-      end
-    end
-  end
-
-  context "invalid" do
-    [
-      "f = (x) => {} f()",
-      "f = (x:) => {} f(1)",
-      "f = (x:) => {} f(y: 1)"
-    ].each do |input|
-      it "#{input} is invalid" do
-        expect { Code.evaluate(input) }.to raise_error(Code::Error)
-      end
-    end
-  end
-
-  it "evaluates omitted keyword argument defaults" do
-    result = Code.evaluate(<<~CODE)
-      f = (number: 1, text: "fallback", missing: nothing, headers: {}) => {
-        [
-          number,
-          text,
-          missing.nothing?,
-          headers.merge({ authorization: "Bearer x" })
-        ]
-      }
-
-      f()
-    CODE
-
-    expect(result).to eq(
-      Code.evaluate('[1, "fallback", true, { authorization: "Bearer x" }]')
-    )
-  end
-
-  it "evaluates keyword defaults in the call context" do
-    expect(Code.evaluate("f = (a:, b: a + 1) => { b } f(a: 2)")).to eq(
-      Code.evaluate("3")
-    )
-  end
-
-  it "binds self when calling a function stored on a dictionary" do
-    result = Code.evaluate(<<~CODE)
-      object = {}
-      object.value = 1
-      object.fetch = () => {
-        self.value
-      }
-      object.fetch()
-    CODE
-
-    expect(result).to eq(
-      Code.evaluate("1")
-    )
-  end
-
-  it "captures self for constructor-like functions that return self" do
-    result = Code.evaluate(<<~CODE)
-        User = (given_name:, family_name:, birth_date:) => {
-          self.given_name = given_name.to_string.presence
-          self.family_name = family_name.to_string.presence
-          self.birth_date = birth_date.presence&.to_date
-          self.full_name = () => {
-            [self.given_name, self.family_name].compact.join(" ")
-          }
-          self.age = () => {
-            return unless(self.birth_date)
-
-            self.birth_date.year
-          }
-
-          return(self)
-        }
-
-        user = User(given_name: "Dorian", family_name: "Marie", birth_date: "1992-08-11")
-        [user.given_name, user.family_name, user.full_name, user.age]
-      CODE
-
-    expect(result).to eq(
-      Code::Object::List.new(
-        [
-          Code::Object::String.new("Dorian"),
-          Code::Object::String.new("Marie"),
-          Code::Object::String.new("Dorian Marie"),
-          Code::Object::Integer.new(1992)
-        ]
-      )
-    )
-  end
-
-  it "binds parent to the enclosing self for nested constructor functions" do
-    result = Code.evaluate(<<~CODE)
-        Account = (name:) => {
-          self.name = name
-
-          self.Project = (name:) => {
-            self.name = name
-
-            self.Task = (name:) => {
-              self.name = name
-
-              [
-                self.name,
-                parent.name,
-                parent.parent.name
-              ]
-            }
-
-            return(self)
-          }
-
-          return(self)
-        }
-
-        account = Account(name: "Acme")
-        Project = account.get(:Project)
-        project = Project(name: "Migration")
-        Task = project.get(:Task)
-        Task(name: "Import")
-      CODE
-
-    expect(result).to eq(
-      Code.evaluate('["Import", "Migration", "Acme"]')
-    )
-  end
-
-  it "allows parent chains deeper than two levels" do
-    result = Code.evaluate(<<~CODE)
-        A = (name:) => {
-          self.name = name
-          self.B = (name:) => {
-            self.name = name
-            self.C = (name:) => {
-              self.name = name
-              self.D = (name:) => {
-                self.name = name
-                parent.parent.parent.name
-              }
-              return(self)
-            }
-            return(self)
-          }
-          return(self)
-        }
-
-        a = A(name: "a")
-        B = a.get(:B)
-        b = B(name: "b")
-        C = b.get(:C)
-        c = C(name: "c")
-        D = c.get(:D)
-        D(name: "d")
-      CODE
-
-    expect(result).to eq(Code::Object::String.new("a"))
-  end
-
-  it "supports constructor methods on functions" do
-    result = Code.evaluate(<<~CODE)
-        User = (given_name:, family_name:) => {
-          self.given_name = given_name
-          self.family_name = family_name
-          self.full_name = () => {
-            [self.given_name, self.family_name].join(" ")
-          }
-          return(self)
-        }
-
-        User.all = () => {
-          [
-            User(given_name: "Dorian", family_name: "Marie"),
-            User(given_name: "Ada", family_name: "Lovelace")
-          ]
-        }
-
-        User.first = () => {
-          User.all.first
-        }
-
-        User.first.full_name
-      CODE
-
-    expect(result).to eq(Code::Object::String.new("Dorian Marie"))
-  end
-
-  it "supports extending constructors and forwarding super arguments" do
-    result = Code.evaluate(<<~CODE)
-        Person = (given_name:, family_name:) => {
-          self.given_name = given_name
-          self.family_name = family_name
-          self.full_name = () => {
-            [self.given_name, self.family_name].join(" ")
-          }
-          return(self)
-        }
-
-        Employee = Person.extend((employee_id:, given_name:, family_name:) => {
-          super
-          self.employee_id = employee_id
-          return(self)
-        })
-
-        employee = Employee(employee_id: "EMP-001", given_name: "Dorian", family_name: "Marie")
-        [employee.employee_id, employee.full_name]
-      CODE
-
-    expect(result).to eq(
-      Code::Object::List.new(
-        [
-          Code::Object::String.new("EMP-001"),
-          Code::Object::String.new("Dorian Marie")
-        ]
-      )
-    )
-  end
-
-  it "distinguishes super from super()" do
-    result = Code.evaluate(<<~CODE)
-        Person = (given_name:, family_name:) => {
-          self.full_name = () => {
-            [given_name, family_name].join(" ")
-          }
-          return(self)
-        }
-
-        Anonymous = Person.extend(() => {
-          super()
-          self.full_name = () => { "anonymous" }
-          return(self)
-        })
-
-        [Anonymous().full_name, Person(given_name: "Ada", family_name: "Lovelace").full_name]
-      CODE
-
-    expect(result).to eq(
-      Code::Object::List.new(
-        [
-          Code::Object::String.new("anonymous"),
-          Code::Object::String.new("Ada Lovelace")
-        ]
-      )
-    )
-  end
-end

data/spec/code/object/http_spec.rb

@@ -1,33 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe Code::Object::Http do
-  describe ".code_get" do
-    it "wraps connection reset errors as Code::Error" do
-      allow_any_instance_of(Net::HTTP).to receive(:request).and_raise(
-        Errno::ECONNRESET,
-        "Connection reset by peer - SSL_connect"
-      )
-
-      expect do
-        described_class.code_get(
-          Code::Object::String.new("https://httpbin.org/status/200")
-        )
-      end.to raise_error(Code::Error, "http error")
-    end
-
-    it "wraps name resolution errors as Code::Error" do
-      allow_any_instance_of(Net::HTTP).to receive(:request).and_raise(
-        Socket::ResolutionError,
-        "getaddrinfo(3): Temporary failure in name resolution"
-      )
-
-      expect do
-        described_class.code_get(
-          Code::Object::String.new("https://api.github.com")
-        )
-      end.to raise_error(Code::Error, "http error")
-    end
-  end
-end

data/spec/code/object/ics_spec.rb

@@ -1,50 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe Code::Object::Ics do
-  it "normalizes binary event strings before json serialization" do
-    source = <<~ICS
-        BEGIN:VCALENDAR
-        VERSION:2.0
-        PRODID:-//code-ruby//EN
-        BEGIN:VEVENT
-        UID:event-1
-        DTSTART:20260327T120000Z
-        DTEND:20260327T133000Z
-        SUMMARY:Joséphine
-        DESCRIPTION:https://luma.com/opv3owre
-        END:VEVENT
-        END:VCALENDAR
-      ICS
-
-    events = described_class.code_parse(Code::Object::String.new(source.b))
-
-    expect do
-      expect(events.to_json).to include("Joséphine")
-    end.not_to output.to_stderr
-  end
-
-  it "serializes comma-separated descriptions as strings" do
-    source = <<~ICS
-        BEGIN:VCALENDAR
-        VERSION:2.0
-        PRODID:-//code-ruby//EN
-        BEGIN:VEVENT
-        UID:event-2
-        DTSTART:20260401T170000Z
-        DTEND:20260401T190000Z
-        SUMMARY:Le Cirque du Donut
-        DESCRIPTION:Bonjour Paris !\\nLe 1er avril, Kate Raworth vous donne rendez-vous, pour une soirée inédite.
-        END:VEVENT
-        END:VCALENDAR
-      ICS
-
-    events = described_class.code_parse(Code::Object::String.new(source))
-    description = events.raw.first.code_get("description").raw
-
-    expect(description).to be_a(String)
-    expect(description).to include("Le 1er avril, Kate Raworth")
-    expect(description).to include("rendez-vous, pour")
-  end
-end

data/spec/code/object/integer_spec.rb

@@ -1,42 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe Code::Object::Integer do
-  [
-    ["10 % 5", "0"],
-    ["5 * 2", "10"],
-    ["2 ** 2", "4"],
-    ["1 + 1", "2"],
-    ["1 - 0", "1"],
-    ["-1", "1 - 2"],
-    ["1 / 2", "0.5"],
-    ["1 < 2", "true"],
-    ["1 <= 1", "true"],
-    ["1 <=> 2", "-1"],
-    ["1 > 0", "true"],
-    ["1 >= 1", "true"],
-    ["1 === 1", "true"],
-    %w[-1.abs 1],
-    %w[-1.ceil -1],
-    %w[1234.ceil(-2) 1300],
-    %w[-1.floor -1],
-    %w[1234.floor(-2) 1200],
-    %w[1.round 1],
-    %w[1234.round(-2) 1200],
-    %w[0.zero? true],
-    %w[1.truncate 1],
-    %w[1234.truncate(-2) 1200],
-    %w[1.to_string :1],
-    %w[1.to_integer 1],
-    %w[1.to_decimal 1.0],
-    %w[4.sqrt 2.0],
-    ["1 + 2", "3"],
-    ["2 - 1", "1"],
-    ["a = 2 - 1 a", "1"]
-  ].each do |input, expected|
-    it "#{input} == #{expected}" do
-      expect(Code.evaluate(input)).to eq(Code.evaluate(expected))
-    end
-  end
-end

data/spec/code/object/list_spec.rb

@@ -1,22 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe Code::Object::List do
-  [
-    ["[] == []", "true"],
-    ["[nothing, 1, false, \"\"].compact", '[1, false, ""]'],
-    ["[nothing, 1, false, \"\"].compact(&:blank?)", "[1]"],
-    ["[1, 2, 3].sum", "6"],
-    ["[1, 2] + [3, 4]", "[1, 2, 3, 4]"],
-    ["[] + []", "[]"],
-    ["[1, 2, 3].second", "2"],
-    ["[1, 2, 3].third", "3"],
-    %w[(1..100).to_list.one_hundredth 100],
-    ["[1, 2, 3].one_hundredth", "nothing"]
-  ].each do |input, expected|
-    it "#{input} == #{expected}" do
-      expect(Code.evaluate(input)).to eq(Code.evaluate(expected))
-    end
-  end
-end

data/spec/code/object/nothing_spec.rb

@@ -1,14 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe Code::Object::Nothing do
-  [
-    %w[nothing nothing],
-    ["nothing nothing", "nothing"]
-  ].each do |input, expected|
-    it "#{input} == #{expected}" do
-      expect(Code.evaluate(input)).to eq(Code.evaluate(expected))
-    end
-  end
-end

data/spec/code/object/range_spec.rb

@@ -1,23 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe Code::Object::Range do
-  [
-    %w[(0..1).any?(&:even?) true],
-    %w[(0..1).all?(&:even?) false],
-    ["a = 0 (0..1).each { a += 1 } a", "2"],
-    ["(0..1).select(&:even?)", "[0]"],
-    ["(0..1).map(&:increment)", "[1, 2]"],
-    ["(0..10).step(3)", "[0, 3, 6, 9]"],
-    ["(0...9).step(3)", "[0, 3, 6]"],
-    ["(0..1).to_list", "[0, 1]"],
-    ["(0...1).to_list", "[0]"],
-    %w[(0..1).first 0],
-    %w[(0..1).last 1]
-  ].each do |input, expected|
-    it "#{input} == #{expected}" do
-      expect(Code.evaluate(input)).to eq(Code.evaluate(expected))
-    end
-  end
-end

data/spec/code/object/string_spec.rb

@@ -1,26 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe Code::Object::String do
-  [
-    %w[:a a],
-    %w[:a_b_c_0123 a_b_c_0123],
-    %w[:Hello Hello],
-    %w[:Hello Hello],
-    ['"Hello\nWorld"', "Hello\nWorld"],
-    ["'Hello\\nWorld'", "Hello\nWorld"]
-  ].each do |input, expected|
-    it "(#{input}).to_s == #{expected.inspect}" do
-      expect(Code.evaluate(input).to_s).to eq(expected)
-    end
-  end
-
-  describe "#code_strip" do
-    it "replaces invalid utf-8 bytes instead of raising" do
-      string = described_class.new("\xC3 ".b.force_encoding(Encoding::UTF_8))
-
-      expect(string.code_strip.to_s).to eq("\uFFFD")
-    end
-  end
-end

data/spec/code/parser/boolean_spec.rb

@@ -1,11 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe "parser boolean" do
-  [%w[true !false], %w[false !true]].each do |input, expected|
-    it "#{input} == #{expected}" do
-      expect(Code.evaluate(input)).to eq(Code.evaluate(expected))
-    end
-  end
-end

data/spec/code/parser/chained_call_spec.rb

@@ -1,16 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe "parser chained call" do
-  [
-    "a.b",
-    "user.first_name",
-    "user.admin?",
-    'user.update!(name: "Dorian")'
-  ].each do |input|
-    it "parses #{input}" do
-      Code::Parser.parse(input)
-    end
-  end
-end

data/spec/code/parser/dictionary_spec.rb

@@ -1,18 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe "parser dictionary" do
-  [
-    "{}",
-    "{ }",
-    "{/* comment */}",
-    "{ a: 1, b: 2, c: 3 }",
-    '{ "first_name": "Dorian" }',
-    "{ end: 2 }"
-  ].each do |input|
-    it "parses #{input}" do
-      Code::Parser.parse(input)
-    end
-  end
-end

data/spec/code/parser/function_spec.rb

@@ -1,16 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe "parser function" do
-  [
-    "() => {}",
-    "(a, b) => { add(a, b) }",
-    "(a:, b:) => { add(a, b) }",
-    "(end:) => { nothing }"
-  ].each do |input|
-    it "parses #{input}" do
-      Code::Parser.parse(input)
-    end
-  end
-end

data/spec/code/parser/group_spec.rb

@@ -1,11 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe "parser group" do
-  ["(true (nothing))"].each do |input|
-    it "parses #{input}" do
-      Code::Parser.parse(input)
-    end
-  end
-end

data/spec/code/parser/if_modifier_spec.rb

@@ -1,18 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe "parser if modifier" do
-  [
-    ["1 if true", "1"],
-    ["1 if false", "nothing"],
-    ["1 unless true", "nothing"],
-    ["1 unless false", "1"],
-    ["a = 0 (a += 1) while a < 10 a", "10"],
-    ["a = 0 (a += 1) until a > 10 a", "11"]
-  ].each do |input, expected|
-    it "#{input} == #{expected}" do
-      expect(Code.evaluate(input)).to eq(Code.evaluate(expected))
-    end
-  end
-end

data/spec/code/parser/list_spec.rb

@@ -1,17 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe "parser list" do
-  [
-    "[]",
-    "[ ]",
-    "[/* comment */]",
-    "[1, 2, 3]",
-    "['hello', 1, true, [false, nothing]]"
-  ].each do |input|
-    it "parses #{input}" do
-      Code::Parser.parse(input)
-    end
-  end
-end

data/spec/code/parser/number_spec.rb

@@ -1,11 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe "parser number" do
-  %w[0 1 1.1 123.123 1_000.12_244 0xf0 0o70 0b10].each do |input|
-    it "parses #{input}" do
-      Code::Parser.parse(input)
-    end
-  end
-end

data/spec/code/parser/string_spec.rb

@@ -1,20 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe "parser string" do
-  [
-    "''",
-    '""',
-    "'Hello Dorian'",
-    '"Hello Dorian"',
-    "'Hello \\{name}'",
-    '"Hello \\{name}"',
-    "'Hello {name}'",
-    '"Hello {name}"'
-  ].each do |input|
-    it "parses #{input}" do
-      Code::Parser.parse(input)
-    end
-  end
-end

data/spec/code/parser_spec.rb

@@ -1,52 +0,0 @@
-# frozen_string_literal: true
-
-require "spec_helper"
-
-RSpec.describe Code::Parser do
-  [
-    "",
-    "  ",
-    "\n",
-    "# comment",
-    "dorian = 1 dorian#.to_something",
-    "/* comment",
-    "/* comment */",
-    "// comment",
-    "/* first comment */ # second comment",
-    "nothing",
-    "  nothing  ",
-    "nothing nothing nothing"
-  ].each do |input, _output|
-    it input.inspect do
-      described_class.parse(input)
-    end
-  end
-
-  Dir["spec/fixtures/code/parser/**/*.code"].each do |filename|
-    it "parses #{filename}" do
-      described_class.parse(File.read(filename))
-    end
-  end
-
-  it "raises instead of hanging when lexing makes no progress" do
-    parser = described_class.new('"hello"')
-
-    allow(parser).to receive(:scan_string).and_return({ parts: [], index: 0 })
-
-    expect { parser.send(:lex, '"hello"') }.to raise_error(
-      Code::Parser::Error,
-      /lexer made no progress/
-    )
-  end
-
-  it "raises instead of hanging when parsing makes no progress" do
-    parser = described_class.new("a\n.b")
-
-    allow(parser).to receive(:skip_newlines)
-
-    expect { parser.parse }.to raise_error(
-      Code::Parser::Error,
-      /parser made no progress/
-    )
-  end
-end