sandthorn 0.13.0 → 1.0.0

data/lib/sandthorn/event.rb

@@ -8,7 +8,8 @@ module Sandthorn
       aggregate_version
       timestamp
       event_name
-      event_args
+      event_data
+      event_metadata
       method_args
       trace
     )
@@ -40,7 +41,7 @@ module Sandthorn
     end
 
     def raw_deltas
-      fetch(:event_args, {}).fetch(:attribute_deltas, [])
+      fetch(:event_data, {}).fetch(:attribute_deltas, [])
     end
 
     class AttributeDelta < SimpleDelegator

data/lib/sandthorn/event_inspector.rb

@@ -46,27 +46,29 @@ module Sandthorn
     end
 
     def events_with_trace_info
-      saved = Sandthorn.get_aggregate_events(self.class, aggregate_id)
+      begin
+        saved = Sandthorn.find aggregate_id, self.class  
+      rescue Exception
+        saved = []
+      end
+      
       unsaved = self.aggregate_events
       all = saved
         .concat(unsaved)
         .sort { |a, b| a[:aggregate_version] <=> b[:aggregate_version] }
 
-      extracted = all.collect do |e| 
-        if e[:event_args].nil? && !e[:event_data].nil?
+      extracted = all.collect do |e|
+        if e[:event_data].nil? && !e[:event_data].nil?
           data = Sandthorn.deserialize e[:event_data]
         else
-          data = e[:event_args]
-        end
-
-        unless data.nil? || !data.is_a?(Hash)
-          trace = data[:trace]
+          data = e[:event_data]
         end
 
         {
           aggregate_version: e[:aggregate_version],
           event_name: e[:event_name].to_sym, 
-          trace: trace 
+          event_data: data,
+          event_metadata: e[:event_metadata]
         }
       end
 
@@ -80,7 +82,7 @@ module Sandthorn
     end
 
     def get_saved_events event_name
-      saved_events = Sandthorn.get_aggregate_events self.aggregate_id, self.class
+      saved_events = Sandthorn.find self.class, self.aggregate_id
       saved_events.select { |e| e[:event_name] == event_name.to_s  }
     end
 

data/lib/sandthorn/version.rb

@@ -1,3 +1,3 @@
 module Sandthorn
-  VERSION = "0.13.0"
+  VERSION = "1.0.0"
 end

data/sandthorn.gemspec

@@ -30,5 +30,5 @@ Gem::Specification.new do |spec|
   spec.add_development_dependency "autotest-standalone"
   spec.add_development_dependency "sqlite3"  
   spec.add_development_dependency "coveralls"
-  spec.add_development_dependency "sandthorn_driver_sequel", ">= 3.1"
+  spec.add_development_dependency "sandthorn_driver_sequel", ">= 4.0"
 end

data/spec/aggregate_delta_spec.rb

@@ -20,22 +20,22 @@ class PersonTest
 
     def change_name new_name
       @name = new_name
-      record_event new_name
+      record_event
     end
 
     def change_relationship new_relationship
       @relationship_status = new_relationship
-      record_event new_relationship
+      record_event
     end
 
     def add_to_array element
       @my_array << element
-      record_event element
+      record_event
     end
 
     def add_to_hash name,value
       @my_hash[name] = value
-      record_event name,value
+      record_event
     end
 end
 

data/spec/aggregate_events_spec.rb

@@ -19,7 +19,7 @@ module Sandthorn
     end
 
     def old_way_event event_params
-      commit event_params
+      commit
     end
   end
 
@@ -52,7 +52,7 @@ module Sandthorn
       end
 
       it "should store the args to the event" do
-        expect(subject.aggregate_events[1][:event_args][:method_args][0]).to eql("new name")
+        expect(subject.aggregate_events[1][:event_data][:attribute_deltas][0][:new_value]).to eql("new name")
       end
 
       it "should store the event_name" do
@@ -70,9 +70,6 @@ module Sandthorn
         expect(subject.has_event?(:some_other_event)).to be_truthy
       end
 
-      it "should store the args to the event" do
-        expect(subject.aggregate_events[1][:event_args][:method_args]).to eql([1,2])
-      end
     end
 
     describe ".old_way_event" do
@@ -85,9 +82,6 @@ module Sandthorn
         expect(subject.has_event?(:old_way_event)).to be_truthy
       end
 
-      it "should store the args to the event" do
-        expect(subject.aggregate_events[1][:event_args][:method_args][0]).to eql("hej")
-      end
     end
   end
 end

