21 years ago · a2c5d9643d
--- a/tests/webtbs/tw2834.pp
+++ b/tests/webtbs/tw2834.pp
@@ -1,7 +1,8 @@
 
				 { Source provided for Free Pascal Bug Report 2834 }
			
 
				 { Submitted by "Mattias Gaertner" on  2003-12-06 }
			
 
				 { e-mail: [email protected] }
			
 
				-{$mode objfpc}{$H+}
			
 
				+
			
 
				+{$ifdef fpc}{$mode objfpc}{$H+}{$endif}
			
 
				 
			
 
				 uses
			
 
				   uw2834;
			
--- a/tests/webtbs/uw2834.pp
+++ b/tests/webtbs/uw2834.pp
@@ -1,6 +1,6 @@
 
				 unit uw2834;
			
 
				 
			
 
				-{$mode objfpc}{$H+}
			
 
				+{$ifdef fpc}{$mode objfpc}{$H+}{$endif}
			
 
				 
			
 
				 interface