← Back to branch summary

~ubuntu-branches/ubuntu/vivid/lazarus/vivid-proposed

« back to all changes in this revision

Viewing changes to debugger/test/Gdbmi/testexception.pas

  • Committer: Package Import Robot
  • Author(s): Paul Gevers, Abou Al Montacir, Paul Gevers
  • Date: 2013-06-22 13:31:45 UTC
  • mfrom: (1.1.10)
  • Revision ID: package-import@ubuntu.com-20130622133145-kf2awlf322usnrfv
Tags: 1.0.10+dfsg-1
http://bugs.debian.org/712834
[ Abou Al Montacir ]
* New upstream maintenance release offering many fixes improving the IDE and
  the LCL stability level.
  - The detailed list of changes can be found here:
    http://wiki.lazarus.freepascal.org/Lazarus_1.0_fixes_branch#Fixes_for_1.0.10
* Use compiler configuration file to pass debian custom compiler flags.
* Recover FTBFS on arm machines fix, dropped unintentionally when upgrading
  to 1.0.8. QT4 based LCL WS could not use QTOPIA. (Closes: Bug#712834)
* Update copyright notice to highlight that upstream source where repacked.

[ Paul Gevers ]
* Update Standard to 3.9.4 (no changes needed)
* Remove obsolete DM-Upload-Allowed
* Update lintian overrides
* Add myself to uploaders
* Update Vsc-Browser URL to the browse interface

Show diffs side-by-side

added added

removed removed

Lines of Context:
debugger/test/Gdbmi/testexception.pas
76
76
    dbg.Run;
77
77
    TestEquals(TstName+' Got no more exception', 2, FGotExceptCount);
78
78
    TestEquals(TstName+' Got class', 'MyESome', FGotExceptClass);
79
 
    TestEquals(TstName+' Got msg',   'abc', FGotExceptMsg, 050300);
 
79
    // not yet MakePrintable
 
80
    //TestEquals(TstName+' Got msg',   'abc üü {[''''[{ \n\t''#13#9''#', FGotExceptMsg, 050300);
 
81
    TestEquals(TstName+' Got msg',   'abc üü {[''[{ \n\t'#13#9'#', FGotExceptMsg, 050300);
80
82
    dbg.Stop;
81
83
  finally
82
84
    dbg.Done;
201
203
    dbg.Run;
202
204
    TestEquals(TstName+' Got no more exception', 2, FGotExceptCount);
203
205
    TestEquals(TstName+' Got class', 'MyESome', FGotExceptClass);
204
 
    TestEquals(TstName+' Got msg',   'abc', FGotExceptMsg, 050300);
 
206
    //TestEquals(TstName+' Got msg',   'abc üü {[''''[{ \n\t''#13#9''#', FGotExceptMsg, 050300);
 
207
    TestEquals(TstName+' Got msg',   'abc üü {[''[{ \n\t'#13#9'#', FGotExceptMsg, 050300);
 
208
 
205
209
    dbg.Stop;
206
210
  finally
207
211
    dbg.Done;