data/spec/aggregate_root_spec.rb

@@ -167,7 +167,7 @@ module Sandthorn
 
         it "should set the old_value on the event" do
           dirty_object_after_find.change_name "new_name"
-          expect(dirty_object_after_find.aggregate_events.last[:event_args][:attribute_deltas].first[:old_value]).to eql "old_value"
+          expect(dirty_object_after_find.aggregate_events.last[:event_data][:attribute_deltas].first[:old_value]).to eql "old_value"
         end
 
       end
@@ -176,18 +176,18 @@ module Sandthorn
       
         it "should set the old_value on the event" do
           dirty_object.change_name "new_name"
-          expect(dirty_object.aggregate_events.last[:event_args][:attribute_deltas].first[:old_value]).to eql "old_value"
+          expect(dirty_object.aggregate_events.last[:event_data][:attribute_deltas].first[:old_value]).to eql "old_value"
         end
 
         it "should not change aggregate_id" do
           dirty_object.change_name "new_name"
-          expect(dirty_object.aggregate_events.last[:event_args][:attribute_deltas].last[:attribute_name]).not_to eql "aggregate_id"
+          expect(dirty_object.aggregate_events.last[:event_data][:attribute_deltas].last[:attribute_name]).not_to eql "aggregate_id"
         end
 
         it "should not change sex attribute if sex method is not runned" do
           dirty_object.change_name "new_name"
           dirty_object.aggregate_events.each do |event|
-            event[:event_args][:attribute_deltas].each do |attribute_delta|
+            event[:event_data][:attribute_deltas].each do |attribute_delta|
               expect(attribute_delta[:attribute_name]).not_to eql "sex"
             end
           end
@@ -196,7 +196,7 @@ module Sandthorn
         it "should not change sex attribute if sex attribute is the same" do
           dirty_object.change_sex "hen"
           dirty_object.aggregate_events.each do |event|
-            event[:event_args][:attribute_deltas].each do |attribute_delta|
+            event[:event_data][:attribute_deltas].each do |attribute_delta|
               expect(attribute_delta[:attribute_name]).not_to eql "sex"
             end
           end
@@ -204,8 +204,8 @@ module Sandthorn
 
         it "should set old_value and new_value on sex change" do
           dirty_object.change_sex "shemale"
-          expect(dirty_object.aggregate_events.last[:event_args][:attribute_deltas].first[:old_value]).to eql "hen"
-          expect(dirty_object.aggregate_events.last[:event_args][:attribute_deltas].first[:new_value]).to eql "shemale"
+          expect(dirty_object.aggregate_events.last[:event_data][:attribute_deltas].first[:old_value]).to eql "hen"
+          expect(dirty_object.aggregate_events.last[:event_data][:attribute_deltas].first[:new_value]).to eql "shemale"
         end
       end
     end
@@ -222,7 +222,7 @@ module Sandthorn
       end
 
       it "should have attribute_deltas set to empty array" do
-        expect(dirty_object.aggregate_events.first[:event_args][:attribute_deltas]).to eql([])
+        expect(dirty_object.aggregate_events.first[:event_data][:attribute_deltas]).to eql([])
       end
 
     end

data/spec/aggregate_snapshot_spec.rb

