darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

c_gen.pl: Change to use data type "int" instead of "long int" in

Browse source 
function perform_test_read_only.
This commit is contained in:
Jillian Ye 1998-04-14 16:25:44 +00:00
parent c0a4c3ba17
commit c6ae153421
2 changed files with 8 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
sim/testsuite/sky/ChangeLog
View file

@ -1,3 +1,8 @@
Tue Apr 14 12:20:10 1998 Jillian Ye <jillian@cygnus.com>
* c_gen.pl: Change the datatype from "long int" to "int"
in function perform_test_read_only.
Mon Apr 13 16:51:00 1998 Frank Ch. Eigler <fche@cygnus.com> Mon Apr 13 16:51:00 1998 Frank Ch. Eigler <fche@cygnus.com>
* Makefile.in (*): Added .vuout/.vuexpect/.vuok test targets * Makefile.in (*): Added .vuout/.vuexpect/.vuok test targets

7
sim/testsuite/sky/c_gen.pl
View file

@ -98,7 +98,6 @@ while( $inputline = <INFILE> )
} }
elsif ( $inputline =~ /^\@/ ) # A line starts with "@" is a read only test request elsif ( $inputline =~ /^\@/ ) # A line starts with "@" is a read only test request
{ {
print ("glorp\n");
&perform_test_read_only; &perform_test_read_only;
} }
else # ignore this input else # ignore this input
@ -276,15 +275,15 @@ sub perform_test_read_only {
#column[1] is the address; #column[1] is the address;
#column[2] is the byte-indicator, which can be 4 or 8; #column[2] is the byte-indicator, which can be 4 or 8;
if ( $column[2] =~ /^4/ ) # This is a 4-byte data address if ( $columns[2] =~ /^4/ ) # This is a 4-byte data address
{ $d_type = "long "; } { $d_type = " "; }
else { else {
$d_type = "long long "; # assuming the input is "8" $d_type = "long long "; # assuming the input is "8"
} }
print OUTFILE ("\n{\n"); print OUTFILE ("\n{\n");
print OUTFILE (" volatile ".$d_type."int* test_add = \(".$d_type."int *\)".$columns[1].";\n"); print OUTFILE (" volatile ".$d_type."int* test_add = \(".$d_type."int *\)".$columns[1].";\n");
print OUTFILE (" long long int test64_data = \(long long\) \( *test_add \);\n"); print OUTFILE (" ".$d_type."int test_data = *test_add;\n");
print OUTFILE ("}\n"); print OUTFILE ("}\n");
} }