From d465a8b1fddbbabcf4f9739e80e9e82dc945028e Mon Sep 17 00:00:00 2001
From: DeaDDooMER <deaddoomer@deadsoftware.ru>
Date: Mon, 24 Jul 2017 22:12:44 +0300
Subject: [PATCH] =?utf8?q?=D0=9F=D1=80=D0=BE=D1=86=D0=B5=D0=B4=D1=83=D1=80?=
 =?utf8?q?=D1=8B=20=D0=BC=D0=BE=D0=B6=D0=BD=D0=BE=20=D0=B2=D1=8B=D0=B7?=
 =?utf8?q?=D1=8B=D0=B2=D0=B0=D1=82=D1=8C=20=D1=81=D0=BE=20=D1=81=D0=BA?=
 =?utf8?q?=D0=BE=D0=B1=D0=BA=D0=B0=D0=BC=D0=B8=20:)?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 oberon.c | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/oberon.c b/oberon.c
index 0aa8d45..98928fb 100644
--- a/oberon.c
+++ b/oberon.c
@@ -520,9 +520,16 @@ oberon_factor(oberon_context_t * ctx)
 			}
 			else
 			{
-				oberon_error(ctx, "invalid desinator");
+				oberon_error(ctx, "invalid designator");
 			}
+
 			expr -> item.var = var;
+			if(ctx -> token == LPAREN)
+			{
+				oberon_assert_token(ctx, LPAREN);
+				expr -> item.mode = MODE_CALL;
+				oberon_assert_token(ctx, RPAREN);
+			}
 			break;
 		case INTEGER:
 			expr = oberon_new_item(MODE_INTEGER, ctx -> int_type);
-- 
2.29.2