From c0c59706ce20d6e1ffbd552234ec064ad6c49ef9 Mon Sep 17 00:00:00 2001
From: FellippeHeitor <fellippeheitor@gmail.com>
Date: Wed, 13 Jan 2021 11:08:32 -0300
Subject: [PATCH] Likely reason for incorrect line number reports for open
 SUB/FUNCTIONs.

---
 source/qb64.bas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/source/qb64.bas b/source/qb64.bas
index d417041ab..a81920d16 100644
--- a/source/qb64.bas
+++ b/source/qb64.bas
@@ -4513,6 +4513,7 @@ DO
             IF ideindentsubs THEN
                 controllevel = controllevel + 1
                 controltype(controllevel) = 32
+                controlref(controllevel) = linenumber
             END IF
 
             subfunc = RTRIM$(id.callname) 'SUB_..."