From d906629d2aa635639b8a4d80aab83221dc1412a6 Mon Sep 17 00:00:00 2001 From: David Brown Date: Fri, 28 Oct 2016 12:21:34 +0100 Subject: [PATCH] Close old symbol file before reopening it to rewrite it. --- src/compiler/OPM.Mod | 1 + 1 file changed, 1 insertion(+) diff --git a/src/compiler/OPM.Mod b/src/compiler/OPM.Mod index 1ecaa7e0..68215490 100644 --- a/src/compiler/OPM.Mod +++ b/src/compiler/OPM.Mod @@ -614,6 +614,7 @@ MODULE OPM; (* RC 6.3.89 / 28.6.89, J.Templ 10.7.89 / 22.7.96 *) END SymRLReal; PROCEDURE CloseOldSym*; + BEGIN Files.Close(Files.Base(oldSF)) END CloseOldSym; PROCEDURE OldSym*(VAR modName: ARRAY OF CHAR; VAR done: BOOLEAN);