--| Copyright (c) 1993-2006 University of Southern California and contributors.
--| All rights reserved.
--| Your use of this work is governed under the terms of the GNU General
--| Public License version 2.

-- This is a test control file

test_name 	 non-windows-dll-external
test_description An external routine which refers to a DLL16 or DLL32 and appears to be valid causes the compiler to terminate during degree 5 (presumably only on a non-Windows platform).

copy_sub 	 Ace $TEST Ace
define		 EXTERNAL_TYPE "DLL16"
define		 ALIAS ""
copy_sub	 test.e $CLUSTER test.e
compile_melted
compile_result	syntax_error TEST 16
	
define		 EXTERNAL_TYPE "DLL32"
define		 ALIAS "alias "47""
copy_sub	 test.e $CLUSTER test.e
resume_compile
compile_result 	 ok
	
test_end