skeem 0.2.14 → 0.2.18

data/spec/skeem/s_expr_nodes_spec.rb

@@ -1,3 +1,5 @@
+# frozen_string_literal: true
+
 require 'ostruct'
 require_relative '../spec_helper' # Use the RSpec framework
 require_relative '../../lib/skeem/runtime'
@@ -6,7 +8,7 @@ require_relative '../../lib/skeem/s_expr_nodes' # Load the classes under test
 
 module Skeem
   describe ProcedureCall do
-     let(:pos) { double('fake-position') }
+    let(:pos) { double('fake-position') }
     let(:operator) { SkmIdentifier.create('+') }
     let(:operands) { [1, 2, 3] }
 
@@ -14,7 +16,7 @@ module Skeem
 
     context 'Initialization:' do
       it 'should be initialized with an operator symbol and its operands' do
-        expect{ ProcedureCall.new(pos, operator, operands) }.not_to raise_error
+        expect { ProcedureCall.new(pos, operator, operands) }.not_to raise_error
       end
 
       it 'should know its operator' do
@@ -45,7 +47,7 @@ module Skeem
 
     context 'Initialization:' do
       it 'should be initialized with a pos and 3 expressions' do
-        expect{ SkmCondition.new(pos, s_test, s_consequent, s_alt) }.not_to raise_error
+        expect { SkmCondition.new(pos, s_test, s_consequent, s_alt) }.not_to raise_error
       end
 
       it 'should know its test' do
@@ -76,13 +78,13 @@ module Skeem
     let(:s_formals) { double('fake-formals') }
     let(:s_defs) { double('fake-definitions') }
     let(:s_sequence) { double('fake-sequence') }
-    let(:s_body) do { defs: s_defs, sequence: s_sequence } end
+    let(:s_body) { { defs: s_defs, sequence: s_sequence } }
 
     subject { SkmLambdaRep.new(pos, s_formals, s_body) }
 
     context 'Initialization:' do
       it 'should be initialized with a pos and 3 expressions' do
-        expect{ SkmLambdaRep.new(pos, s_formals, s_body) }.not_to raise_error
+        expect { SkmLambdaRep.new(pos, s_formals, s_body) }.not_to raise_error
       end
 
       it 'should know its formals' do
@@ -106,7 +108,7 @@ module Skeem
         # Remove "unpredictable" part of actual text
         expectation = subject.inspect.gsub(/@object_id=[0-9a-z]+, /, '')
         expect(expectation).to eq(txt1 + txt2 + txt3)
-      end  
+      end
     end # context
   end # describe
 end # module

data/spec/skeem/skm_compound_datum_spec.rb

@@ -1,3 +1,5 @@
+# frozen_string_literal: true
+
 require_relative '../spec_helper' # Use the RSpec framework
 require_relative '../../lib/skeem/datum_dsl'
 require_relative '../../lib/skeem/skm_compound_datum' # Load the classes under test
@@ -12,7 +14,7 @@ module Skeem
 
     context 'Initialization:' do
       it 'should be initialized with its members' do
-        expect{ SkmCompoundDatum.new(sample_members) }.not_to raise_error
+        expect { SkmCompoundDatum.new(sample_members) }.not_to raise_error
       end
 
       it 'should know its members' do
@@ -28,7 +30,7 @@ module Skeem
         expect(subject).to eq(subject)
       end
 
-     it 'should assert the equality by member values' do
+      it 'should assert the equality by member values' do
         # Comparison with other instances
         expect(subject).to eq(SkmCompoundDatum.new(sample_members))
         expect(subject).not_to eq(SkmCompoundDatum.new([]))
@@ -44,12 +46,12 @@ module Skeem
         expect(visitor).to receive(:visit_compound_datum).with(subject)
         expect { subject.accept(visitor) }.not_to raise_error
       end
-      
+
       it 'should return its text representation' do
         txt1 = '<Skeem::SkmCompoundDatum: <Skeem::SkmInteger: 1>,'
         txt2 = '<Skeem::SkmInteger: 2>, <Skeem::SkmInteger: 3>>'
-        expect(subject.inspect).to eq(txt1 + ' ' + txt2)
-      end     
+        expect(subject.inspect).to eq("#{txt1} #{txt2}")
+      end
     end # context
 
     context 'Provided runtime services:' do
@@ -78,19 +80,19 @@ module Skeem
       end
     end # context
   end # describe
-  
+
   describe SkmVector do
     let(:sample_members) { [1, 2, 3] }
     subject { SkmVector.new(sample_members) }
 
     context 'Initialization:' do
       it 'should be initialized with its members' do
