Index: tol_tests/tol/Bugzilla/bug_001209/check.tol
===================================================================
--- tol_tests/tol/Bugzilla/bug_001209/check.tol	(revision e3da30db2886b2be8bee5f35b0e55e1d3a2b73d3)
+++ tol_tests/tol/Bugzilla/bug_001209/check.tol	(revision e3da30db2886b2be8bee5f35b0e55e1d3a2b73d3)
@@ -0,0 +1,13 @@
+NameBlock modulo = [[
+  NameBlock submodulo = [[
+    Real Funcion(Real a) { 2*a }
+  ]];
+  NameBlock GetSubmodulo(Real void) {
+    WriteLn("Estás accediendo al submódulo.", "W");
+    submodulo
+  }
+]];
+
+Real modulo::GetSubmodulo(?)::Funcion(3);
+
+NameBlock modulo::GetSubmodulo(?);
Index: tol_tests/tol/Bugzilla/bug_001209/test.tol
===================================================================
--- tol_tests/tol/Bugzilla/bug_001209/test.tol	(revision e3da30db2886b2be8bee5f35b0e55e1d3a2b73d3)
+++ tol_tests/tol/Bugzilla/bug_001209/test.tol	(revision e3da30db2886b2be8bee5f35b0e55e1d3a2b73d3)
@@ -0,0 +1,36 @@
+/* -*- mode: C++ -*- */
+//////////////////////////////////////////////////////////////////////////////
+// FILE   : test.tol
+// PURPOSE: test for a resolved bug
+//////////////////////////////////////////////////////////////////////////////
+
+//Sets the bugzilla identifier number, your e-mail and the bugŽs summary
+  Real bugNum_ =  1209;
+  Text email_ = "vdebuen@tol-project.org"; 
+  Text summary_="Lost messages when the use of the :: operator is concatenated";
+  Text link_ = GetTolBugzillaLink(bugNum_);
+
+  //Write here the initial test TOL code if needed
+
+Real numErr0 = Copy(NError);
+Real numWar0 = Copy(NWarning);
+Set check = { Include("check.tol") };
+Real numErr1 = Copy(NError);
+Real numWar1 = Copy(NWarning);
+
+
+  Set partialResults_ = [[ numErr0,numErr1,numWar1,numWar0]];
+
+//This is a messure of the success of the test 
+  Real quality_ = And(numErr1==numErr0,numWar1==numWar0+2);
+
+//Return the results 
+  Set resultStr_ = @strTestStatus(summary_, link_, quality_,
+                    "Partial results = "<<partialResults_,
+                    "NO DBServerType", "NO DBServerHost", "NO DBAlias",
+                    email_);
+  WriteLn(""<<resultStr_);
+  resultStr_;
+
+/* */
+
