Made test run for latest pharo 70

pharo-rdbms · Oct 20, 2017 · f95a29e · f95a29e
1 parent 91f082d
commit f95a29e
Show file tree

Hide file tree

Showing 51 changed files with 393 additions and 484 deletions.
diff --git a/Garage-Sqlite3.package/.filetree b/Garage-Sqlite3.package/.filetree
@@ -1,4 +1,5 @@
 {
-	"noMethodMetaData" : true,
 	"separateMethodMetaAndSource" : false,
-	"useCypressPropertiesFile" : true }
+	"noMethodMetaData" : true,
+	"useCypressPropertiesFile" : true
+}
diff --git a/Garage-Sqlite3.package/GASQLite3Constants.class/properties.json b/Garage-Sqlite3.package/GASQLite3Constants.class/properties.json
@@ -1,7 +1,9 @@
 {
+	"commentStamp" : "GuillermoPolito 4/17/2015 14:05",
+	"super" : "SharedPool",
 	"category" : "Garage-Sqlite3-FFI",
-	"classinstvars" : [
-		 ],
+	"classinstvars" : [ ],
+	"pools" : [ ],
 	"classvars" : [
 		"BLOB",
 		"BUSY",
@@ -11,12 +13,9 @@
 		"MISUSE",
 		"NULL",
 		"OK",
-		"TEXT" ],
-	"commentStamp" : "GuillermoPolito 4/17/2015 14:05",
-	"instvars" : [
-		 ],
+		"TEXT"
+	],
+	"instvars" : [ ],
 	"name" : "GASQLite3Constants",
-	"pools" : [
-		 ],
-	"super" : "SharedPool",
-	"type" : "normal" }
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASQLite3DatabaseExternalObject.class/properties.json b/Garage-Sqlite3.package/GASQLite3DatabaseExternalObject.class/properties.json
@@ -1,14 +1,11 @@
 {
-	"category" : "Garage-Sqlite3-FFI",
-	"classinstvars" : [
-		 ],
-	"classvars" : [
-		 ],
 	"commentStamp" : "GuillermoPolito 4/17/2015 14:05",
-	"instvars" : [
-		 ],
-	"name" : "GASQLite3DatabaseExternalObject",
-	"pools" : [
-		 ],
 	"super" : "FFIExternalObject",
-	"type" : "normal" }
+	"category" : "Garage-Sqlite3-FFI",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
+	"instvars" : [ ],
+	"name" : "GASQLite3DatabaseExternalObject",
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASQLite3StatementExternalObject.class/properties.json b/Garage-Sqlite3.package/GASQLite3StatementExternalObject.class/properties.json
@@ -1,14 +1,11 @@
 {
-	"category" : "Garage-Sqlite3-FFI",
-	"classinstvars" : [
-		 ],
-	"classvars" : [
-		 ],
 	"commentStamp" : "GuillermoPolito 4/17/2015 14:05",
-	"instvars" : [
-		 ],
-	"name" : "GASQLite3StatementExternalObject",
-	"pools" : [
-		 ],
 	"super" : "FFIExternalObject",
-	"type" : "normal" }
+	"category" : "Garage-Sqlite3-FFI",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
+	"instvars" : [ ],
+	"name" : "GASQLite3StatementExternalObject",
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASqlite3Busy.class/properties.json b/Garage-Sqlite3.package/GASqlite3Busy.class/properties.json
@@ -1,14 +1,11 @@
 {
-	"category" : "Garage-Sqlite3-Errors",
-	"classinstvars" : [
-		 ],
-	"classvars" : [
-		 ],
 	"commentStamp" : "<historical>",
-	"instvars" : [
-		 ],
-	"name" : "GASqlite3Busy",
-	"pools" : [
-		 ],
 	"super" : "GASqlite3Error",
-	"type" : "normal" }
+	"category" : "Garage-Sqlite3-Errors",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
+	"instvars" : [ ],
+	"name" : "GASqlite3Busy",
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASqlite3Driver.class/properties.json b/Garage-Sqlite3.package/GASqlite3Driver.class/properties.json
@@ -1,16 +1,15 @@
 {
-	"category" : "Garage-Sqlite3",
-	"classinstvars" : [
-		 ],
-	"classvars" : [
-		 ],
 	"commentStamp" : "",
+	"super" : "GADriver",
+	"category" : "Garage-Sqlite3",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
 	"instvars" : [
 		"database",
 		"handle",
-		"isOpen" ],
+		"isOpen"
+	],
 	"name" : "GASqlite3Driver",
