feat: wip

example1.r

@@ -0,0 +1,4 @@
+person <- list(age = 24, name = "John")
+person$name <- "Jane"
+person$age <- 44
+result <- person$name

src/dataflow/environments/define.ts

@@ -10,7 +10,11 @@ const hasNoControlDependencies = (definition: IdentifierDefinition) => definitio
 function defInEnv(newEnvironments: IEnvironment, name: string, definition: IdentifierDefinition) {
 	const existing = newEnvironments.memory.get(name);
 	// check if it is maybe or not
+	// console.log('existing:', existing, 'definition:', definition);
 	const inGraphDefinition = definition as InGraphIdentifierDefinition;
+	if(inGraphDefinition !== undefined) {
+		console.log('def', inGraphDefinition);
+	}
 	if(existing === undefined || definition.controlDependencies === undefined) {
 		newEnvironments.memory.set(name, [definition]);
 	} else {
@@ -30,6 +34,7 @@ function defInEnv(newEnvironments: IEnvironment, name: string, definition: Ident
 		}
 		existing.push(definition);
 	}
+	// console.log('after:', newEnvironments.memory.get(name));
 }
 
 /**
@@ -38,6 +43,8 @@ function defInEnv(newEnvironments: IEnvironment, name: string, definition: Ident
  */
 export function define(definition: IdentifierDefinition, superAssign: boolean | undefined, environment: REnvironmentInformation): REnvironmentInformation {
 	const name = definition.name;
+	// console.log('defining:', name);
+	// console.log('definition:', definition);
 	guard(name !== undefined, () => `Name must be defined, but isn't for ${JSON.stringify(definition)}`);
 	let newEnvironment;
 	if(superAssign) {

src/dataflow/internal/process/functions/call/built-in/built-in-access.ts

@@ -112,7 +112,10 @@ export function processAccess<OtherInfo>(
 		if(newArgs[0] !== EmptyArgument) {
 			const accessArg = newArgs[1] === EmptyArgument ? undefined : newArgs[1].lexeme;
 			const resolvedFirstParameter = resolveByName(newArgs[0].lexeme ?? '', data.environment);
+			// console.log('requesting to access', accessArg);
+			// console.log('resolvedFirstParameter', resolvedFirstParameter);
 			const resolvedFirstParameterIndices = resolvedFirstParameter?.flatMap(param => (param as InGraphIdentifierDefinition)?.indices ?? []);
+			console.log('resolved', newArgs[0].lexeme, 'to', resolvedFirstParameterIndices);
 			accessedArguments = resolvedFirstParameterIndices?.filter(index => index.lexeme === accessArg);
 		}
 

src/dataflow/internal/process/functions/call/built-in/built-in-assignment.ts

@@ -257,6 +257,9 @@ export function markAsAssignment(
 	if(sourceIds.length === 1) {
 		// support for tracking indices
 		indices = information.graph.getVertex(sourceIds[0])?.indices;
+		if(indices) {
+			console.log(`Defining indices ${indices.map((index) => `{ lexeme: ${index.lexeme}, nodeId: ${index.nodeId} }`).join(',')} for ${nodeToDefine.name}`);
+		}
 	}
 	if(config?.indices !== undefined) {
 		indices = (indices ?? []).concat(config.indices);

src/dataflow/internal/process/functions/call/built-in/built-in-replacement.ts

@@ -42,6 +42,9 @@ export function processReplacementFunction<OtherInfo>(
 		const indexArg = nonEmptyArgs.find(arg => arg.info.role === RoleInParent.IndexAccess);
 		const valueArg = nonEmptyArgs.find(arg => arg.info.role === RoleInParent.BinaryOperationRhs);
 		if(indexArg !== undefined && valueArg?.value !== undefined && accessedArg != undefined) {
+			console.log('accessed', accessedArg);
+			console.log('index', indexArg);
+			console.log('value', valueArg);
 			// use access node as reference to get complete line in slice
 			indices = [ { lexeme: indexArg.lexeme, nodeId: accessedArg.info.parent ?? '' } ]; // valueArg.value.info.id
 		}