-        expect{ SkmVector.new(sample_members) }.not_to raise_error
+        expect { SkmVector.new(sample_members) }.not_to raise_error
       end
-      
+
       it 'should react positively to vector? predicate' do
         expect(subject).to be_vector
-      end      
+      end
     end # context
   end # describe
-end # module
+end # module

data/spec/skeem/skm_element_spec.rb

@@ -1,3 +1,5 @@
+# frozen_string_literal: true
+
 require_relative '../spec_helper' # Use the RSpec framework
 require_relative '../../lib/skeem/skm_element' # Load the class under test
 
@@ -35,11 +37,11 @@ module Skeem
       let(:runtime) { double('fake-runtime') }
       let(:visitor) { double('fake-visitor') }
       let(:not_implemented) { NotImplementedError }
-      
+
       it 'should be equivalent to itself' do
         expect(subject).to be_eqv(subject)
         expect(subject).not_to be_eqv(subject.clone)
-      end     
+      end
 
       it "should ignore the 'done!' message" do
         expect { subject.done! }.not_to raise_error
@@ -52,11 +54,11 @@ module Skeem
       it "should ignore the 'unquoted!' message" do
         expect { subject.unquoted! }.not_to raise_error
       end
-      
+
       it "should complain when receiving 'skm_equal?' message" do
         msg = 'Missing implementation of method Skeem::SkmElement#skm_equal?'
         expect { subject.skm_equal?('omg') }.to raise_error(NotImplementedError, msg)
-      end       
+      end
 
       it "should complain when receiving 'evaluate' message" do
         expect { subject.evaluate(runtime) }.to raise_error(not_implemented)
@@ -71,4 +73,4 @@ module Skeem
       end
     end # context
   end # describe
-end # module
+end # module

data/spec/skeem/skm_empty_list_spec.rb

@@ -1,3 +1,5 @@
+# frozen_string_literal: true
+
 require_relative '../spec_helper' # Use the RSpec framework
 require_relative '../../lib/skeem/skm_empty_list' # Load the class under test
 
@@ -20,10 +22,10 @@ module Skeem
 
     context 'Provided services:' do
       let(:runtime) { double('fake-runtime') }
-      
+
       it 'should be equivalent to itself' do
         expect(subject).to be_eqv(SkmEmptyList.instance)
-        expect(subject).not_to be_eqv("()")
+        expect(subject).not_to be_eqv('()')
       end
 
       it "should return itself when receiving 'evaluate' message" do
@@ -36,14 +38,14 @@ module Skeem
 
       it "should reply to visitor's 'accept' message" do
         visitor = double('fake-visitor')
-        expect(visitor).to receive(:visit_empty_list).with(subject)      
+        expect(visitor).to receive(:visit_empty_list).with(subject)
         expect { subject.accept(visitor) }.not_to raise_error
       end
-      
+
       it 'should return its representation upon inspection' do
         predicted = '<Skeem::SkmEmptyList: ()>'
         expect(subject.inspect).to eq(predicted)
       end
     end # context
   end # describe
-end # module
+end # module

data/spec/skeem/skm_frame_spec.rb

@@ -1,5 +1,7 @@
+# frozen_string_literal: true
+
 require_relative '../spec_helper' # Use the RSpec framework
-require_relative '../../lib/skeem/datum_dsl' 
+require_relative '../../lib/skeem/datum_dsl'
 require_relative '../../lib/skeem/skm_frame' # Load the class under test
 
 module Skeem
@@ -9,7 +11,7 @@ module Skeem
     let(:sample_env) { SkmFrame.new }
     context 'Initialization:' do
       it 'could be initialized without argument' do
-        expect { SkmFrame.new() }.not_to raise_error
+        expect { SkmFrame.new }.not_to raise_error
       end
 
       it 'could be initialized with optional argument' do
@@ -114,6 +116,5 @@ module Skeem
         expect(nested.size).to eq(1)
       end
     end # context
-
   end # describe
-end # module
+end # module

data/spec/skeem/skm_pair_spec.rb

@@ -1,3 +1,5 @@
+# frozen_string_literal: true
+
 require_relative '../spec_helper' # Use the RSpec framework
 require_relative '../../lib/skeem/datum_dsl'
 require_relative '../../lib/skeem/runtime'
@@ -35,7 +37,7 @@ module Skeem
 
     context 'Provided services:' do
       let(:runtime) { Runtime.new(SkmFrame.new) }
-      let(:list_length_2) { SkmPair.new(integer(10), subject) }
+      let(:list_length2) { SkmPair.new(integer(10), subject) }
       let(:quirk_element) { double('three') }
       let(:quirk_members) { [integer(10), quirk_element] }
 
