ruspea_lang 0.1.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: d980cd9fd209da6b5677dfd64cc160162d7b8b884237ba73802434c3dcef85eb
+  data.tar.gz: 8079ac9c2e75dc14a1f4d619909e0c570c09fdd23a7e2f732d453c9110ff15bf
+SHA512:
+  metadata.gz: 4ba192a000bc070ab3d33eb960606626d15782a9637b349c483951084b5cb4f0c901b24e0793a18628f249696b2e281f734649bc9c173b3c9e11af3d97d6a3ea
+  data.tar.gz: 949259c3771dc15795d85c243c2773ceebb6b00baf12879ab7aaba371f206124d7c6ed5b2d01b64aadfcc2f45389d96149ed6a8c4f09cf1fc1d7b066ace2a628

data/.gitignore

@@ -0,0 +1,11 @@
+/.bundle/
+/.yardoc
+/_yardoc/
+/coverage/
+/doc/
+/pkg/
+/spec/reports/
+/tmp/
+
+# rspec failure tracking
+.rspec_status

data/.rspec

@@ -0,0 +1,3 @@
+--format documentation
+--color
+--require spec_helper

data/.travis.yml

@@ -0,0 +1,7 @@
+---
+sudo: false
+language: ruby
+cache: bundler
+rvm:
+  - 2.5.5
+before_install: gem install bundler -v 2.0.1

data/Gemfile

@@ -0,0 +1,6 @@
+source "https://rubygems.org"
+
+# Specify your gem's dependencies in ruspea.gemspec
+gemspec
+
+gem "pry-byebug"

data/Gemfile.lock

@@ -0,0 +1,47 @@
+PATH
+  remote: .
+  specs:
+    ruspea_lang (0.1.1)
+      zeitwerk
+
+GEM
+  remote: https://rubygems.org/
+  specs:
+    byebug (11.0.1)
+    coderay (1.1.2)
+    diff-lcs (1.3)
+    method_source (0.9.2)
+    pry (0.12.2)
+      coderay (~> 1.1.0)
+      method_source (~> 0.9.0)
+    pry-byebug (3.7.0)
+      byebug (~> 11.0)
+      pry (~> 0.10)
+    rake (10.5.0)
+    rspec (3.8.0)
+      rspec-core (~> 3.8.0)
+      rspec-expectations (~> 3.8.0)
+      rspec-mocks (~> 3.8.0)
+    rspec-core (3.8.0)
+      rspec-support (~> 3.8.0)
+    rspec-expectations (3.8.2)
+      diff-lcs (>= 1.2.0, < 2.0)
+      rspec-support (~> 3.8.0)
+    rspec-mocks (3.8.0)
+      diff-lcs (>= 1.2.0, < 2.0)
+      rspec-support (~> 3.8.0)
+    rspec-support (3.8.0)
+    zeitwerk (2.1.9)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  bundler (~> 2.0)
+  pry-byebug
+  rake (~> 10.0)
+  rspec (~> 3.0)
+  ruspea_lang!
+
+BUNDLED WITH
+   2.0.2

data/LICENSE.txt

