conflisp 1.0.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: 34e85b7514e76a0fb5709c69c5cafaa87cdd42be254f708acf48564e30ea4712
+  data.tar.gz: 6d39a6a091b1e2e8de18f875efcdea4b14d19c686ea2c626bb1f67a032f0824c
+SHA512:
+  metadata.gz: 3bdaf8b254d7c0deeb2ba60e5e81bcc9718f5382e726bc4396655378fddfe38f5ba674549dcc3d54fcade64bef81acc4ef634f983ee648e00c93219026225bd3
+  data.tar.gz: 9faf45a09a04e50e634e5ba5ce2556931c82ea5487d43e530ad8fec0d3fc317540411dfbc8dbcdc3e2e669e2c223ddd420ad90c1d7c18adf86757785a6ed91f4

data/lib/conflisp.rb

@@ -0,0 +1,3 @@
+# frozen_string_literal: true
+
+require 'conflisp/language'

data/lib/conflisp/conflisp_error.rb

@@ -0,0 +1,5 @@
+# frozen_string_literal: true
+
+module Conflisp
+  ConflispError = Class.new(StandardError)
+end

data/lib/conflisp/dsl.rb

@@ -0,0 +1,23 @@
+# frozen_string_literal: true
+
+module Conflisp
+  # A nice helper DSL for building up Conflisp languages
+  class DSL
+    attr_reader :registry
+
+    def self.define(&block)
+      registry = {}
+      dsl = new(registry: registry)
+      dsl.instance_exec(&block)
+      registry
+    end
+
+    def initialize(registry:)
+      @registry = registry
+    end
+
+    def fn(name, implementation)
+      registry[name.to_s] = implementation
+    end
+  end
+end

data/lib/conflisp/evaluator.rb

@@ -0,0 +1,48 @@
+# frozen_string_literal: true
+
+require 'conflisp/method_missing'
+
+module Conflisp
+  # Evaluator takes s-expressions and resolves them into Ruby values
+  class Evaluator
+    attr_reader :registry, :globals
+
+    def initialize(registry:, globals:)
+      @registry = registry
+      @globals = globals
+    end
+
+    def resolve(expression) # rubocop:disable Metrics/MethodLength
+      case expression
+      when Array
+        # In Lisp, Arrays are function calls
+        fn, *raw_args = expression
+        fn = fn.to_s
+        args = raw_args.map { |arg| resolve(arg) }
+        if fn == 'global'
+          globals.dig(*args)
+        elsif fn_defined?(fn)
+          apply(fn, *args)
+        else
+          # TODO: It would be nice to get error messages with a stacktrace or at
+          # least some context about the parent expressions
+          raise MethodMissing, "Unknown fn #{fn} in expression #{expression}"
+        end
+      when Hash
+        expression.transform_values do |value|
+          resolve(value)
+        end
+      else
+        expression
+      end
+    end
+
+    def fn_defined?(fn_name)
+      registry.key?(fn_name)
+    end
+
+    def apply(fn_name, *args)
+      instance_exec(*args, &registry[fn_name])
+    end
+  end
+end

data/lib/conflisp/language.rb

@@ -0,0 +1,30 @@
+# frozen_string_literal: true
+
+require 'conflisp/dsl'
+require 'conflisp/evaluator'
+
+module Conflisp
+  # A collection of functions that can evaluate JSON encoded s-expressions
+  class Language
+    attr_reader :registry
+
+    def self.define(&block)
+      method_registry = DSL.define(&block)
+      new(registry: method_registry)
+    end
+
+    def initialize(registry:)
+      @registry = registry
+    end
+
+    def evaluate(expression, globals: {})
+      evaluator = Evaluator.new(registry: registry, globals: globals)
+      evaluator.resolve(expression)
+    end
+
+    def extend(&block)
+      new_registry = DSL.define(&block)
+      self.class.new(registry: registry.merge(new_registry))
+    end
+  end
+end

data/lib/conflisp/method_missing.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+require 'conflisp/conflisp_error'
+
+module Conflisp
+  MethodMissing = Class.new(ConflispError)
+end

metadata

@@ -0,0 +1,105 @@
+--- !ruby/object:Gem::Specification
+name: conflisp
+version: !ruby/object:Gem::Version
+  version: 1.0.0
+platform: ruby
+authors:
+- Rocky Meza
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2019-06-06 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 3.7.0
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 3.7.0
+- !ruby/object:Gem::Dependency
+  name: rspec_junit_formatter
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 0.4.1
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 0.4.1
+- !ruby/object:Gem::Dependency
+  name: rubocop
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 0.71.0
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 0.71.0
+- !ruby/object:Gem::Dependency
+  name: simplecov
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 0.16.1
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 0.16.1
+description: 
+email:
+- rocky@geteverwise.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/conflisp.rb
+- lib/conflisp/conflisp_error.rb
+- lib/conflisp/dsl.rb
+- lib/conflisp/evaluator.rb
+- lib/conflisp/language.rb
+- lib/conflisp/method_missing.rb
+homepage: https://github.com/everwise/conflisp
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubygems_version: 3.0.3
+signing_key: 
+specification_version: 4
+summary: A tool for building JSON-serializable lisps.
+test_files: []