@@ -69,7 +71,7 @@ module Skeem
         expect(subject.length).to eq(1)
 
         # Use a list of length 2
-        expect(list_length_2.length).to eq(2)
+        expect(list_length2.length).to eq(2)
       end
 
       it 'should respond false to `eqv?` message' do
@@ -111,7 +113,7 @@ module Skeem
         expect(subject.to_a).to eq([sample_car])
 
         # Use a list of length 2
-        expect(list_length_2.to_a).to eq([integer(10), sample_car])
+        expect(list_length2.to_a).to eq([integer(10), sample_car])
       end
 
       it 'should return the last pair of a proper list' do
@@ -131,7 +133,7 @@ module Skeem
 
       it 'should return the last element of a list' do
          expect(subject.last).to eq(sample_car)
-         expect(list_length_2.last).to eq(sample_car)
+         expect(list_length2.last).to eq(sample_car)
       end
 
       it 'should append a new element to a list' do
@@ -172,7 +174,7 @@ module Skeem
 
       it 'should support the each method' do
         my_list = SkmPair.new('w', SkmPair.new('o', SkmPair.new('w', SkmEmptyList.instance)))
-        text = ''
+        text = +''
         my_list.each { |ch| text << ch.upcase }
         expect(text).to eq('WOW')
       end
@@ -225,9 +227,8 @@ module Skeem
         expect(subject.inspect).to eq(predicted)
 
         predicted = '<Skeem::SkmPair: <Skeem::SkmInteger: 10>, <Skeem::SkmInteger: 3>>'
-        expect(list_length_2.inspect).to eq(predicted)
+        expect(list_length2.inspect).to eq(predicted)
       end
     end # context
-
   end # describe
-end # module
+end # module

data/spec/skeem/skm_procedure_exec_spec.rb

@@ -1,3 +1,5 @@
+# frozen_string_literal: true
+
 require_relative '../spec_helper' # Use the RSpec framework
 
 require_relative '../../lib/skeem/interpreter'

data/spec/skeem/skm_simple_datum_spec.rb

@@ -1,3 +1,5 @@
+# frozen_string_literal: true
+
 require 'ostruct'
 require_relative '../spec_helper' # Use the RSpec framework
 require_relative '../../lib/skeem/skm_simple_datum' # Load the classes under test
@@ -47,7 +49,7 @@ module Skeem
         expect(subject).to eq(subject)
       end
 
-     it 'should assert the equality by value' do
+      it 'should assert the equality by value' do
         # Comparison with other instances
         expect(instance).to eq(SkmSimpleDatum.create(3))
         expect(instance).not_to eq(SkmSimpleDatum.create('foo'))
@@ -56,24 +58,24 @@ module Skeem
         expect(instance).to eq(3)
         expect(instance).not_to eq('foo')
       end
-      
+
       it 'should be equivalent to itself' do
         expect(subject).to be_eqv(subject)
       end
-      
+
       it 'should be equivalent by value' do
         same = SkmSimpleDatum.create(3)
         expect(instance).to be_eqv(same)
-      end  
+      end
 
       it 'should be Skeem equal to itself' do
         expect(subject).to be_skm_equal(subject)
-      end      
-      
+      end
+
       it 'should be Skeem equal by value' do
         same = SkmSimpleDatum.create(3)
         expect(instance).to be_skm_equal(same)
-      end       
+      end
 
       it 'should be self-evaluating' do
         expect(subject.evaluate(runtime)).to be_equal(subject)
@@ -84,7 +86,7 @@ module Skeem
       end
 
       it 'should return its text representation' do
-        expect(subject.inspect).to eq("<Skeem::SkmSimpleDatum: sample-value>")
+        expect(subject.inspect).to eq('<Skeem::SkmSimpleDatum: sample-value>')
       end
 
       it 'should respond to visitor' do
@@ -173,7 +175,7 @@ module Skeem
       it 'should react positively to real? predicate' do
         expect(subject).to be_real
       end
-      
+
       it 'should react negatively to exact? predicate' do
         expect(subject).not_to be_exact
       end
@@ -181,11 +183,11 @@ module Skeem
       it 'should implement the eqv? predicate' do
         same = SkmReal.create(0.51)
         different = SkmReal.create(1.21)
-        
+
         expect(subject).to be_eqv(subject)
         expect(subject).to be_eqv(same)
         expect(subject).not_to be_eqv(different)
-      end      
+      end
     end # context
   end # describe
 
@@ -213,24 +215,24 @@ module Skeem
       it 'should react positively to integer? predicate' do
         expect(subject).to be_real
       end
