v1.4.0

- Remove explicit Scripting.Dictionary reference

build/dev.vbs

@@ -81,7 +81,7 @@ Main
 Sub Main()
   ' On Error Resume Next
 
-  PrintLn "Excel-TDD v1.3.1 Development"
+  PrintLn "Excel-TDD v1.4.0 Development"
 
   ExcelWasOpen = OpenExcel(Excel)
 
@@ -236,7 +236,7 @@ Sub Import(ModulesDescription, Workbook)
     Import "specs", Workbook
     Exit Sub
   Case Else
-    PrintLn "ERROR: Unknown modules description, " & ModulesDescription
+    PrintLn "ERROR: Unknown modules description: " & ModulesDescription
     Exit Sub
   End Select
 
@@ -259,15 +259,27 @@ Sub Export(ModulesDescription, Workbook)
   Case "SRC"
     Modules = Src
     Folder = SrcFolder
+  Case "INLINE"
+    Modules = InlineRunner
+    Folder = SrcFolder
+  Case "DISPLAY"
+    Modules = DisplayRunner
+    Folder = SrcFolder
+  Case "EXTENSIONS"
+    Modules = WorkbookExtensions
+    Folder = SrcFolder
+  Case "HELPERS"
+    Modules = Helpers
+    Folder = SrcFolder
   Case "SPECS"
     Modules = Specs
     Folder = SpecsFolder
   Case "ALL"
-    Export "src", Workbook
-    Export "specs", Workbook
+    Import "src", Workbook
+    Import "specs", Workbook
     Exit Sub
   Case Else
-    PrintLn "ERROR: Unknown modules description, " & ModulesDescription
+    PrintLn "ERROR: Unknown modules description: " & ModulesDescription
     Exit Sub
   End Select
 

src/BlankIWBProxy.cls

@@ -8,7 +8,7 @@ Attribute VB_Creatable = False
 Attribute VB_PredeclaredId = False
 Attribute VB_Exposed = False
 ''
-' BlankIWBProxy v1.3.1
+' BlankIWBProxy v1.4.0
 ' (c) Tim Hall - https://github.com/timhall/Excel-TDD
 '
 ' Blank implementation of IWBProxy

src/DisplayRunner.bas

@@ -1,6 +1,6 @@
 Attribute VB_Name = "DisplayRunner"
 ''
-' DisplayRunner v1.3.1
+' DisplayRunner v1.4.0
 ' (c) Tim Hall - https://github.com/timhall/Excel-TDD
 '
 ' Runner with sheet output
@@ -203,7 +203,7 @@ Private Sub OutputSpec(Spec As SpecDefinition, ByRef Row As Integer, Optional In
     Sheet.Cells(Row, ResultCol) = Spec.ResultName
     Row = Row + 1
 
-    If Spec.FailedExpectations.count > 0 Then
+    If Spec.FailedExpectations.Count > 0 Then
         Dim Exp As SpecExpectation
         For Each Exp In Spec.FailedExpectations
             Sheet.Cells(Row, DescCol) = Indentation & "X  " & Exp.FailureMessage

src/IScenario.cls

@@ -8,7 +8,7 @@ Attribute VB_Creatable = False
 Attribute VB_PredeclaredId = False
 Attribute VB_Exposed = True
 ''
-' IScenario v1.3.1
+' IScenario v1.4.0
 ' (c) Tim Hall - https://github.com/timhall/Excel-TDD
 '
 ' Interface for creating and running scenarios on workbooks

src/IWBProxy.cls

@@ -8,7 +8,7 @@ Attribute VB_Creatable = False
 Attribute VB_PredeclaredId = False
 Attribute VB_Exposed = True
 ''
-' IWBProxy v1.3.1
+' IWBProxy v1.4.0
 ' (c) Tim Hall - https://github.com/timhall/Excel-TDD
 '
 ' Interface for generic workbook proxies

src/InlineRunner.bas

@@ -1,6 +1,6 @@
 Attribute VB_Name = "InlineRunner"
 ''
-' InlineRunner v1.3.1
+' InlineRunner v1.4.0
 ' (c) Tim Hall - https://github.com/timhall/Excel-TDD
 '
 ' Runner for outputting results of specs to Immediate window

src/Scenario.cls

@@ -8,7 +8,7 @@ Attribute VB_Creatable = False
 Attribute VB_PredeclaredId = False
 Attribute VB_Exposed = True
 ''
-' Scenario v1.3.1
+' Scenario v1.4.0
 ' (c) Tim Hall - https://github.com/timhall/Excel-TDD
 '
 ' Generic implementation of scenario

src/SpecDefinition.cls

@@ -8,7 +8,7 @@ Attribute VB_Creatable = False
 Attribute VB_PredeclaredId = False
 Attribute VB_Exposed = True
 ''
-' SpecDefinition v1.3.1
+' SpecDefinition v1.4.0
 ' (c) Tim Hall - https://github.com/timhall/Excel-TDD
 '
 ' Provides helpers and acts as workbook proxy

src/SpecExpectation.cls

@@ -8,7 +8,7 @@ Attribute VB_Creatable = False
 Attribute VB_PredeclaredId = False
 Attribute VB_Exposed = True
 ''
-' SpecExpectation v1.3.1
+' SpecExpectation v1.4.0
 ' (c) Tim Hall - https://github.com/timhall/Excel-TDD
 '
 ' Provides various tests that can be performed for a provided value

src/SpecHelpers.bas

@@ -1,6 +1,6 @@
 Attribute VB_Name = "SpecHelpers"
 ''
-' SpecHelpers v1.3.1
+' SpecHelpers v1.4.0
 ' (c) Tim Hall - https://github.com/timhall/Excel-TDD
 '
 ' General utilities for specs

src/SpecSuite.cls

@@ -8,7 +8,7 @@ Attribute VB_Creatable = False
 Attribute VB_PredeclaredId = False
 Attribute VB_Exposed = True
 ''
-' SpecSuite v1.3.1
+' SpecSuite v1.4.0
 ' (c) Tim Hall - https://github.com/timhall/Excel-TDD
 '
 ' A collection of specs with the workbook that they act on

src/WBProxy.cls

@@ -8,7 +8,7 @@ Attribute VB_Creatable = False
 Attribute VB_PredeclaredId = False
 Attribute VB_Exposed = True
 ''
-' WBProxy v1.3.1
+' WBProxy v1.4.0
 ' (c) Tim Hall - https://github.com/timhall/Excel-TDD
 '
 ' Generic implementation of workbook proxy
@@ -112,17 +112,17 @@ Private Property Set IWBProxy_Instance(Value As Workbook)
     Set Instance = Value
 End Property
 
-Public Property Get Mapping() As Scripting.IDictionary
+Public Property Get Mapping() As Dictionary
     Set Mapping = IWBProxy_Mapping
 End Property
-Private Property Get IWBProxy_Mapping() As Scripting.IDictionary
+Private Property Get IWBProxy_Mapping() As Dictionary
     If pMapping Is Nothing Then: Set pMapping = New Dictionary
     Set IWBProxy_Mapping = pMapping
 End Property
-Public Property Set Mapping(Value As Scripting.IDictionary)
+Public Property Set Mapping(Value As Dictionary)
     Set IWBProxy_Mapping = Value
 End Property
-Private Property Set IWBProxy_Mapping(Value As Scripting.IDictionary)
+Private Property Set IWBProxy_Mapping(Value As Dictionary)
     Set pMapping = Value
 End Property