schaefer 0.0.2 → 0.0.3

data/.gitignore

@@ -15,3 +15,8 @@ spec/reports
 test/tmp
 test/version_tmp
 tmp
+*.sch~
+*.rb~
+.DS_STORE
+*.environment.rb.swp
+*.gitignore~

data/Examples/exampleGreater.sch

@@ -0,0 +1,7 @@
+(define one 1)
+(define two 2)
+
+(if(isgreater? one two)
+  (write "1 > 2")
+  (write "1 < 2"))
+

data/Examples/exampleLesser.sch

@@ -0,0 +1,6 @@
+(define one 1)
+(define two 2)
+
+(if(isLesser? one two)
+  (write "1 < 2")
+  (write "1 > 2"))

data/Examples/exampleMultipy.sch

@@ -0,0 +1,3 @@
+(display "2*4 = ")
+(write (* 2 4))
+

data/README.md

@@ -1,6 +1,6 @@
 # Schaefer
 
-TODO: Write a gem description
+SchaeferScript is a small programming language that resembles lisp and scheme. SchaeferScript was designed to demonstrate how a programming language can be built in ruby. This language is primarily instructionall, but is very flexible and can eventually be written in itself.
 
 ## Installation
 
@@ -18,12 +18,16 @@ Or install it yourself as:
 
 ## Usage
 
-TODO: Write usage instructions here
+By running the command: 
+  
+    schaefer
 
-## Contributing
+you enter into the command line interface where programs can be executed line by line. By passing a file to the 'schaefer' command:
 
-1. Fork it
-2. Create your feature branch (`git checkout -b my-new-feature`)
-3. Commit your changes (`git commit -am 'Added some feature'`)
-4. Push to the branch (`git push origin my-new-feature`)
-5. Create new Pull Request
+    schaefer <file>
+
+ the file is executed. To run in verbose mode call: 
+
+    schaefer -v <file>
+
+Running in verbose mode will output non-displayed returns.

data/lib/schaefer/Library/isgreater.sch

@@ -0,0 +1,8 @@
+(define isgreater?
+  (native_function "
+    Proc.new do |arguments, interpreter|
+      arguments.slice(1, arguments.length).all? do |x|
+        interpreter.evaluate(arguments[0]) > interpreter.evaluate(x)
+      end
+    end
+    "))

data/lib/schaefer/Library/islesser.sch

@@ -0,0 +1,10 @@
+(define isLesser? 
+  (native_function "
+    Proc.new() do |arguments, interpreter|
+      arguments.slice(1, arguments.length).all? do |x|
+        interpreter.evaluate(arguments[0]) < interpreter.evaluate(x)
+      end
+    end
+  "))
+
+(define < isLesser?)

data/lib/schaefer/Library/multiplicationOperator.sch

@@ -0,0 +1,7 @@
+(define *
+  (native_function "
+    Proc.new() do |arguments, interpreter|
+      tmp = arguments.map {|item| interpreter.evaluate(item)}
+      tmp.inject {|sum, n| sum * n}
+    end
+  "))

data/lib/schaefer/version.rb

@@ -1,3 +1,3 @@
 module Schaefer
-  VERSION = "0.0.2"
+  VERSION = "0.0.3"
 end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: schaefer
 version: !ruby/object:Gem::Version 
-  hash: 27
+  hash: 25
   prerelease: 
   segments: 
   - 0
   - 0
-  - 2
-  version: 0.0.2
+  - 3
+  version: 0.0.3
 platform: ruby
 authors: 
 - Tommy Schaefer
@@ -31,6 +31,7 @@ extra_rdoc_files: []
 files: 
 - .DS_Store
 - .gitignore
+- .gitignore~
 - Examples/.DS_Store
 - Examples/exampleAdd.sch
 - Examples/exampleAdd.sch~
@@ -39,11 +40,12 @@ files:
 - Examples/exampleDo.sch
 - Examples/exampleDo.sch~
 - Examples/exampleFunction.sch
-- Examples/exampleFunction.sch~
 - Examples/exampleFunction2.sch
 - Examples/exampleGets.sch
+- Examples/exampleGreater.sch
 - Examples/exampleIf.sch
-- Examples/exampleIf.sch~
+- Examples/exampleLesser.sch
+- Examples/exampleMultipy.sch
 - Examples/exampleWrite.sch
 - Examples/exampleWrite.sch~
 - Gemfile
@@ -68,6 +70,9 @@ files:
 - lib/schaefer/Library/if.sch
 - lib/schaefer/Library/if.sch~
 - lib/schaefer/Library/input.sch
+- lib/schaefer/Library/isgreater.sch
+- lib/schaefer/Library/islesser.sch
+- lib/schaefer/Library/multiplicationOperator.sch
 - lib/schaefer/Library/write.sch
 - lib/schaefer/Library/write.sch~
 - lib/schaefer/environment.rb

data/Examples/exampleFunction.sch~

@@ -1,11 +0,0 @@
-(define program
-  (lambda ()
-    (display "Enter password (Hint its password): ")
-    (define response (input))
-    (if (= response "password")
-      (write "Great Job!")
-      (do
-        (write "Im sorry. Thats incorrect!")
-        (program)))))
-
-(program)

data/Examples/exampleIf.sch~

@@ -1,13 +0,0 @@
-(define one 1)
-(define won 1)
-(define two 2)
-(define too 2)
-
-(if (= one won)
-  (begin(write "1 = 1")(write "Woohoo!"))
-  (write "1 != 1"))
-
-(if (equal? one two)
-  (write "1 = 2")
-  (write "1 != 2"))
-