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

Contents of /trunk/eweasel/tests/melt016/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: 1021 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 chg-external-to-internal
10 test_description After initial compilation where the system is frozen, an inherited external BOOLEAN function is changed to an internal BOOLEAN function and changes are melted.
11
12 copy_sub Ace $TEST Ace
13 define ROUTINE "weaseling: BOOLEAN is external "C | %"eif_memory.h%"" alias "eif_gc_ison" end"
14 copy_raw test.e $CLUSTER test.e
15 copy_sub test1.e $CLUSTER test1.e
16 compile_frozen
17 compile_result ok
18
19 c_compile_work
20 c_compile_result ok
21
22 execute_work NONE exec_output1
23 execute_result ok
24 compare exec_output1 output
25
26 define ROUTINE "weaseling: BOOLEAN is do Result := True; end"
27 copy_sub test1.e $CLUSTER test1.e
28 compile_melted
29 compile_result ok
30
31 execute_work NONE exec_output2
32 execute_result ok
33 compare exec_output2 output
34
35 test_end

Properties

Name Value
svn:eol-style native

  ViewVC Help
Powered by ViewVC 1.1.23