@@ -0,0 +1,21 @@
+The MIT License (MIT)
+
+Copyright (c) 2019 Ricardo Valeriano
+
+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,183 @@
+# Ruspea
+
+A Lisp dialect written in Ruby (and on itself)
+meant to be used as a standard Ruby gem.
+
+So if anyone asks:
+
+> What is this Ruspea thing on the Gemfile?
+
+You can go:
+
+> Nah. Just a gem.
+
+Then you can sneak in code like this in your project
+
+```lisp
+(def %fib
+  (fn [n]
+    (cond
+      ((= n 0) n)
+      ((= n 1) n)
+      (true
+        (+
+          (%fib (- n 1))
+          (%fib (- n 2)))))))
+```
+
+And execute it from Ruby like:
+
+```ruby
+Ruspea::Code.new.load("my/awesome/ruspea/script.rsp")
+```
+
+You can also bypass the file loading:
+
+```ruby
+require "ruspea-lang"
+
+code = <<~c
+(def plus1
+  (fn [num] (+ num 1)))
+(plus1 10)
+c
+
+eleven = Ruspea::Code.new.run(code).last
+puts eleven # => 11
+```
+
+## Is this a functional language? Is it interpreted?
+
+Yes.
+
+## Does it have a REPL?
+
+YES! After install it as a gem (`gem install ruspea_lang`),
+just go ahead and:
+
+```bash
+➜ ruspea
+loading repl: repl.rsp
+repl loaded.
+
+#user=> (def lol 1)
+1
+#user=> lol
+1
+#user=> (puts "hello world")
+hello world
+nil
+#user=> ^CSee you soon.
+```
+
+## Humm... but what about the Ruby stuff? The gems?! HUH!?
+
+Ruspea has Ruby interoperabillity built-in
+so you can "just use" Ruby:
+
+```lisp
+(def puts
+  (fn [str]
+    (.
+      (:: Kernel) puts str)))
+```
+
+In fact, the very minimal standard library is
+built on top of this interop capability.
+It is also the best source to look for usage/syntax/etc right now:
+[`lib/language/standard.rsp`](https://github.com/mistersourcerer/ruspea/blob/master/lib/language/standard.rsp)
+
+### OH! I see! This was inspired by Clojure?
+
+100%!
+
+### OH! I see! Is this as good as Clojure!?
+
+![LOL](https://i.imgflip.com/1joc8h.jpg)
+
+## Why would I use that, though? All those parenthesis...
+
+This is the actual question, isn't it?
+Sadly this is way out of the scope of this README.
+
+You will need to convince yourself here. 😬
+
+## Is this ready for production usage?
+
+Nope.
+And it will probably never be.
+
+This was just an exercise:
+
+  - Ruby is really fun.
+  - Lisp too.
+  - I am really (I mean REALLY) enjoying Clojure.
+  - And I really wanted to learn how to implemente a programming language.
+  - Lists are a great way to organize thoughts.
+
+If you put all this together you have this project.
+
+## Shortcomings
+
+Actually, I would prefer to avoid the term ~~shortcomings~~.
+
+The current social norm forces impossible standards
+on everyone and everything!
+
+I want to list the things I know are not perfect
+about this pretty little thing called Ruspea
+and I don't want to hurt it's feelings.
+
+Let's call those rough edges... *features*.
+Those are enhancements that are not here... just yet 😬.
+
+![Ironic](https://media.giphy.com/media/9MJ6xrgVR9aEwF8zCJ/source.gif)
+
+### Features
+
+  - No performance! Seriously. There is no optmization whatsoever to see here.
+  - No TCO. Goes hand to hand with the previous one.
+  - No standard library.
+  - No multi-arity functions.
+    They are in the Runtime though. Just to lazy to build the syntax reader for each right now.
+  - No examples. Besides the "standard library" ones ([`lib/language`](https://github.com/mistersourcerer/ruspea/blob/master/lib/language/standard.rsp))
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+```ruby
+gem "ruspea_lang"
+```
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install ruspea_lang
+
+
+### Why not just ruspea? Do we really need a `_lang` suffix?!
+
+Yes, we do:
+
+```
+Pushing gem to https://rubygems.org...
+There was a problem saving your gem: Name 'ruspea' is too close to typo-protected gem: rspec
+```
+
+## 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/mistersourcerer/ruspea.
+
+## License
+
+The gem is available as open source under the terms of the [MIT License](https://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 "ruspea"
+
+# 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(__FILE__)

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/exe/ruspea

@@ -0,0 +1,8 @@
+#!/usr/bin/env ruby
+require "ruspea"
+
+if ARGV.any? { |arg| arg == "-r" }
+  Ruspea::Repl::Loopr.new.run
+else
+  Ruspea::Repl::Loop.new.run
+end

data/lib/example.rb

@@ -0,0 +1,10 @@
+require "ruspea"
+
+code = <<~c
+(def plus1
+  (fn [num] (+ num 1)))
+(plus1 10)
+c
+
+eleven = Ruspea::Code.new.run(code).last
+puts eleven

data/lib/example.rsp

@@ -0,0 +1,23 @@
+(def %zerify
+  (fn [n]
+    (cond
+      ((= n 0)
+        (puts "-- end --"))
+      (true
+        (puts n)
+        (puts "--")
+        (cond
+          ((> n 10) (puts "not yet..."))
+          (true (puts "almost there"))
+        )
+        (%zerify (- n 1))))))
+
+(def %fib
+  (fn [n]
+    (cond
+      ((= n 0) n)
+      ((= n 1) n)
+      (true
+        (+
+          (%fib (- n 1))
+          (%fib (- n 2)))))))

data/lib/language/standard.rsp

@@ -0,0 +1,77 @@
+(def puts
+  (fn [str]
+    (.
+      (:: Kernel) puts str)))
+
+(def cons
+  (fn [el list]
+    (. list cons el)))
+
+(def head
+  (fn [list]
+    (. list head)))
+
+(def tail
+  (fn [list]
+    (. list tail)))
+
+(def empty?
+  (fn [list]
+    (. list empty?)))
+
+(def take
+  (fn [num list]
+    (. list take num)))
+
+(def =
+  (fn [lhs rhs]
+    (cond
+      ((. lhs == rhs) true)
+      (true false))))
+
+(def !=
+  (fn [lhs rhs]
+    (cond
+      ((. lhs != rhs) true)
+      (true false))))
+
+(def >
+  (fn [lhs rhs]
+    (cond
+      ((. lhs > rhs) true)
+      (true false))))
+
+(def <
+  (fn [lhs rhs]
+    (cond
+      ((. lhs > rhs) true)
+      (true false))))
+
+(def +
+  (fn [lhs rhs]
+    (. lhs + rhs)))
+
+(def -
+  (fn [lhs rhs]
+    (. lhs - rhs)))
+
+(def /
+  (fn [lhs rhs]
+    (. lhs / rhs)))
+
+(def *
+  (fn [lhs rhs]
+    (. lhs * rhs)))
+
+(def read
+  (fn [code]
+    (def reader (. (:: Ruspea::Interpreter::Reader) new))
+    (def code_and_forms (. reader call code))
+    (. code_and_forms "[]" 1)))
+
+(def load
+  (fn [path]
+    (puts (. "reading from " << path))
+    (eval
+      (read (. (:: File) read path))
+      (%ctx %ctx))))