/[eiffelstudio]/trunk/eweasel/tests/exec038/tcf
ViewVC logotype

Contents of /trunk/eweasel/tests/exec038/tcf

Parent Directory Parent Directory | Revision Log Revision Log


Revision 65297 - (show annotations)
Thu Nov 30 20:22:33 2006 UTC (13 years, 1 month ago) by manus
File size: 1052 byte(s)
Moved from trunk/Src/eweasel to trunk/eweasel so that a simple checkout of the source code is not penalized by the lenghty process of checking out all the tests of eweasel.
1
2 --| Copyright (c) 1993-2006 University of Southern California and contributors.
3 --| All rights reserved.
4 --| Your use of this work is governed under the terms of the GNU General
5 --| Public License version 2.
6
7 -- This is a test control file
8
9 test_name once-expanded-result
10 test_description A system which calls a once function whose result type is an expanded type
11
12 copy_sub Ace $TEST Ace
13 define CREATION "!!Result"
14 copy_sub test.e $CLUSTER test.e
15 copy_raw test1.e $CLUSTER test1.e
16 compile_melted
17 compile_result ok
18
19 execute_work NONE exec_output1
20 execute_result ok
21 compare exec_output1 output1
22
23 compile_frozen
24 compile_result ok
25
26 c_compile_work
27 c_compile_result ok
28
29 execute_work NONE exec_output2
30 execute_result ok
31 compare exec_output2 output1
32
33 define CREATION ""
34 copy_sub test.e $CLUSTER test.e
35 compile_melted
36 compile_result ok
37
38 define CREATION "!!Result"
39 copy_sub test.e $CLUSTER test.e
40 compile_melted
41 compile_result ok
42
43 execute_work NONE exec_output3
44 execute_result ok
45 compare exec_output3 output1
46
47 test_end

Properties

Name Value
svn:eol-style native

  ViewVC Help
Powered by ViewVC 1.1.23