Fix typo

StevenLooman · May 13, 2024 · 50b7a9a · 50b7a9a
1 parent 252be5b
commit 50b7a9a
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 6 deletions.
diff --git a/sw_type_dumper/modules/sw_type_dumper/source/datamodel_type_dumper.magik b/sw_type_dumper/modules/sw_type_dumper/source/datamodel_type_dumper.magik
@@ -152,7 +152,7 @@ _private _method datamodel_type_dumper.get_type_name_for_collection(coll)
 	_local globl << method_table.meta_at(:exemplar_global)
 	_local pkg << globl.package
 	_local key << globl.key
-	_return defintion.name_from_type(pkg, key)
+	_return definition.name_from_type(pkg, key)
 _endmethod
 $
 

diff --git a/sw_type_dumper/modules/sw_type_dumper/source/type_dumper.magik b/sw_type_dumper/modules/sw_type_dumper/source/type_dumper.magik
@@ -95,9 +95,10 @@ _private _method type_dumper.int!run()
 
 	# Write intro.
 	_self.write_line("// Smallworld version: ", system.sw!version_string)
-	_self.write_line("// self type: ", definition.self_type)
-	_self.write_line("// undefined type: ", definition.undefined_type)
-	_self.write_line("// undefined result: ", definition.undefined_result)
+	_self.write_line("// Smallworld session: ", smallworld_product.magik_session().properties[:name])
+	_self.write_line("// self type: ", mt:definition.self_type)
+	_self.write_line("// undefined type: ", mt:definition.undefined_type)
+	_self.write_line("// undefined result: ", mt:definition.undefined_result)
 
 	# Write products.
 	_self.write_line("// products")

diff --git a/sw_type_dumper/modules/sw_type_dumper/source/type_merger.magik b/sw_type_dumper/modules/sw_type_dumper/source/type_merger.magik
@@ -247,8 +247,6 @@ _private _method type_merger.merge_definition(left_definition, right_definition)
 	_local msg << write_string("Changed: ", out_stream.string)
 	condition.raise(:information, :string, msg)
 
-	_global user:defs
-	user:defs << {left_definition, right_definition}
 	_return right_definition
 _endmethod
 $