From 4228b81870da852bad7908cdd52fabe132cdee62 Mon Sep 17 00:00:00 2001 From: kappa Date: Fri, 1 Nov 2019 22:02:08 +0100 Subject: [PATCH] =?UTF-8?q?=D0=9C=D0=B0=D1=9A=D0=B5=20=D0=BD=D0=B5=D0=B1?= =?UTF-8?q?=D0=B8=D1=82=D0=BD=D0=B5=20=D0=BF=D1=80=D0=BE=D0=BC=D0=B5=D0=BD?= =?UTF-8?q?=D0=B5?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- eval.c | 4 +--- eval.h | 1 - 2 files changed, 1 insertion(+), 4 deletions(-) diff --git a/eval.c b/eval.c index 552554b..37f69f8 100644 --- a/eval.c +++ b/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); diff --git a/eval.h b/eval.h index 38937b6..c4db117 100644 --- a/eval.h +++ b/eval.h @@ -1,4 +1,3 @@ #pragma once object Eval(object input, env currentEnv); -object apply(object function, object parameters, env currentEnv);