Add expect-warnings to zxbpp

Author: boriel

src/libzxbpp/zxbpp.py

@@ -865,10 +865,13 @@ def entry_point(args=None):
     parser.add_argument('--arch', type=str, default=arch.AVAILABLE_ARCHITECTURES[0],
                         help=f"Target architecture (defaults is'{arch.AVAILABLE_ARCHITECTURES[0]}'). "
                              f"Available architectures: {','.join(arch.AVAILABLE_ARCHITECTURES)}")
+    parser.add_argument('--expect-warnings', default=OPTIONS.expect_warnings, type=int,
+                        help='Expects N warnings: first N warnings will be silenced')
 
     options = parser.parse_args(args=args)
     OPTIONS.Debug = options.debug
     OPTIONS.debug_zxbpp = OPTIONS.Debug > 0
+    OPTIONS.expect_warnings = options.expect_warnings
 
     if options.arch not in arch.AVAILABLE_ARCHITECTURES:
         parser.error(f"Invalid architecture '{options.arch}'")

tests/functional/test_errmsg.txt

@@ -180,3 +180,4 @@ line_err.bas:5: error: Variable 'q' already declared at line_err.bas:1
 # Test warning silencing
 >>> process_file('mcleod3.bas', ['-S', '-q', '-O --expect-warnings=2'])
 mcleod3.bas:3: error: 'GenerateSpaces' is neither an array nor a function.
+>>> process_file('prepro77.bi', ['-S', '-q', '-O --expect-warnings=1'])