@@ -1,263 +1,263 @@
-require 'spec_helper'
-require 'sandthorn/aggregate_root_snapshot'
-require 'date'
-
-
-module BankAccountInterestCommands
-  def calculate_interest! until_date = DateTime.now
-    # skipping all safety-checks..
-    # and this is of course horribly wrong financially speaking.. whatever
-    pay_out_unpaid_interest!
-    interest_calculation_time = until_date - @last_interest_calculation
-    days_with_interest = interest_calculation_time.to_i
-    unpaid_interest = @balance * @current_interest_info[:interest_rate] * days_with_interest / 365.2425
-    added_unpaid_interest_event unpaid_interest,until_date
-  end
-
-  def pay_out_unpaid_interest!
-    paid_out_unpaid_interest_balance_event @unpaid_interest_balance
-  end
-
-  def change_interest! new_interest_rate, interest_valid_from
-    calculate_interest!
-    changed_interest_rate_event new_interest_rate,interest_valid_from
-  end
-end
-module BankAccountWithdrawalCommands
-  def withdraw_from_atm! amount, atm_id
-    withdrew_amount_from_atm_event amount, atm_id
-  end
-
-  def withdraw_from_cashier! amount, cashier_id
-    withdrew_amount_from_cashier_event amount, cashier_id
-    charged_cashier_withdrawal_fee_event 50
-  end
-end
-
-module BankAccountVisaCardPurchasesCommands
-  def charge_card! amount, merchant_id
-    visa = VisaCardTransactionGateway.new
-    transaction_id = visa.charge_card "3030-3333-4252-2535", merchant_id, amount
-    paid_with_visa_card_event amount, transaction_id
-  end
-
-end
-
-class VisaCardTransactionGateway
-  def initialize
-    @visa_connector = "foo_bar"
-  end
-  def charge_card visa_card_number, merchant_id, amount
-    transaction_id = SecureRandom.uuid
-  end
-end
-
-module BankAccountDepositCommmands
-  def deposit_at_bank_office! amount, cashier_id
-    deposited_to_cashier_event amount, cashier_id
-  end
-
-  def transfer_money_from_another_account! amount, from_account_number
-    incoming_transfer_event amount,from_account_number
-  end
-end
-
-class BankAccount
-  include Sandthorn::AggregateRoot
-
-  attr_reader :balance
-  attr_reader :account_number
-  attr_reader :current_interest_info
-  attr_reader :account_creation_date
-  attr_reader :unpaid_interest_balance
-  attr_reader :last_interest_calculation
-
-  def initialize *args
-    account_number = args[0]
-    interest_rate = args[1]
-    creation_date = args[2]
-
-    @current_interest_info = {}
-    @current_interest_info[:interest_rate] = interest_rate
-    @current_interest_info[:interest_valid_from] = creation_date
-    @balance = 0
-    @unpaid_interest_balance = 0
-    @account_creation_date = creation_date
-    @last_interest_calculation = creation_date
-  end
-
-  def changed_interest_rate_event new_interest_rate, interest_valid_from
-    @current_interest_info[:interest_rate] = new_interest_rate
-    @current_interest_info[:interest_valid_from] = interest_valid_from
-    record_event new_interest_rate,interest_valid_from
-  end
-
-  def added_unpaid_interest_event interest_amount, calculated_until
-    @unpaid_interest_balance += interest_amount
-    @last_interest_calculation = calculated_until
-    record_event interest_amount, calculated_until
-  end
-
-  def paid_out_unpaid_interest_balance_event interest_amount
-    @unpaid_interest_balance -= interest_amount
-    @balance += interest_amount
-    record_event interest_amount
-  end
-
-  def withdrew_amount_from_atm_event amount, atm_id
-    @balance -= amount
-    record_event amount,atm_id
-  end
-
-  def withdrew_amount_from_cashier_event amount, cashier_id
-    @balance -= amount
-    record_event amount, cashier_id
-  end
-
-  def paid_with_visa_card_event amount, visa_card_transaction_id
-    @balance -= amount
-    record_event amount,visa_card_transaction_id
-  end
-
-  def charged_cashier_withdrawal_fee_event amount
-    @balance -= amount
-    record_event amount
-  end
-
-  def deposited_to_cashier_event amount, cashier_id
-    @balance = self.balance + amount
-    record_event amount,cashier_id
-  end
-
-  def incoming_transfer_event amount, from_account_number
-    current_balance = self.balance
-    @balance = amount + current_balance
-    record_event amount, from_account_number
-  end
-
-end
-
-def a_test_account
-  a = BankAccount.new "91503010111",0.031415, Date.new(2011,10,12)
-  a.extend BankAccountDepositCommmands
-  a.transfer_money_from_another_account! 90000, "FOOBAR"
-  a.deposit_at_bank_office! 10000, "Lars Idorn"
-
-  a.extend BankAccountVisaCardPurchasesCommands
-  a.charge_card! 1000, "Starbucks Coffee"
-
-  a.extend BankAccountInterestCommands
-  a.calculate_interest!
-  return a
-end
-
-#Tests part
-describe "when doing aggregate_find on an aggregate with a snapshot" do
-  let(:aggregate) do
-    a = a_test_account
-    a.save
-    a.extend Sandthorn::AggregateRootSnapshot
-    a.aggregate_snapshot!
-    a.save_snapshot
-    a.charge_card! 9000, "Apple"
-    a.save
-    a
-  end
-  it "should be loaded with correct version" do
-    org = aggregate
-    loaded = BankAccount.find org.aggregate_id
-    expect(loaded.balance).to eql org.balance
-  end
-end
-
-describe 'when generating state on an aggregate root' do
-
-  before(:each) do
-    @original_account = a_test_account
-    events = @original_account.aggregate_events
-    @account = BankAccount.aggregate_build events
-    @account.extend Sandthorn::AggregateRootSnapshot
-    @account.aggregate_snapshot!
-  end
-
-  it 'account should have properties set' do
-    expect(@account.balance).to eql 99000
-    expect(@account.unpaid_interest_balance).to be > 1000
-  end
-
-
-  it 'should be able to load up from snapshot' do
-
-    events = [aggregate: @account]
-    loaded = BankAccount.aggregate_build events
-
-    expect(loaded.balance).to eql(@original_account.balance)
-    expect(loaded.account_number).to eql(@original_account.account_number)
-    expect(loaded.current_interest_info).to eql(@original_account.current_interest_info)
-    expect(loaded.account_creation_date).to eql(@original_account.account_creation_date)
-    expect(loaded.unpaid_interest_balance).to eql(@original_account.unpaid_interest_balance)
-    expect(loaded.last_interest_calculation).to eql(@original_account.last_interest_calculation)
-    expect(loaded.aggregate_id).to eql(@original_account.aggregate_id)
-    expect(loaded.aggregate_originating_version).to eql(@account.aggregate_originating_version)
-
-  end
-
-end
-
-describe Sandthorn::AggregateRootSnapshot do
-  let(:subject) { a_test_account.save.extend Sandthorn::AggregateRootSnapshot  }
-  context "when using :snapshot - method" do
-    it "should return self" do
-      expect(subject.snapshot).to eql subject
-    end
-    it "should raise SnapshotError if aggregate has unsaved events" do
-      subject.paid_with_visa_card_event 2000, ""
-      expect{subject.snapshot}.to raise_error Sandthorn::Errors::SnapshotError
-    end
-  end
-end
-
-
-describe 'when saving to repository' do
-  let(:account) {a_test_account.extend Sandthorn::AggregateRootSnapshot}
-
-  it 'should not raise an error if snapshot was created' do
-    account.save
-    account.aggregate_snapshot!
-    expect(lambda {account.save_snapshot}).not_to raise_error
-  end
-  it 'should set aggregate_snapshot to nil' do
-    account.save
-    account.aggregate_snapshot!
-    account.save_snapshot
-    expect(account.aggregate_snapshot).to eql(nil)
-  end
-
-  it 'should raise error if trying to create snapshot before events are saved on object' do
-    expect(lambda {account.aggregate_snapshot!}).to raise_error Sandthorn::Errors::SnapshotError
-  end
-
-  it 'should not raise an error if trying to create snapshot on object when events are saved' do
-    account.save
-    expect( lambda {account.aggregate_snapshot!}).not_to raise_error
-  end
-
-  it 'should get snapshot on account find when a snapshot is saved' do
-
-    account.save
-    account.aggregate_snapshot!
-    account.save_snapshot
-
-    loaded = BankAccount.find account.aggregate_id
-
-    expect(loaded.balance).to eql(account.balance)
-    expect(loaded.account_number).to eql(account.account_number)
-    expect(loaded.current_interest_info).to eql(account.current_interest_info)
-    expect(loaded.account_creation_date).to eql(account.account_creation_date)
-    expect(loaded.unpaid_interest_balance).to eql(account.unpaid_interest_balance)
-    expect(loaded.last_interest_calculation).to eql(account.last_interest_calculation)
-    expect(loaded.aggregate_id).to eql(account.aggregate_id)
-    expect(loaded.aggregate_originating_version).to eql(account.aggregate_originating_version)
-
-  end
-end
+# require 'spec_helper'
+# require 'sandthorn/aggregate_root_snapshot'
+# require 'date'
+
+
+# module BankAccountInterestCommands
+#   def calculate_interest! until_date = DateTime.now
+#     # skipping all safety-checks..
+#     # and this is of course horribly wrong financially speaking.. whatever
+#     pay_out_unpaid_interest!
+#     interest_calculation_time = until_date - @last_interest_calculation
+#     days_with_interest = interest_calculation_time.to_i
+#     unpaid_interest = @balance * @current_interest_info[:interest_rate] * days_with_interest / 365.2425
+#     added_unpaid_interest_event unpaid_interest,until_date
+#   end
+
+#   def pay_out_unpaid_interest!
+#     paid_out_unpaid_interest_balance_event @unpaid_interest_balance
+#   end
+
+#   def change_interest! new_interest_rate, interest_valid_from
+#     calculate_interest!
+#     changed_interest_rate_event new_interest_rate,interest_valid_from
+#   end
+# end
+# module BankAccountWithdrawalCommands
+#   def withdraw_from_atm! amount, atm_id
+#     withdrew_amount_from_atm_event amount, atm_id
+#   end
+
+#   def withdraw_from_cashier! amount, cashier_id
+#     withdrew_amount_from_cashier_event amount, cashier_id
+#     charged_cashier_withdrawal_fee_event 50
+#   end
+# end
+
+# module BankAccountVisaCardPurchasesCommands
+#   def charge_card! amount, merchant_id
+#     visa = VisaCardTransactionGateway.new
+#     transaction_id = visa.charge_card "3030-3333-4252-2535", merchant_id, amount
+#     paid_with_visa_card_event amount, transaction_id
+#   end
+
+# end
+
+# class VisaCardTransactionGateway
+#   def initialize
+#     @visa_connector = "foo_bar"
+#   end
+#   def charge_card visa_card_number, merchant_id, amount
+#     transaction_id = SecureRandom.uuid
+#   end
+# end
+
+# module BankAccountDepositCommmands
+#   def deposit_at_bank_office! amount, cashier_id
+#     deposited_to_cashier_event amount, cashier_id
+#   end
+
+#   def transfer_money_from_another_account! amount, from_account_number
+#     incoming_transfer_event amount,from_account_number
+#   end
+# end
+
+# class BankAccount
+#   include Sandthorn::AggregateRoot
+
+#   attr_reader :balance
+#   attr_reader :account_number
+#   attr_reader :current_interest_info
+#   attr_reader :account_creation_date
+#   attr_reader :unpaid_interest_balance
+#   attr_reader :last_interest_calculation
+
+#   def initialize *args
+#     account_number = args[0]
+#     interest_rate = args[1]
+#     creation_date = args[2]
+
+#     @current_interest_info = {}
+#     @current_interest_info[:interest_rate] = interest_rate
+#     @current_interest_info[:interest_valid_from] = creation_date
+#     @balance = 0
+#     @unpaid_interest_balance = 0
+#     @account_creation_date = creation_date
+#     @last_interest_calculation = creation_date
+#   end
+
+#   def changed_interest_rate_event new_interest_rate, interest_valid_from
+#     @current_interest_info[:interest_rate] = new_interest_rate
+#     @current_interest_info[:interest_valid_from] = interest_valid_from
+#     record_event
+#   end
+
+#   def added_unpaid_interest_event interest_amount, calculated_until
+#     @unpaid_interest_balance += interest_amount
+#     @last_interest_calculation = calculated_until
+#     record_event
+#   end
+
+#   def paid_out_unpaid_interest_balance_event interest_amount
+#     @unpaid_interest_balance -= interest_amount
+#     @balance += interest_amount
+#     record_event
+#   end
+
+#   def withdrew_amount_from_atm_event amount, atm_id
+#     @balance -= amount
+#     record_event
+#   end
+
+#   def withdrew_amount_from_cashier_event amount, cashier_id
+#     @balance -= amount
+#     record_event
+#   end
+
+#   def paid_with_visa_card_event amount, visa_card_transaction_id
+#     @balance -= amount
+#     record_event
+#   end
+
+#   def charged_cashier_withdrawal_fee_event amount
+#     @balance -= amount
+#     record_event
+#   end
+
+#   def deposited_to_cashier_event amount, cashier_id
+#     @balance = self.balance + amount
+#     record_event
+#   end
+
+#   def incoming_transfer_event amount, from_account_number
+#     current_balance = self.balance
+#     @balance = amount + current_balance
+#     record_event
+#   end
+
+# end
+
+# def a_test_account
+#   a = BankAccount.new "91503010111",0.031415, Date.new(2011,10,12)
+#   a.extend BankAccountDepositCommmands
+#   a.transfer_money_from_another_account! 90000, "FOOBAR"
+#   a.deposit_at_bank_office! 10000, "Lars Idorn"
+
+#   a.extend BankAccountVisaCardPurchasesCommands
+#   a.charge_card! 1000, "Starbucks Coffee"
+
+#   a.extend BankAccountInterestCommands
+#   a.calculate_interest!
+#   return a
+# end
+
+# #Tests part
+# describe "when doing aggregate_find on an aggregate with a snapshot" do
+#   let(:aggregate) do
+#     a = a_test_account
+#     a.save
+#     a.extend Sandthorn::AggregateRootSnapshot
+#     a.aggregate_snapshot!
+#     a.save_snapshot
+#     a.charge_card! 9000, "Apple"
+#     a.save
+#     a
+#   end
+#   it "should be loaded with correct version" do
+#     org = aggregate
+#     loaded = BankAccount.find org.aggregate_id
+#     expect(loaded.balance).to eql org.balance
+#   end
+# end
+
+# describe 'when generating state on an aggregate root' do
+
+#   before(:each) do
+#     @original_account = a_test_account
+#     events = @original_account.aggregate_events
+#     @account = BankAccount.aggregate_build events
+#     @account.extend Sandthorn::AggregateRootSnapshot
+#     @account.aggregate_snapshot!
+#   end
+
+#   it 'account should have properties set' do
+#     expect(@account.balance).to eql 99000
+#     expect(@account.unpaid_interest_balance).to be > 1000
+#   end
+
+
+#   it 'should be able to load up from snapshot' do
+
+#     events = [aggregate: @account]
+#     loaded = BankAccount.aggregate_build events
+
+#     expect(loaded.balance).to eql(@original_account.balance)
+#     expect(loaded.account_number).to eql(@original_account.account_number)
+#     expect(loaded.current_interest_info).to eql(@original_account.current_interest_info)
+#     expect(loaded.account_creation_date).to eql(@original_account.account_creation_date)
+#     expect(loaded.unpaid_interest_balance).to eql(@original_account.unpaid_interest_balance)
+#     expect(loaded.last_interest_calculation).to eql(@original_account.last_interest_calculation)
+#     expect(loaded.aggregate_id).to eql(@original_account.aggregate_id)
+#     expect(loaded.aggregate_originating_version).to eql(@account.aggregate_originating_version)
+
+#   end
+
+# end
+
+# describe Sandthorn::AggregateRootSnapshot do
+#   let(:subject) { a_test_account.save.extend Sandthorn::AggregateRootSnapshot  }
+#   context "when using :snapshot - method" do
+#     it "should return self" do
+#       expect(subject.snapshot).to eql subject
+#     end
+#     it "should raise SnapshotError if aggregate has unsaved events" do
+#       subject.paid_with_visa_card_event 2000, ""
+#       expect{subject.snapshot}.to raise_error Sandthorn::Errors::SnapshotError
+#     end
+#   end
+# end
+
+
+# describe 'when saving to repository' do
+#   let(:account) {a_test_account.extend Sandthorn::AggregateRootSnapshot}
+
+#   it 'should not raise an error if snapshot was created' do
+#     account.save
+#     account.aggregate_snapshot!
+#     expect(lambda {account.save_snapshot}).not_to raise_error
+#   end
+#   it 'should set aggregate_snapshot to nil' do
+#     account.save
+#     account.aggregate_snapshot!
+#     account.save_snapshot
+#     expect(account.aggregate_snapshot).to eql(nil)
+#   end
+
+#   it 'should raise error if trying to create snapshot before events are saved on object' do
+#     expect(lambda {account.aggregate_snapshot!}).to raise_error Sandthorn::Errors::SnapshotError
+#   end
+
+#   it 'should not raise an error if trying to create snapshot on object when events are saved' do
+#     account.save
+#     expect( lambda {account.aggregate_snapshot!}).not_to raise_error
+#   end
+
+#   it 'should get snapshot on account find when a snapshot is saved' do
+
+#     account.save
+#     account.aggregate_snapshot!
+#     account.save_snapshot
+
+#     loaded = BankAccount.find account.aggregate_id
+
+#     expect(loaded.balance).to eql(account.balance)
+#     expect(loaded.account_number).to eql(account.account_number)
+#     expect(loaded.current_interest_info).to eql(account.current_interest_info)
+#     expect(loaded.account_creation_date).to eql(account.account_creation_date)
+#     expect(loaded.unpaid_interest_balance).to eql(account.unpaid_interest_balance)
+#     expect(loaded.last_interest_calculation).to eql(account.last_interest_calculation)
+#     expect(loaded.aggregate_id).to eql(account.aggregate_id)
+#     expect(loaded.aggregate_originating_version).to eql(account.aggregate_originating_version)
+
+#   end
+# end