Index: tol_tests/tol/Bugzilla/bug_001225/check.tol
===================================================================
--- tol_tests/tol/Bugzilla/bug_001225/check.tol	(revision 3130ef16694dcec8271cf1414ee824242ffcb3c5)
+++ tol_tests/tol/Bugzilla/bug_001225/check.tol	(revision 3130ef16694dcec8271cf1414ee824242ffcb3c5)
@@ -0,0 +1,39 @@
+
+//Registra el contador de errores antes de empezar
+Real numErr0 = Copy(NError);
+//Registra el contador de warnings antes de empezar
+Real numWar0 = Copy(NWarning);
+
+Class @A {
+  Real _.A = 1;
+  Real GetA(Real void) { _.A }
+};
+
+Real PutDescription("Atributo @A::_.A",            "@A","_.A");
+Real PutDescription("Devuelve el valor de @A::_.A","@A","GetA");
+
+@A a;
+
+Text desc.a.A    = Description(a::_.A); 
+Text desc.a.GetA = Description(a::GetA);
+
+Text desc._A.A    = Description("@A","_.A"); 
+Text desc._A.GetA = Description("@A","GetA");
+
+
+//Registra el contador de errores al final, que debe ser igual que al principio
+Real numErr1 = Copy(NError);
+
+//Registra el contador de warnings al final, que debe ser 3 más que al principio
+Real numWar1 = Copy(NWarning);
+
+Set ok.all = [[
+  Real ok.error         = numErr1 == numErr0;
+  Real ok.warning       = numWar1 == numWar0;
+  Real ok.desc.a.A      = desc.a.A      == "Atributo @A::_.A";
+  Real ok.desc.a.GetA   = desc.a.GetA   == "Devuelve el valor de @A::_.A";
+  Real ok.desc._A.A     = desc._A.A     == "Atributo @A::_.A";
+  Real ok.desc._A.GetA  = desc._A.GetA  == "Devuelve el valor de @A::_.A"
+]];
+
+/* */
Index: tol_tests/tol/Bugzilla/bug_001225/test.tol
===================================================================
--- tol_tests/tol/Bugzilla/bug_001225/test.tol	(revision 3130ef16694dcec8271cf1414ee824242ffcb3c5)
+++ tol_tests/tol/Bugzilla/bug_001225/test.tol	(revision 3130ef16694dcec8271cf1414ee824242ffcb3c5)
@@ -0,0 +1,31 @@
+/* -*- 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_ =  1225;
+  Text email_ = "vdebuen@tol-project.org"; 
+  Text summary_="Managing Descriptions. Description extended";
+  Text link_ = GetTolBugzillaLink(bugNum_);
+
+  //Write here the initial test TOL code if needed
+
+  #Embed "check.tol";
+
+  Set partialResults_ = ok.all;
+
+//This is a messure of the success of the test 
+  Real quality_ = Group("And",ok.all);
+
+//Return the results 
+  Set resultStr_ = @strTestStatus(summary_, link_, quality_,
+                    "Partial results = "<<partialResults_,
+                    "NO DBServerType", "NO DBServerHost", "NO DBAlias",
+                    email_);
+  WriteLn(""<<resultStr_);
+  resultStr_;
+
+/* */
+
