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

Contents of /trunk/eweasel/tests/store003/tcf

Parent Directory Parent Directory | Revision Log Revision Log


Revision 65297 - (show annotations)
Thu Nov 30 20:22:33 2006 UTC (13 years ago) by manus
File size: 1170 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 melt-retrieval-mismatch
10 test_description A class creates an instance of a second class, stores it in a file using `independent_store' and then opens the file and retrieves what was previously stored. After initial compilation, system execution works correctly. Then an instruction is added to a routine and changes are melted. Execution then incorrectly ends with a mismatch retrieval error.
11
12 copy_sub Ace $TEST Ace
13 define INSTRUCTION ""
14 copy_raw test.e $CLUSTER test.e
15 copy_raw a.e $CLUSTER a.e
16 copy_sub manu.e $CLUSTER manu.e
17 compile_frozen
18 compile_result validity_warning TEST Unused_local_warning
19
20 c_compile_work
21 c_compile_result ok
22
23 execute_work NONE exec_output1
24 execute_result ok
25 compare exec_output1 output
26
27 define INSTRUCTION "i := i"
28 copy_sub manu.e $CLUSTER manu.e
29 compile_melted
30 compile_result ok
31
32 execute_work NONE exec_output2
33 execute_result ok
34 compare exec_output2 output
35
36 test_end

Properties

Name Value
svn:eol-style native

  ViewVC Help
Powered by ViewVC 1.1.23