diff: fix some base_type_* that survived renaming.

[Tyson Dowd]

Estimated hours taken: 0.1

compiler/base_type_layout.m:
compiler/polymorphism.m:
compiler/type_util.m:
	Rename some missed references to base_type_* as type_ctor_* in
	some comments and an error message.


cvs server: Diffing compiler/
Index: compiler//base_type_layout.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/base_type_layout.m,v
retrieving revision 1.39
diff -u -r1.39 base_type_layout.m
--- base_type_layout.m	1999/03/22 08:07:02	1.39
+++ base_type_layout.m	1999/03/23 04:04:43
@@ -606,7 +606,7 @@
 		error("type_ctor_layout: Unexpected constant - code_addr_constant/2")
 	;
 		ConsTag = type_ctor_info_constant(_, _, _),
-		error("type_ctor_layout: Unexpected constant - base_type_into_constant/3")
+		error("type_ctor_layout: Unexpected constant - type_ctor_info_constant/3")
 	),
 	list__duplicate(MaxTags, Rval, RvalsList),
 	list__condense(RvalsList, Rvals).
Index: compiler//polymorphism.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/polymorphism.m,v
retrieving revision 1.160
diff -u -r1.160 polymorphism.m
--- polymorphism.m	1999/03/22 08:07:37	1.160
+++ polymorphism.m	1999/03/23 04:05:09
@@ -2488,7 +2488,7 @@
 	%
 	% or
 	%
-	%	TypeCtorInfoVar = base_type_type_info(CountVar,
+	%	TypeCtorInfoVar = type_ctor_info(CountVar,
 	%				SpecialPredVars...)
 	%
 	% These unifications WILL lead to the creation of cells on the
@@ -2540,7 +2540,7 @@
 
 	% Create a unification for a type_info or type_ctor_info variable:
 	%
-	%	TypeCtorInfoVar = base_type_type_info(CountVar,
+	%	TypeCtorInfoVar = type_ctor_info(CountVar,
 	%				SpecialPredVars...)
 	%
 	% This unification will NOT lead to the creation of a cell on the
Index: compiler//type_util.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/type_util.m,v
retrieving revision 1.63
diff -u -r1.63 type_util.m
--- type_util.m	1999/03/22 08:07:44	1.63
+++ type_util.m	1999/03/23 04:05:13
@@ -48,7 +48,7 @@
 :- mode type_is_aditi_state(in) is semidet.
 
 	% A test for types that are defined by hand (not including
-	% the builtin types).  Don't generate base_type_*
+	% the builtin types).  Don't generate type_ctor_*
 	% for these types.
 
 :- pred type_id_is_hand_defined(type_id).
cvs server: Diffing compiler//notes


-- 
The quantum sort: 
	while (!sorted) { do_nothing(); }
Tyson Dowd   <tyson at tyse.net>   http://tyse.net/