-      
+
       it 'should react positively to exact? predicate' do
         expect(subject).to be_exact
       end
 
       it 'should implement the eqv? predicate' do
         three = SkmInteger.create(3)
-        real_3 = SkmReal.create(3.0)
+        real3 = SkmReal.create(3.0)
         four = SkmInteger.create(4)
-        
+
         expect(subject).to be_eqv(three)
-        expect(subject).not_to be_eqv(real_3)
+        expect(subject).not_to be_eqv(real3)
         expect(subject).not_to be_eqv(four)
       end
     end # context
   end # describe
 
-describe SkmString do
+  describe SkmString do
     let(:pos) { double('fake-position') }
     let(:dummy_symbol) { double('dummy') }
     let(:sample_value) { 'Hello' }
@@ -272,28 +274,28 @@ describe SkmString do
 
       it 'could be initialized with a token, a position and a flag' do
         expect { SkmIdentifier.new(dummy_token, pos, true) }.not_to raise_error
-      end       
+      end
 
       it 'should know whether it is used as a variable name' do
         expect(subject.is_var_name).to eq(false)
-        
+
         instance = SkmIdentifier.new(dummy_token, pos, true)
         expect(instance.is_var_name).to eq(true)
       end
-    
+
       it 'should react positively to symbol? predicate' do
         expect(subject).to be_symbol
       end
-      
+
       it 'should react to verbatim? predicate' do
         expect(subject).to be_verbatim
         instance = SkmIdentifier.new(dummy_token, pos, true)
         expect(instance).not_to be_verbatim
-      end      
+      end
 
       it 'should return its text representation' do
         expect(subject.inspect).to eq('<Skeem::SkmIdentifier: this-is-it!>')
       end
     end # context
   end # describe
-end # module
+end # module

data/spec/skeem/skm_unary_expression_spec.rb

@@ -1,3 +1,5 @@
+# frozen_string_literal: true
+
 require_relative '../spec_helper' # Use the RSpec framework
 require_relative '../../lib/skeem/datum_dsl'
 require_relative '../../lib/skeem/s_expr_nodes'
@@ -12,7 +14,7 @@ module Skeem
 
     context 'Initialization:' do
       it 'should be initialized with a position and a child element' do
-        expect{ SkmUnaryExpression.new(pos, sample_child) }.not_to raise_error
+        expect { SkmUnaryExpression.new(pos, sample_child) }.not_to raise_error
       end
 
       it 'should know its child' do
@@ -38,7 +40,7 @@ module Skeem
 
     context 'Initialization:' do
       it 'should be initialized with a Skeem element' do
-        expect{ SkmQuotation.new(sample_literal) }.not_to raise_error
+        expect { SkmQuotation.new(sample_literal) }.not_to raise_error
       end
 
       it 'should know its datum' do
@@ -84,7 +86,7 @@ module Skeem
 
     context 'Initialization:' do
       it 'should be initialized with a Skeem element' do
-        expect{ SkmQuasiquotation.new(sample_literal) }.not_to raise_error
+        expect { SkmQuasiquotation.new(sample_literal) }.not_to raise_error
       end
     end # context
 
@@ -116,7 +118,7 @@ module Skeem
   end # describe
 
 
- describe SkmUnquotation do
+  describe SkmUnquotation do
     include DatumDSL
 
     let(:sample_literal) { string('foo') }
@@ -125,7 +127,7 @@ module Skeem
 
     context 'Initialization:' do
       it 'should be initialized with a Skeem element' do
-        expect{ SkmUnquotation.new(sample_literal) }.not_to raise_error
+        expect { SkmUnquotation.new(sample_literal) }.not_to raise_error
       end
     end # context
 
@@ -156,7 +158,7 @@ module Skeem
       end
     end # context
   end # describe
-  
+
   describe SkmVariableReference do
     include DatumDSL
 
@@ -167,7 +169,7 @@ module Skeem
 
     context 'Initialization:' do
       it 'should be initialized with a position and a symbol' do
-        expect{ SkmVariableReference.new(pos, sample_var) }.not_to raise_error
+        expect { SkmVariableReference.new(pos, sample_var) }.not_to raise_error
       end
 
       it 'should know its variable' do
@@ -187,7 +189,7 @@ module Skeem
         expect(subject.evaluate(runtime)).to eq(3)
       end
 
-      it "should return itself at quasiquotation" do
+      it 'should return itself at quasiquotation' do
         expect(subject.quasiquote(runtime)).to be_equal(subject)
       end
 
@@ -197,4 +199,4 @@ module Skeem
       end
     end # context
   end # describe
-end # module
+end # module