-	"pools" : [
-		 ],
-	"super" : "GADriver",
-	"type" : "normal" }
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASqlite3Error.class/properties.json b/Garage-Sqlite3.package/GASqlite3Error.class/properties.json
@@ -1,14 +1,13 @@
 {
-	"category" : "Garage-Sqlite3-Errors",
-	"classinstvars" : [
-		 ],
-	"classvars" : [
-		 ],
 	"commentStamp" : "<historical>",
+	"super" : "Error",
+	"category" : "Garage-Sqlite3-Errors",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
 	"instvars" : [
-		"resultCode" ],
+		"resultCode"
+	],
 	"name" : "GASqlite3Error",
-	"pools" : [
-		 ],
-	"super" : "Error",
-	"type" : "normal" }
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASqlite3FFI.class/properties.json b/Garage-Sqlite3.package/GASqlite3FFI.class/properties.json
@@ -1,16 +1,17 @@
 {
+	"commentStamp" : "<historical>",
+	"super" : "Object",
 	"category" : "Garage-Sqlite3-FFI",
-	"classinstvars" : [
-		 ],
+	"classinstvars" : [ ],
+	"pools" : [
+		"GASQLite3Constants"
+	],
 	"classvars" : [
 		"DataTypeMap",
 		"Singleton",
-		"TypeMap" ],
-	"commentStamp" : "<historical>",
-	"instvars" : [
-		 ],
+		"TypeMap"
+	],
+	"instvars" : [ ],
 	"name" : "GASqlite3FFI",
-	"pools" : [
-		"GASQLite3Constants" ],
-	"super" : "Object",
-	"type" : "normal" }
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASqlite3Locked.class/properties.json b/Garage-Sqlite3.package/GASqlite3Locked.class/properties.json
@@ -1,14 +1,11 @@
 {
-	"category" : "Garage-Sqlite3-Errors",
-	"classinstvars" : [
-		 ],
-	"classvars" : [
-		 ],
 	"commentStamp" : "<historical>",
-	"instvars" : [
-		 ],
-	"name" : "GASqlite3Locked",
-	"pools" : [
-		 ],
 	"super" : "GASqlite3Error",
-	"type" : "normal" }
+	"category" : "Garage-Sqlite3-Errors",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
+	"instvars" : [ ],
+	"name" : "GASqlite3Locked",
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASqlite3Misuse.class/properties.json b/Garage-Sqlite3.package/GASqlite3Misuse.class/properties.json
@@ -1,14 +1,11 @@
 {
-	"category" : "Garage-Sqlite3-Errors",
-	"classinstvars" : [
-		 ],
-	"classvars" : [
-		 ],
 	"commentStamp" : "PierceNg 4/6/2014 00:01",
-	"instvars" : [
-		 ],
-	"name" : "GASqlite3Misuse",
-	"pools" : [
-		 ],
 	"super" : "GASqlite3Error",
-	"type" : "normal" }
+	"category" : "Garage-Sqlite3-Errors",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
+	"instvars" : [ ],
+	"name" : "GASqlite3Misuse",
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASqlite3NotOpen.class/properties.json b/Garage-Sqlite3.package/GASqlite3NotOpen.class/properties.json
@@ -1,14 +1,11 @@
 {
-	"category" : "Garage-Sqlite3-Errors",
-	"classinstvars" : [
-		 ],
-	"classvars" : [
-		 ],
 	"commentStamp" : "PierceNg 3/29/2014 20:17",
-	"instvars" : [
-		 ],
-	"name" : "GASqlite3NotOpen",
-	"pools" : [
-		 ],
 	"super" : "GASqlite3Error",
-	"type" : "normal" }
+	"category" : "Garage-Sqlite3-Errors",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
+	"instvars" : [ ],
+	"name" : "GASqlite3NotOpen",
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASqlite3ResultSet.class/properties.json b/Garage-Sqlite3.package/GASqlite3ResultSet.class/properties.json
@@ -1,10 +1,10 @@
 {
-	"category" : "Garage-Sqlite3",
-	"classinstvars" : [
-		 ],
-	"classvars" : [
-		 ],
 	"commentStamp" : "",
+	"super" : "GAResultSet",
+	"category" : "Garage-Sqlite3",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
 	"instvars" : [
 		"db",
 		"statement",
@@ -13,9 +13,8 @@
 		"columnTypes",
 		"rows",
 		"affectedRows",
-		"generatedKey" ],
+		"generatedKey"
+	],
 	"name" : "GASqlite3ResultSet",
