* gas/all/gas.exp: Run dg-runtest for all err-*.s and warn-*.s.

* gas/all/err-1.s, gas/all/warn-1.s: New tests.
This commit is contained in:
Hans-Peter Nilsson 2004-11-22 13:00:24 +00:00
parent 5519f6ea17
commit a7eec87693
4 changed files with 24 additions and 0 deletions

View file

@ -1,3 +1,8 @@
2004-11-22 Hans-Peter Nilsson <hp@axis.com>
* gas/all/gas.exp: Run dg-runtest for all err-*.s and warn-*.s.
* gas/all/err-1.s, gas/all/warn-1.s: New tests.
2004-11-18 Inderpreet Singh <inderpreetb@nioda.hcltech.com>
* gas/maxq10/call.d: Fix expected results now that bfd assembler

View file

@ -0,0 +1,7 @@
;# Test .error directive.
;# { dg-do assemble }
.error "an error message" ;# { dg-error "Error: an error message" }
.error an error message ;# { dg-error "Error: .error argument must be a string" }
.error ;# { dg-error "Error: .error directive invoked in source file" }
.error ".error directive invoked in source file" ;# { dg-error "Error: .error directive invoked in source file" }
.error "" ;# { dg-error "Error: " }

View file

@ -194,3 +194,8 @@ if { [istarget "i*86-*-*pe*"] \
|| [istarget "i*86-*-mingw32*"] } {
gas_test "fastcall.s" "" "" "fastcall labels"
}
load_lib gas-dg.exp
dg-init
dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/err-*.s $srcdir/$subdir/warn-*.s]] "" ""
dg-finish

View file

@ -0,0 +1,7 @@
;# Test .warning directive.
;# { dg-do assemble }
.warning "a warning message" ;# { dg-warning "Warning: a warning message" }
.warning a warning message ;# { dg-error "Error: .warning argument must be a string" }
.warning ;# { dg-warning "Warning: .warning directive invoked in source file" }
.warning ".warning directive invoked in source file" ;# { dg-warning "Warning: .warning directive invoked in source file" }
.warning "" ;# { dg-warning "Warning: " }