TesteCase

[Waldir Paim]

Num outro tópico onde o usuário estava passando por uma situação onde passava um valor e o resultado obtido é diferente do esperado coincidiu com um problema que passei recentemente e por isso resolvi fazer os testes que não existia para esse caso.

Segue anexo a unit do teste e a correção da situação que peguei na função TruncTo.

 

acbrutiltest.pas

ACBrUtil.pas

[Waldir Paim]

Fazendo mais testes no FreePascal concluímos que a função TruncTo deve receber sobrecarga e ter uma para cada tipo;

Fiz uma alteração e inclui as novas variações da mesma função.

Inclui nos testes o teste para o tipo Single.

Isso permite ao compilar escolher o melhor tipo para a conversão.

Segue units alteradas.

 

 

ACBrUtil.pas

acbrutiltest.pas

[Waldir Paim]

Removi os anexos anteriores e removi a sobrecarga na função TruncTo como descrito.

Anexei as units novamente com mais alguns ajustes e com mais testes que os valores não correspondiam com o resultado esperado.

Se alguém puder baixar e rodar o teste para ver se a função atual do repositório está realmente com problemas em alguns valores. 

Segue units.

 

acbrutiltest.pas

ACBrUtil.pas

[Daniel Simoes]

Waldir,

Muito obrigado pela analise, correção e adição dos Testes Unitários... parabéns...

Enviei para o SVN, com pequenas modificações...

[Daniel Simoes]

Notei falha na rotina TruncTo em alguns casos específicos... Apliquei as seguintes modificações:

Citar

Data: 29/08/2016
-- ACBrUtil --
[-] Correção no método "TruncTo", onde poderia ocorrer falha em valores
    específicos... Nova Implementação, baseada em "TruncFix".
    Novo teste adicionado em "ACBrComumTestCases"  (por: DSA)