-	"pools" : [
-		 ],
-	"super" : "GAResultSet",
-	"type" : "normal" }
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASqlite3Row.class/properties.json b/Garage-Sqlite3.package/GASqlite3Row.class/properties.json
@@ -1,15 +1,14 @@
 {
-	"category" : "Garage-Sqlite3",
-	"classinstvars" : [
-		 ],
-	"classvars" : [
-		 ],
 	"commentStamp" : "",
+	"super" : "GARow",
+	"category" : "Garage-Sqlite3",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
 	"instvars" : [
 		"data",
-		"resultSet" ],
+		"resultSet"
+	],
 	"name" : "GASqlite3Row",
-	"pools" : [
-		 ],
-	"super" : "GARow",
-	"type" : "normal" }
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASqlite3Statement.class/instance/execute.st b/Garage-Sqlite3.package/GASqlite3Statement.class/instance/execute.st
@@ -6,7 +6,7 @@ execute
 	self reset.
 	self basicExecute: [ :theStatement | | generatedKey |
 		generatedKey := GASqlite3FFI current lastInsertRowId: connection handle.
-		fetchListener ifNotNilDo: #fetchOccurred.
+		fetchListener ifNotNil: #fetchOccurred.
 		^ GASqlite3ResultSet new
 			statement: theStatement;
 			generatedKey: generatedKey;

diff --git a/Garage-Sqlite3.package/GASqlite3Statement.class/properties.json b/Garage-Sqlite3.package/GASqlite3Statement.class/properties.json
@@ -1,14 +1,13 @@
 {
-	"category" : "Garage-Sqlite3",
-	"classinstvars" : [
-		 ],
-	"classvars" : [
-		 ],
 	"commentStamp" : "<historical>",
+	"super" : "GAStatement",
+	"category" : "Garage-Sqlite3",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
 	"instvars" : [
-		"handle" ],
+		"handle"
+	],
 	"name" : "GASqlite3Statement",
-	"pools" : [
-		 ],
-	"super" : "GAStatement",
-	"type" : "normal" }
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/GASqliteConnectionStringTest.class/properties.json b/Garage-Sqlite3.package/GASqliteConnectionStringTest.class/properties.json
@@ -1,14 +1,11 @@
 {
-	"category" : "Garage-Sqlite3-Tests",
-	"classinstvars" : [
-		 ],
-	"classvars" : [
-		 ],
 	"commentStamp" : "",
-	"instvars" : [
-		 ],
-	"name" : "GASqliteConnectionStringTest",
-	"pools" : [
-		 ],
 	"super" : "TestCase",
-	"type" : "normal" }
+	"category" : "Garage-Sqlite3-Tests",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
+	"instvars" : [ ],
+	"name" : "GASqliteConnectionStringTest",
+	"type" : "normal"
+}
diff --git a/Garage-Sqlite3.package/properties.json b/Garage-Sqlite3.package/properties.json
@@ -1,2 +1 @@
-{
-	 }
+{ }
diff --git a/Garage.package/.filetree b/Garage.package/.filetree
@@ -1,4 +1,5 @@
 {
-	"noMethodMetaData" : true,
 	"separateMethodMetaAndSource" : false,
-	"useCypressPropertiesFile" : true }
+	"noMethodMetaData" : true,
+	"useCypressPropertiesFile" : true
+}