Changeset 9d0d08d in tol


Ignore:
Timestamp:
Feb 26, 2009, 2:37:21 PM (18 years ago)
Author:
Víctor de Buen <vdebuen@…>
Branches:
1941-docker-image-to-test, devel, master
Children:
23d5671
Parents:
91836f9
Message:

Checking quality of test

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@663 be4846ae-f051-483a-831f-b64e7d08527f

Location:
tol_tests/tol/Bugzilla/bug_000576
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • tol_tests/tol/Bugzilla/bug_000576/test.tol

    r91836f9 r9d0d08d  
    88  Real bugNum_ = 576;
    99  Text email_ = "vdebuen@tol-project.org";
    10   Text summary_ = "BDBOpen can not be used without a Structure Name of field register";
     10  Text summary_ = "BDBOpen can not be used without a Structure Name "
     11                  "of field register";
    1112  Text link_ = GetTolBugzillaLink(bugNum_);
    1213
    … …  
    1718  Set dataCSV = BDBOpen(pathCSV, 0, ";", "", "");
    1819  Real regNum = dataCSV->RegNumber;
    19   Set tabla = For(1, regNum, Set(Real k){ BDBReg(dataCSV, regNum) });
    20  
     20  Set tabla = For(1, regNum, Set(Real k)
     21  {
     22    Set reg = BDBReg(dataCSV, k);
     23    WriteLn("reg["<<k<<"] = "<<reg);
     24    reg
     25  });
     26  Text tabla_txt = ""<<tabla;
     27  Real ok = tabla_txt ==
     28  "[[  [[  \"Campo1\", \"Campo2\", \"Campo3\", \"Campo4\"]], "
     29      "[[  \"2\", \"4\", \"1\", \"t\"]], "
     30      "[[  \"2\", \"e\", \"r\", \"2\"]], "
     31      "[[  \"3\", \"5\", \"f\", \"e\"]]]]";
     32
     33  Real BDBClose(dataCSV);
    2134  Real numErr1 = Copy(NError);
    22 /*
     35
    2336//Extented information about test behaviour
    2437  Set partialResults_ =
    2538  [[
    26     numErr0, numErr1
     39    numErr0, numErr1, ok
    2740  ]];
    2841
     42 
    2943//This is a messure of the success of the test
    30   Real quality_ = numErr1 == numErr0;
     44  Real quality_ = And(numErr1 == numErr0, ok);
    3145
    3246//Return the results

  • tol_tests/tol/Bugzilla/bug_000576/test.txt

    r91836f9 r9d0d08d  
    1 Campo 1;Campo 1;Campo 1;Campo 1
    2 2;4;;t
    3 2;e;r;
    4 3;;f;e
    5 
    6 Campo3;Campo3;Campo3;
     1Campo1;Campo2;Campo3;Campo4
     22;4;1;t
     32;e;r;2
     43;5;f;e
Note: See TracChangeset for help on using the changeset viewer.