From 5a40ebd15b91ed3e24a80abfb26f9eccfb4ac6e9 Mon Sep 17 00:00:00 2001 From: FellippeHeitor Date: Sat, 21 Aug 2021 19:21:33 -0300 Subject: [PATCH] Attempt at pointing properly to the element offset. --- internal/support/vwatch/vwatch.bm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/internal/support/vwatch/vwatch.bm b/internal/support/vwatch/vwatch.bm index 7655c6320..d995a39bc 100644 --- a/internal/support/vwatch/vwatch.bm +++ b/internal/support/vwatch/vwatch.bm @@ -281,7 +281,6 @@ SUB vwatch (globalVariables AS _OFFSET, localVariables AS _OFFSET) END IF vw_address = _MEMGET(vw_m, vw_address, _OFFSET) 'first resolve pass vw_address = _MEMGET(vw_m, vw_address, _OFFSET) 'second resolve pass - vw_address = vw_address + vw_elementoffset IF vw_isarray THEN vw_lbound = check_lbound%&(vw_address) @@ -316,6 +315,7 @@ SUB vwatch (globalVariables AS _OFFSET, localVariables AS _OFFSET) END IF 'vw_address now points to the actual data + vw_address = vw_address + vw_elementoffset vw_buf$ = SPACE$(vw_varSize) vw_m = _MEM(vw_address, vw_varSize) vw_m2 = _MEM(_OFFSET(vw_buf$), vw_varSize)