~ubuntu-branches/ubuntu/intrepid/swi-prolog/intrepid

« back to all changes in this revision

Viewing changes to src/Tests/core/test_text.pl

  • Committer: Bazaar Package Importer
  • Author(s): Chris Lamb
  • Date: 2008-05-14 02:47:49 UTC
  • mfrom: (1.1.5 upstream)
  • Revision ID: james.westby@ubuntu.com-20080514024749-out53uysriunvn32
Tags: 5.6.55-1
* New upstream release.
* Use correct shared object file extension on HPPA to fix FTBFS on this
  architecture since 5.6.53-2. Patch backported from upstream repository.

Show diffs side-by-side

added added

removed removed

Lines of Context:
35
35
 
36
36
test_text :-
37
37
        run_tests([ char_code,
 
38
                    atom_concat,
38
39
                    term_to_atom,
39
40
                    atom_to_term
40
41
                  ]).
64
65
 
65
66
:- end_tests(char_code).
66
67
 
 
68
:- begin_tests(atom_concat).
 
69
 
 
70
test(shared, X == ab) :-                % deal with atom_concat(X,X,...)
 
71
        atom_concat(X, X, abab).
 
72
test(shared, X == '') :-
 
73
        atom_concat(X, X, '').
 
74
test(shared, fail) :-
 
75
        atom_concat(X, X, abac).
 
76
 
 
77
:- end_tests(atom_concat).
 
78
 
 
79
 
67
80
:- begin_tests(term_to_atom).
68
81
 
69
82
test(write, A == 'foo(a)') :-