Мање небитне промене
This commit is contained in:
		
							parent
							
								
									8e8759bf11
								
							
						
					
					
						commit
						4228b81870
					
				
					 2 changed files with 1 additions and 4 deletions
				
			
		
							
								
								
									
										4
									
								
								eval.c
									
										
									
									
									
								
							
							
						
						
									
										4
									
								
								eval.c
									
										
									
									
									
								
							|  | @ -5,8 +5,6 @@ | |||
| #include "internals.h" | ||||
| #include "eval.h" | ||||
| 
 | ||||
| object apply(object function, object parameters, env currentEnv); | ||||
| 
 | ||||
| int bindArgs(object parameters, object args, env newEnv) | ||||
| /* на почетку извршавања функције, везује прослеђене параметре, за симболе у
 | ||||
|  * дефиницији функције, везивање се врши у новонасталом окружењу, уколико је | ||||
|  | @ -251,7 +249,7 @@ apply: | |||
| 		deleteObject(currentExpr); | ||||
| 		currentExprPointer = &CDR(*currentExprPointer); | ||||
| 	} | ||||
| 	/* репни позив */ | ||||
| 	/* репни израз */ | ||||
| 	currentExpr = copyObject(CAR(*currentExprPointer)); | ||||
| 
 | ||||
| 	deleteObject(procedure); | ||||
|  |  | |||
							
								
								
									
										1
									
								
								eval.h
									
										
									
									
									
								
							
							
						
						
									
										1
									
								
								eval.h
									
										
									
									
									
								
							|  | @ -1,4 +1,3 @@ | |||
| #pragma once | ||||
| 
 | ||||
| object Eval(object input, env currentEnv); | ||||
| object apply(object function, object parameters, env currentEnv); | ||||
|  |  | |||
		Loading…
	
	Add table
		
		Reference in a new issue
	
	 kappa
						kappa