calcula 0.1.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: acb99c969e886a94ca30cc534dc3db8c76f0ea0a
+  data.tar.gz: f5801be3a546e8aef049aa56cd566dcf53e27d0f
+SHA512:
+  metadata.gz: 6c254c1b82fd8b658e28b876fbaa8c2bde737e57360cc748640cca4253b5d2a451845d1196fc4ee0645cb5769faec78ecb014f7495c90967580fccdc94b60c46
+  data.tar.gz: 92c14c7803111bde6c62e52b128fccc6bc7f40d175b348f6178a67fd6def282222dea3407416076ad63bbd822255d75450ff7dc6d4d2caae982549a70142eecd

data/.gitignore

@@ -0,0 +1,9 @@
+/.bundle/
+/.yardoc
+/Gemfile.lock
+/_yardoc/
+/coverage/
+/doc/
+/pkg/
+/spec/reports/
+/tmp/

data/.rspec

@@ -0,0 +1,2 @@
+--format documentation
+--color

data/.travis.yml

@@ -0,0 +1,5 @@
+sudo: false
+language: ruby
+rvm:
+  - 2.3.1
+before_install: gem install bundler -v 1.13.2

data/CODE_OF_CONDUCT.md

@@ -0,0 +1,74 @@
+# Contributor Covenant Code of Conduct
+
+## Our Pledge
+
+In the interest of fostering an open and welcoming environment, we as
+contributors and maintainers pledge to making participation in our project and
+our community a harassment-free experience for everyone, regardless of age, body
+size, disability, ethnicity, gender identity and expression, level of experience,
+nationality, personal appearance, race, religion, or sexual identity and
+orientation.
+
+## Our Standards
+
+Examples of behavior that contributes to creating a positive environment
+include:
+
+* Using welcoming and inclusive language
+* Being respectful of differing viewpoints and experiences
+* Gracefully accepting constructive criticism
+* Focusing on what is best for the community
+* Showing empathy towards other community members
+
+Examples of unacceptable behavior by participants include:
+
+* The use of sexualized language or imagery and unwelcome sexual attention or
+advances
+* Trolling, insulting/derogatory comments, and personal or political attacks
+* Public or private harassment
+* Publishing others' private information, such as a physical or electronic
+  address, without explicit permission
+* Other conduct which could reasonably be considered inappropriate in a
+  professional setting
+
+## Our Responsibilities
+
+Project maintainers are responsible for clarifying the standards of acceptable
+behavior and are expected to take appropriate and fair corrective action in
+response to any instances of unacceptable behavior.
+
+Project maintainers have the right and responsibility to remove, edit, or
+reject comments, commits, code, wiki edits, issues, and other contributions
+that are not aligned to this Code of Conduct, or to ban temporarily or
+permanently any contributor for other behaviors that they deem inappropriate,
+threatening, offensive, or harmful.
+
+## Scope
+
+This Code of Conduct applies both within project spaces and in public spaces
+when an individual is representing the project or its community. Examples of
+representing a project or community include using an official project e-mail
+address, posting via an official social media account, or acting as an appointed
+representative at an online or offline event. Representation of a project may be
+further defined and clarified by project maintainers.
+
+## Enforcement
+
+Instances of abusive, harassing, or otherwise unacceptable behavior may be
+reported by contacting the project team at [plankp@outlook.com](mailto:plankp@outlook.com). All
+complaints will be reviewed and investigated and will result in a response that
+is deemed necessary and appropriate to the circumstances. The project team is
+obligated to maintain confidentiality with regard to the reporter of an incident.
+Further details of specific enforcement policies may be posted separately.
+
+Project maintainers who do not follow or enforce the Code of Conduct in good
+faith may face temporary or permanent repercussions as determined by other
+members of the project's leadership.
+
+## Attribution
+
+This Code of Conduct is adapted from the [Contributor Covenant][homepage], version 1.4,
+available at [http://contributor-covenant.org/version/1/4][version]
+
+[homepage]: http://contributor-covenant.org
+[version]: http://contributor-covenant.org/version/1/4/

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in calcula.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,21 @@
+The MIT License (MIT)
+
+Copyright (c) 2016 TODO: Write your name
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.

data/README.md

@@ -0,0 +1,50 @@
+# Calcula [![Build Status](https://travis-ci.org/plankp/Calcula.svg?branch=master)](https://travis-ci.org/plankp/Calcula) [![Inline docs](http://inch-ci.org/github/plankp/Calcula.svg?branch=master)](http://inch-ci.org/github/plankp/Calcula)
+
+When mathematics meets programming
+
+Think of this as a very over powered calculator since it allows you to define functions and such.
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+```ruby
+gem 'calcula'
+```
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install calcula
+
+## Usage
+
+At the moment, all it does is converts source code into tokens and then a syntax tree.
+To do so, type in:
+
+```ruby
+require "calcula"
+src = <<-'EOS'
+# Write some calcula code here
+EOS
+tokens = Calcula.lex(src)
+puts tokens.collect { |e| e.text }.to_s
+puts Calcula.parse(tokens).to_tree
+```
+
+## Development
+
+After checking out the repo, run `bin/setup` to install dependencies. Then, run `rake spec` to run the tests. You can also run `bin/console` for an interactive prompt that will allow you to experiment.
+
+To install this gem onto your local machine, run `bundle exec rake install`. To release a new version, update the version number in `version.rb`, and then run `bundle exec rake release`, which will create a git tag for the version, push git commits and tags, and push the `.gem` file to [rubygems.org](https://rubygems.org).
+
+## Contributing
+
+Bug reports and pull requests are welcome on GitHub at https://github.com/plankp/calcula. This project is intended to be a safe, welcoming space for collaboration, and contributors are expected to adhere to the [Contributor Covenant](./CODE_OF_CONDUCT.md) code of conduct.
+
+## License
+
+The gem is available as open source under the terms of the [MIT License](http://opensource.org/licenses/MIT).

data/Rakefile

@@ -0,0 +1,6 @@
+require "bundler/gem_tasks"
+require "rspec/core/rake_task"
+
+RSpec::Core::RakeTask.new(:spec)
+
+task :default => :spec

data/bin/console

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+require "bundler/setup"
+require "calcula"
+
+# You can add fixtures and/or initialization code here to make experimenting
+# with your gem easier. You can also use a different console, if you like.
+
+# (If you use this, don't forget to add pry to your Gemfile!)
+# require "pry"
+# Pry.start
+
+require "irb"
+IRB.start

data/bin/setup

@@ -0,0 +1,8 @@
+#!/usr/bin/env bash
+set -euo pipefail
+IFS=$'\n\t'
+set -vx
+
+bundle install
+
+# Do any other automated setup that you need to do here

data/calcula.gemspec

@@ -0,0 +1,35 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'calcula/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "calcula"
+  spec.version       = Calcula::VERSION
+  spec.authors       = ["Paul T."]
+  spec.email         = ["plankp@outlook.com"]
+
+  spec.summary       = %q{An experimental DSL that aims to be very math like}
+  spec.homepage      = "https://github.com/plankp/Calcula"
+  spec.license       = "MIT"
+
+  # Prevent pushing this gem to RubyGems.org. To allow pushes either set the 'allowed_push_host'
+  # to allow pushing to a single host or delete this section to allow pushing to any host.
+  if spec.respond_to?(:metadata)
+    spec.metadata['allowed_push_host'] = "https://rubygems.org"
+  else
+    raise "RubyGems 2.0 or newer is required to protect against " \
+      "public gem pushes."
+  end
+
+  spec.files         = `git ls-files -z`.split("\x0").reject do |f|
+    f.match(%r{^(test|spec|features)/})
+  end
+  spec.bindir        = "exe"
+  spec.executables   = spec.files.grep(%r{^exe/}) { |f| File.basename(f) }
+  spec.require_paths = ["lib"]
+
+  spec.add_development_dependency "bundler", "~> 1.13"
+  spec.add_development_dependency "rake", "~> 10.0"
+  spec.add_development_dependency "rspec", "~> 3.0"
+end

data/lib/Expr.rb

@@ -0,0 +1,21 @@
+module Calcula
+  class Expr
+
+    def to_s()
+      ""
+    end
+
+    def to_tree()
+      "()"
+    end
+
+    # binding: Hash[string, Any]
+    def exec(binding)
+      nil
+    end
+
+    def children()
+      []
+    end
+  end
+end

data/lib/Exprs/FuncExpr.rb

@@ -0,0 +1,39 @@
+require_relative "../Expr"
+
+module Calcula::Exprs
+  class FuncExpr < Calcula::Expr
+
+    # name: IdentExpr | Nil (for lambdas), params: ParamsExpr, action: Expr
+    def initialize(name, params, action)
+      @name = name
+      @params = params
+      @action = action
+    end
+
+    def to_s()
+      return "\\#{@params.to_s}(#{@action.to_s})" if @name == nil
+      return "#{@name.to_s}(#{@params.to_s})=#{@action.to_s}"
+    end
+
+    def to_tree()
+      return "(lambda #{@params.to_tree} #{@action.to_tree})" if @name == nil
+      return "(func #{@name.to_tree} #{@params.to_tree} #{@action.to_tree})"
+    end
+
+    def exec(binding)
+      if @name == nil then
+        # We return it (its a lambda function afterall...)
+      else
+        # We do not invoke this function. We just add it to the `binding`
+      end
+    end
+
+    def children()
+      [@name, @params, @action]
+    end
+
+    def self.mkLambda(params, action)
+      FuncExpr.new(nil, params, action)
+    end
+  end
+end

data/lib/Exprs/IdentExpr.rb

@@ -0,0 +1,27 @@
+require_relative "../Expr"
+
+module Calcula::Exprs
+  class IdentExpr < Calcula::Expr
+
+    # name: Token
+    def initialize(name)
+      @name = name
+    end
+
+    def to_s()
+      @name.text
+    end
+
+    def to_tree()
+      "(ident #{@name.text})"
+    end
+
+    def exec(binding)
+      binding[@name.text]
+    end
+
+    def children()
+      []
+    end
+  end
+end

data/lib/Exprs/NumExpr.rb

@@ -0,0 +1,27 @@
+require_relative "../Expr"
+
+module Calcula::Exprs
+  class NumExpr < Calcula::Expr
+
+    # num: Token
+    def initialize(num)
+      @num = num
+    end
+
+    def to_s()
+      @num.text
+    end
+
+    def to_tree()
+      "(num #{@num.text})"
+    end
+
+    def exec(binding)
+      return @num.text.to_f
+    end
+
+    def children()
+      []
+    end
+  end
+end

data/lib/Exprs/ParamsExpr.rb

@@ -0,0 +1,27 @@
+require_relative "../Expr"
+
+module Calcula::Exprs
+  class ParamsExpr < Calcula::Expr
+
+    # params: List[Token]
+    def initialize(params)
+      @params = params
+    end
+
+    def to_s()
+      @params.collect { |e| e.text }.join(',')
+    end
+
+    def to_tree()
+      "(#{to_s()})"
+    end
+
+    def exec(binding)
+      return to_s()
+    end
+
+    def children()
+      []
+    end
+  end
+end

data/lib/Lexer.rb

@@ -0,0 +1,137 @@
+class Array
+
+  # el: [T]
+  def ===(el)
+    return find_index(el) != nil
+  end
+end
+
+module Calcula
+  class Lexer
+    ZERO_TO_NINE = "0".."9"
+    A_TO_Z = ("a".."z").to_a + ("A" .. "Z").to_a
+
+    # src: string
+    def initialize(src)
+      @src = src
+      @i = 0
+      @lineNum = 0
+      @linePos = 0
+    end
+
+    # msg: string
+    def lexError(msg)
+      raise "Failed to lex past (L#{@lineNum + 1}:#{@linePos + 1}): #{if msg != "" then msg else "<no message>" end}"
+    end
+
+    # c: char
+    def advancePos(c)
+      @i += 1
+      if c == '\n' then
+        @lineNum += 1
+        @linePos = 0
+      else
+        @linePos += 1
+      end
+    end
+
+    def lex()
+      len = @src.length
+      rst = []
+      while @i < len do
+        case (@src[@i])
+        when "(" then
+          advancePos(@src[@i])
+          rst << Token.new(:PAREN_O, "(")
+        when ")" then
+          advancePos(@src[@i])
+          rst << Token.new(:PAREN_C, ")")
+        when "[" then
+          advancePos(@src[@i])
+          rst << Token.new(:SQUARE_O, "[")
+        when "]" then
+          advancePos(@src[@i])
+          rst << Token.new(:SQUARE_C, "]")
+        when "+" then
+          advancePos(@src[@i])
+          rst << Token.new(:OP_ADD, "+")
+        when "-" then
+          advancePos(@src[@i])
+          rst << Token.new(:OP_SUB, "-")
+        when "*" then
+          advancePos(@src[@i])
+          if @src[@i] == "*" then
+            advancePos(@src[@i])
+            rst << Token.new(:OP_POW, "**")
+          else
+            rst << Token.new(:OP_MUL, "*")
+          end
+        when "/" then
+          advancePos(@src[@i])
+          rst << Token.new(:OP_DIV, "/")
+        when "=" then
+          advancePos(@src[@i])
+          rst << Token.new(:ASSIGN, "=")
+        when "%" then
+          advancePos(@src[@i])
+          rst << Token.new(:OP_REM, "%")
+        when "$" then
+          advancePos(@src[@i])
+          rst << Token.new(:ROUND_DOLLAR, "$")
+        when "@" then
+          advancePos(@src[@i])
+          rst << Token.new(:COMPOSE, "@")
+        when ";" then
+          advancePos(@src[@i])
+          rst << Token.new(:DISP, ";")
+        when "\\" then
+          advancePos(@src[@i])
+          rst << Token.new(:LAMBDA, "\\")
+        when "," then
+          advancePos(@src[@i])
+          rst << Token.new(:COMMA, ",")
+        when "#" then
+          advancePos(buf = @src[@i])
+          while @i < len && @src[@i] != "\n" do
+            buf += @src[@i]
+            advancePos(@src[@i])
+          end
+          rst << Token.new(:COMMENT, buf)
+        when ZERO_TO_NINE then
+          advancePos(buf = @src[@i])
+          inDecimals = false
+          while @i < len && (ZERO_TO_NINE === @src[@i] || "." == @src[@i]) do
+            if @src[@i] == "." then
+              if !inDecimals then
+                inDecimals = true
+              else
+                break
+              end
+            end
+            buf += @src[@i]
+            advancePos(@src[@i])
+          end
+          rst << Token.new(:NUM, buf)
+        when A_TO_Z then
+          advancePos(buf = @src[@i])
+          while @i < len && (A_TO_Z === @src[@i] || "'" == @src[@i]) do
+            buf += @src[@i]
+            advancePos(@src[@i])
+          end
+          rst << Token.new(:ID, buf)
+        when [" ", "\t", "\r", "\f", "\n"] then
+          advancePos(ws = @src[@i])
+          rst << Token.new(:WS, ws)
+        else lexError("Unrecognized token starting with '#{@src[@i]}'")
+        end
+      end
+      return rst
+    end
+
+    def reset()
+      @i = 0
+      @lineNum = 0
+      @linePos = 0
+    end
+  end
+end

data/lib/Parser.rb

@@ -0,0 +1,130 @@
+require_relative "./Exprs/IdentExpr"
+require_relative "./Exprs/NumExpr"
+require_relative "./Exprs/ParamsExpr"
+require_relative "./Exprs/FuncExpr"
+
+class Calcula::Parser
+
+  include Calcula::Exprs
+
+  # toks: List[Tokens]
+  def initialize(toks)
+    @toks = toks
+    @i = 0
+  end
+
+  # unexpectedTok: Token | Nil, msg: string
+  def parseError(unexpectedTok, msg)
+    if unexpectedTok == nil then
+      raise "Unexpected EOF: #{if msg != "" then msg else "<no message>" end}"
+    end
+    raise "Unexpected token #{unexpectedTok.to_s}: #{if msg != "" then msg else "<no message>" end}"
+  end
+
+  # tokId: symbol
+  def consume(tokId)
+    cons = lookahead()
+    if cons == nil then
+      parseError(nil, "Expected token #{tokId}")
+    elsif cons.id == tokId then
+      @i += 1
+      return cons
+    else
+      parseError(@toks[@i], "Expected token #{tokId}")
+    end
+  end
+
+  def lookahead()
+    return nil if @i == @toks.length
+    while @toks[@i].id == :WS || @toks[@i].id == :COMMENT do
+      @i += 1
+    end
+    if @i < @toks.length then
+      return @toks[@i]
+    else
+      return nil
+    end
+  end
+
+  def parse()
+    if lookahead() != nil then
+      return basicValExpr()
+    end
+    return nil
+  end
+
+  # expr = parenExpr
+  def expr()
+    parenExpr()
+  end
+
+  # parenExpr = PAREN_O expr PAREN_C
+  #           | basicValExpr
+  def parenExpr()
+    tmp = lookahead()
+    parseError(nil, "Expected PAREN_O or basicValExpr") if tmp == nil
+
+    case tmp.id
+    when :PAREN_O then
+      consume(:PAREN_O)
+      inner = expr()
+      consume(:PAREN_C)
+      return inner
+    else return basicValExpr()
+    end
+  end
+
+  # basicValExpr = numExpr | identExpr
+  def basicValExpr()
+    tmp = lookahead()
+    parseError(nil, "Expected numExpr or identExpr") if tmp == nil
+
+    case tmp.id
+    when :NUM then
+      return numExpr()
+    when :ID then
+      return identExpr()
+    when :LAMBDA then
+      return lambdaExpr()
+    else parseError(tmp, "Expected numExpr or identExpr")
+    end
+  end
+
+  # paramsExpr = ID (COMMA ID)+
+  #            | ID
+  def paramsExpr()
+    params = [consume(:ID)]
+    while true
+      begin
+        tmp = consume(:COMMA)
+      rescue Exception
+        break
+      end
+      params << consume(:ID)
+    end
+    return ParamsExpr.new(params)
+  end
+
+  # lambdaExpr = LAMBDA paramsExpr parenExpr
+  def lambdaExpr()
+    consume(:LAMBDA)
+    params = paramsExpr()
+    return FuncExpr.mkLambda(params, parenExpr())
+  end
+
+  # numExpr = NUM
+  def numExpr()
+    tok = consume(:NUM)
+    return NumExpr.new(tok)
+  end
+
+  # identExpr = ID
+  def identExpr()
+    tok = consume(:ID)
+    return IdentExpr.new(tok)
+  end
+
+  def reset()
+    @i = 0
+  end
+end

data/lib/Token.rb

@@ -0,0 +1,15 @@
+class Calcula::Token
+  attr_reader :id, :text
+
+  # id: symbol, text: string
+  def initialize(id, text)
+    @id = id
+    @text = text
+  end
+  def to_s()
+    return "[#{@id}=>#{text}]"
+  end
+  def dup()
+    Token.new(@id, @text)
+  end
+end

data/lib/calcula/version.rb

@@ -0,0 +1,3 @@
+module Calcula
+  VERSION = "0.1.0"
+end

data/lib/calcula.rb

@@ -0,0 +1,15 @@
+require "calcula/version"
+require "Token"
+require "Lexer"
+require "Parser"
+
+module Calcula
+
+  def Calcula::lex(txt)
+    Lexer.new(txt).lex
+  end
+
+  def Calcula::parse(toks)
+    Parser.new(toks).parse
+  end
+end

metadata

@@ -0,0 +1,108 @@
+--- !ruby/object:Gem::Specification
+name: calcula
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+platform: ruby
+authors:
+- Paul T.
+autorequire: 
+bindir: exe
+cert_chain: []
+date: 2016-10-03 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.13'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.13'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.0'
+description: 
+email:
+- plankp@outlook.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- ".rspec"
+- ".travis.yml"
+- CODE_OF_CONDUCT.md
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- bin/console
+- bin/setup
+- calcula.gemspec
+- lib/Expr.rb
+- lib/Exprs/FuncExpr.rb
+- lib/Exprs/IdentExpr.rb
+- lib/Exprs/NumExpr.rb
+- lib/Exprs/ParamsExpr.rb
+- lib/Lexer.rb
+- lib/Parser.rb
+- lib/Token.rb
+- lib/calcula.rb
+- lib/calcula/version.rb
+homepage: https://github.com/plankp/Calcula
+licenses:
+- MIT
+metadata:
+  allowed_push_host: https://rubygems.org
+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: []
+rubyforge_project: 
+rubygems_version: 2.5.1
+signing_key: 
+specification_version: 4
+summary: An experimental DSL that aims to be very math like
+test_files: []