X-Git-Url: https://git.bts.cx/sun.git/blobdiff_plain/a5b6b9ea53d78b2019201a9fb75b763b7d92873c..refs/heads/mainline:/runtime/src/sun/tree/node.c?ds=inline

diff --git a/runtime/src/sun/tree/node.c b/runtime/src/sun/tree/node.c
index ad91732..f94f6e2 100644
--- a/runtime/src/sun/tree/node.c
+++ b/runtime/src/sun/tree/node.c
@@ -93,8 +93,8 @@ SLTNode *sltNodeMakeArrayAccess(SLTNode *array, SLTNode *access) {
 	return node;
 }
 
-SLTNode *sltNodeMakeTypeAccess(SLTNode *type, SLTNode *access) {
-	SLTNode *node = node_make(SLTNodeTypeTypeAccess);
+SLTNode *sltNodeMakeMemberAccess(SLTNode *type, SLTNode *access) {
+	SLTNode *node = node_make(SLTNodeTypeMemberAccess);
 	node->typeAccessType = type;
 	node->typeAccessAccess = access;
 	return node;
@@ -197,15 +197,17 @@ SLTNode *sltNodeMakeVariableDefinition(SLTNode *type, SLTNode *identifier, SLTNo
 	return node;
 }
 
-SLTNode *sltNodeMakeTypeDefinition(SLTNode *identifier, SLTNode *members) {
-	SLTNode *node = node_make(SLTNodeTypeTypeDefinition);
+//extern SLTNode *sltNodeMakeTypeDefinition(SLTNode *identifier, SLTNode *dimension);
+
+SLTNode *sltNodeMakeUserDefinedTypeDefinition(SLTNode *identifier, SLTNode *members) {
+	SLTNode *node = node_make(SLTNodeTypeUserDefinedTypeDefinition);
 	node->typeDefinitionIdentifier = identifier;
 	node->typeDefinitionMembers = members;
 	return node;
 }
 
-SLTNode *sltNodeMakeTypeMemberDefinition(SLTNode *type, SLTNode *identifier) {
-	SLTNode *node = node_make(SLTNodeTypeTypeMemberDefinition);
+SLTNode *sltNodeMakeUserDefinedTypeMemberDefinition(SLTNode *type, SLTNode *identifier) {
+	SLTNode *node = node_make(SLTNodeTypeUserDefinedTypeMemberDefinition);
 	node->typeMemberDefinitionType = type;
 	node->typeMemberDefinitionIdentifier = identifier;
 	return node;