added expansion-test
[mala.git] / tests / mala_strings.test
blob94801771c23209209bdffbdb810f9e72ee5cbd6c
1 # Copyright (C) 2004, Christian Thaeter <chth@gmx.net>
3 # This file is part of the MaLa extension Language.
5 # This program is free software; you can redistribute it and/or modify
6 # it under the terms of the GNU General Public License version 2 as
7 # published by the Free Software Foundation.
9 # This program is distributed in the hope that it will be useful,
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 # GNU General Public License for more details.
14 # You should have received a copy of the GNU General Public License
15 # along with this program; if not, contact me.
17 TEST "strings" <<END
18 TEST a = mala_string_new ("bar", test): .. OK
19 TEST b = mala_string_new ("baz", test): .. OK
20 TEST c = mala_string_new ("bar", test): .. OK
21 TEST d = mala_string_new ("bar", NULL): .. OK
22 TEST mala_stringbucket_erase (test): .. OK
23 TEST mala_string_free (a): .. OK
24 TEST mala_string_free (b): .. OK
25 TEST mala_string_free (c): .. OK
26 TEST mala_string_free (d): .. OK
27 TEST a = mala_string_new_print(NULL, "%d",1234): .. OK
28 TEST mala_string_compare (a, onetwothreefour) == 0: .. OK
29 TEST mala_string_length (a) == 4: .. OK
30 END
32 # arch-tag: 0487f096-1d68-42b5-80fe-1e6deea428a2