]>
Commit | Line | Data |
---|---|---|
f67539c2 TL |
1 | %% |
2 | %% Licensed to the Apache Software Foundation (ASF) under one | |
3 | %% or more contributor license agreements. See the NOTICE file | |
4 | %% distributed with this work for additional information | |
5 | %% regarding copyright ownership. The ASF licenses this file | |
6 | %% to you under the Apache License, Version 2.0 (the | |
7 | %% "License"); you may not use this file except in compliance | |
8 | %% with the License. You may obtain a copy of the License at | |
9 | %% | |
10 | %% http://www.apache.org/licenses/LICENSE-2.0 | |
11 | %% | |
12 | %% Unless required by applicable law or agreed to in writing, | |
13 | %% software distributed under the License is distributed on an | |
14 | %% "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY | |
15 | %% KIND, either express or implied. See the License for the | |
16 | %% specific language governing permissions and limitations | |
17 | %% under the License. | |
18 | %% | |
19 | ||
20 | -module(test_const). | |
21 | ||
22 | -ifdef(TEST). | |
23 | -include_lib("eunit/include/eunit.hrl"). | |
24 | ||
25 | -include("gen-erl/constants_demo_types.hrl"). | |
26 | ||
27 | namespace_test() -> | |
28 | %% Verify that records produced by ConstantsDemo.thrift have the right namespace. | |
29 | io:format(user, "in namespace_test()\n", []), | |
30 | {struct, _} = constants_demo_types:struct_info('consts_thing'), | |
31 | {struct, _} = constants_demo_types:struct_info('consts_Blah'), | |
32 | ok. | |
33 | ||
34 | const_map_test() -> | |
35 | ?assertEqual(233, constants_demo_constants:gen_map(35532)), | |
36 | ?assertError(function_clause, constants_demo_constants:gen_map(0)), | |
37 | ||
38 | ?assertEqual(853, constants_demo_constants:gen_map(43523, default)), | |
39 | ?assertEqual(default, constants_demo_constants:gen_map(10110, default)), | |
40 | ||
41 | ?assertEqual(98325, constants_demo_constants:gen_map2("lkjsdf")), | |
42 | ?assertError(function_clause, constants_demo_constants:gen_map2("nonexist")), | |
43 | ||
44 | ?assertEqual(233, constants_demo_constants:gen_map2("hello", 321)), | |
45 | ?assertEqual(321, constants_demo_constants:gen_map2("goodbye", 321)). | |
46 | ||
47 | const_list_test() -> | |
48 | ?assertEqual(23598352, constants_demo_constants:gen_list(2)), | |
49 | ?assertError(function_clause, constants_demo_constants:gen_list(0)), | |
50 | ||
51 | ?assertEqual(3253523, constants_demo_constants:gen_list(3, default)), | |
52 | ?assertEqual(default, constants_demo_constants:gen_list(10, default)). | |
53 | ||
54 | -endif. %% TEST |