From ceb91ed4a8e6be851b0c62535b94cd687df6f0b4 Mon Sep 17 00:00:00 2001 From: Ryszard Glab Date: Wed, 2 Feb 2000 10:50:11 +0000 Subject: [PATCH] ChangeLog 20000202-12:05 GMT+1 --- harbour/ChangeLog | 6 ++++++ harbour/source/compiler/harbour.y | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index c7af7db6a1..20c86b0dc6 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,9 @@ +20000202-12:05 GMT+1 Ryszard Glab + + *source/compiler/harbour.y + * fixed to properly compile EXTERNAL directive if placed outside + of a function body + 2000-02-01 20:40 GMT-5 David G. Holm * bin/bld_tpl.bat diff --git a/harbour/source/compiler/harbour.y b/harbour/source/compiler/harbour.y index 6d04507ba8..8802c34593 100644 --- a/harbour/source/compiler/harbour.y +++ b/harbour/source/compiler/harbour.y @@ -349,7 +349,7 @@ Statement : ExecFlow CrlfStmnt { } | EXITLOOP CrlfStmnt { hb_compLoopExit(); hb_comp_functions.pLast->bFlags |= FUN_BREAK_CODE; } | LOOP CrlfStmnt { hb_compLoopLoop(); hb_comp_functions.pLast->bFlags |= FUN_BREAK_CODE; } - | EXTERN ExtList CrlfStmnt + | EXTERN ExtList Crlf | ANNOUNCE IdentName { if( hb_comp_szAnnounce == NULL ) {