diff --git a/packages/base/tcl/tcl80.pp b/packages/base/tcl/tcl80.pp
index e48eff1784..8e75bf2ca1 100644
--- a/packages/base/tcl/tcl80.pp
+++ b/packages/base/tcl/tcl80.pp
@@ -938,7 +938,7 @@ type
 
 
 implementation
-uses SysUtils, Classes;
+uses SysUtils {, Classes};
 
 
 // Macro emulation