Remove superfluous semicolons from testsuite throughout.

[deliverable/binutils-gdb.git] / gdb / testsuite / lib / pascal.exp

diff --git a/gdb/testsuite/lib/pascal.exp b/gdb/testsuite/lib/pascal.exp
index 7e52233cb6e095d9bed3d71c033f70697b4acf29..784ab6c113c498e8d28fc94f96682ba28959ad72 100644 (file)
--- a/gdb/testsuite/lib/pascal.exp
+++ b/gdb/testsuite/lib/pascal.exp
@@ -86,7 +86,7 @@ proc gpc_compile {source dest type options} {
     foreach i $options {
        if { $i == "debug" } {
            if [board_info $dest exists debug_flags] {
-               append add_flags " [board_info $dest debug_flags]";
+               append add_flags " [board_info $dest debug_flags]"
            } else {
                append add_flags " -g"
            }
@@ -115,7 +115,7 @@ proc fpc_compile {source dest type options} {
     foreach i $options {
        if { $i == "debug" } {
            if [board_info $dest exists debug_flags] {
-               append add_flags " [board_info $dest debug_flags]";
+               append add_flags " [board_info $dest debug_flags]"
            } else {
                append add_flags " -g"
            }