@@ -835,9 +835,7 @@ fn check_directive<'a>(
835
835
directive_ln : & DirectiveLine < ' a > ,
836
836
mode : TestMode ,
837
837
) -> CheckDirectiveResult < ' a > {
838
- let & DirectiveLine { raw_directive : directive_ln, .. } = directive_ln;
839
-
840
- let ( directive_name, post) = directive_ln. split_once ( [ ':' , ' ' ] ) . unwrap_or ( ( directive_ln, "" ) ) ;
838
+ let & DirectiveLine { name : directive_name, .. } = directive_ln;
841
839
842
840
let is_known_directive = KNOWN_DIRECTIVE_NAMES . contains ( & directive_name)
843
841
|| match mode {
@@ -846,14 +844,13 @@ fn check_directive<'a>(
846
844
_ => false ,
847
845
} ;
848
846
849
- let trailing = post. trim ( ) . split_once ( ' ' ) . map ( |( pre, _) | pre) . unwrap_or ( post) ;
850
- let trailing_directive = {
851
- // 1. is the directive name followed by a space? (to exclude `:`)
852
- directive_ln. get ( directive_name. len ( ) ..) . is_some_and ( |s| s. starts_with ( ' ' ) )
853
- // 2. is what is after that directive also a directive (ex: "only-x86 only-arm")
854
- && KNOWN_DIRECTIVE_NAMES . contains ( & trailing)
855
- }
856
- . then_some ( trailing) ;
847
+ // If it looks like the user tried to put two directives on the same line
848
+ // (e.g. `//@ only-linux only-x86_64`), signal an error, because the
849
+ // second "directive" would actually be ignored with no effect.
850
+ let trailing_directive = directive_ln
851
+ . remark_after_space ( )
852
+ . map ( |remark| remark. trim_start ( ) . split ( ' ' ) . next ( ) . unwrap ( ) )
853
+ . filter ( |token| KNOWN_DIRECTIVE_NAMES . contains ( token) ) ;
857
854
858
855
CheckDirectiveResult { is_known_directive, trailing_directive }
859
856
}
@@ -915,7 +912,7 @@ fn iter_directives(
915
912
916
913
error ! (
917
914
"{testfile}:{line_number}: detected unknown compiletest test directive `{}`" ,
918
- directive_line. raw_directive ,
915
+ directive_line. display ( ) ,
919
916
) ;
920
917
921
918
return ;
@@ -1011,35 +1008,30 @@ impl Config {
1011
1008
}
1012
1009
1013
1010
fn parse_custom_normalization ( & self , line : & DirectiveLine < ' _ > ) -> Option < NormalizeRule > {
1014
- let & DirectiveLine { raw_directive, .. } = line;
1015
-
1016
- // FIXME(Zalathar): Integrate name/value splitting into `DirectiveLine`
1017
- // instead of doing it here.
1018
- let ( directive_name, raw_value) = raw_directive. split_once ( ':' ) ?;
1011
+ let & DirectiveLine { name, .. } = line;
1019
1012
1020
- let kind = match directive_name {
1013
+ let kind = match name {
1021
1014
"normalize-stdout" => NormalizeKind :: Stdout ,
1022
1015
"normalize-stderr" => NormalizeKind :: Stderr ,
1023
1016
"normalize-stderr-32bit" => NormalizeKind :: Stderr32bit ,
1024
1017
"normalize-stderr-64bit" => NormalizeKind :: Stderr64bit ,
1025
1018
_ => return None ,
1026
1019
} ;
1027
1020
1028
- let Some ( ( regex, replacement) ) = parse_normalize_rule ( raw_value) else {
1029
- error ! ( "couldn't parse custom normalization rule: `{raw_directive}`" ) ;
1030
- help ! ( "expected syntax is: `{directive_name}: \" REGEX\" -> \" REPLACEMENT\" `" ) ;
1021
+ let Some ( ( regex, replacement) ) = line. value_after_colon ( ) . and_then ( parse_normalize_rule)
1022
+ else {
1023
+ error ! ( "couldn't parse custom normalization rule: `{}`" , line. display( ) ) ;
1024
+ help ! ( "expected syntax is: `{name}: \" REGEX\" -> \" REPLACEMENT\" `" ) ;
1031
1025
panic ! ( "invalid normalization rule detected" ) ;
1032
1026
} ;
1033
1027
Some ( NormalizeRule { kind, regex, replacement } )
1034
1028
}
1035
1029
1036
1030
fn parse_name_directive ( & self , line : & DirectiveLine < ' _ > , directive : & str ) -> bool {
1037
- let & DirectiveLine { raw_directive : line, .. } = line;
1038
-
1039
- // Ensure the directive is a whole word. Do not match "ignore-x86" when
1040
- // the line says "ignore-x86_64".
1041
- line. starts_with ( directive)
1042
- && matches ! ( line. as_bytes( ) . get( directive. len( ) ) , None | Some ( & b' ' ) | Some ( & b':' ) )
1031
+ // FIXME(Zalathar): Ideally, this should raise an error if a name-only
1032
+ // directive is followed by a colon, since that's the wrong syntax.
1033
+ // But we would need to fix tests that rely on the current behaviour.
1034
+ line. name == directive
1043
1035
}
1044
1036
1045
1037
fn parse_name_value_directive (
@@ -1048,22 +1040,26 @@ impl Config {
1048
1040
directive : & str ,
1049
1041
testfile : & Utf8Path ,
1050
1042
) -> Option < String > {
1051
- let & DirectiveLine { line_number, raw_directive : line, .. } = line;
1052
-
1053
- let colon = directive. len ( ) ;
1054
- if line. starts_with ( directive) && line. as_bytes ( ) . get ( colon) == Some ( & b':' ) {
1055
- let value = line[ ( colon + 1 ) ..] . to_owned ( ) ;
1056
- debug ! ( "{}: {}" , directive, value) ;
1057
- let value = expand_variables ( value, self ) ;
1058
- if value. is_empty ( ) {
1059
- error ! ( "{testfile}:{line_number}: empty value for directive `{directive}`" ) ;
1060
- help ! ( "expected syntax is: `{directive}: value`" ) ;
1061
- panic ! ( "empty directive value detected" ) ;
1062
- }
1063
- Some ( value)
1064
- } else {
1065
- None
1043
+ let & DirectiveLine { line_number, .. } = line;
1044
+
1045
+ if line. name != directive {
1046
+ return None ;
1047
+ } ;
1048
+
1049
+ // FIXME(Zalathar): This silently discards directives with a matching
1050
+ // name but no colon. Unfortunately, some directives (e.g. "pp-exact")
1051
+ // currently rely on _not_ panicking here.
1052
+ let value = line. value_after_colon ( ) ?;
1053
+ debug ! ( "{}: {}" , directive, value) ;
1054
+ let value = expand_variables ( value. to_owned ( ) , self ) ;
1055
+
1056
+ if value. is_empty ( ) {
1057
+ error ! ( "{testfile}:{line_number}: empty value for directive `{directive}`" ) ;
1058
+ help ! ( "expected syntax is: `{directive}: value`" ) ;
1059
+ panic ! ( "empty directive value detected" ) ;
1066
1060
}
1061
+
1062
+ Some ( value)
1067
1063
}
1068
1064
1069
1065
fn set_name_directive ( & self , line : & DirectiveLine < ' _ > , directive : & str , value : & mut bool ) {
@@ -1453,14 +1449,14 @@ pub(crate) fn make_test_description<R: Read>(
1453
1449
}
1454
1450
1455
1451
fn ignore_cdb ( config : & Config , line : & DirectiveLine < ' _ > ) -> IgnoreDecision {
1456
- let & DirectiveLine { raw_directive : line, .. } = line;
1457
-
1458
1452
if config. debugger != Some ( Debugger :: Cdb ) {
1459
1453
return IgnoreDecision :: Continue ;
1460
1454
}
1461
1455
1462
1456
if let Some ( actual_version) = config. cdb_version {
1463
- if let Some ( rest) = line. strip_prefix ( "min-cdb-version:" ) . map ( str:: trim) {
1457
+ if line. name == "min-cdb-version"
1458
+ && let Some ( rest) = line. value_after_colon ( ) . map ( str:: trim)
1459
+ {
1464
1460
let min_version = extract_cdb_version ( rest) . unwrap_or_else ( || {
1465
1461
panic ! ( "couldn't parse version range: {:?}" , rest) ;
1466
1462
} ) ;
@@ -1478,14 +1474,14 @@ fn ignore_cdb(config: &Config, line: &DirectiveLine<'_>) -> IgnoreDecision {
1478
1474
}
1479
1475
1480
1476
fn ignore_gdb ( config : & Config , line : & DirectiveLine < ' _ > ) -> IgnoreDecision {
1481
- let & DirectiveLine { raw_directive : line, .. } = line;
1482
-
1483
1477
if config. debugger != Some ( Debugger :: Gdb ) {
1484
1478
return IgnoreDecision :: Continue ;
1485
1479
}
1486
1480
1487
1481
if let Some ( actual_version) = config. gdb_version {
1488
- if let Some ( rest) = line. strip_prefix ( "min-gdb-version:" ) . map ( str:: trim) {
1482
+ if line. name == "min-gdb-version"
1483
+ && let Some ( rest) = line. value_after_colon ( ) . map ( str:: trim)
1484
+ {
1489
1485
let ( start_ver, end_ver) = extract_version_range ( rest, extract_gdb_version)
1490
1486
. unwrap_or_else ( || {
1491
1487
panic ! ( "couldn't parse version range: {:?}" , rest) ;
@@ -1501,7 +1497,9 @@ fn ignore_gdb(config: &Config, line: &DirectiveLine<'_>) -> IgnoreDecision {
1501
1497
reason : format ! ( "ignored when the GDB version is lower than {rest}" ) ,
1502
1498
} ;
1503
1499
}
1504
- } else if let Some ( rest) = line. strip_prefix ( "ignore-gdb-version:" ) . map ( str:: trim) {
1500
+ } else if line. name == "ignore-gdb-version"
1501
+ && let Some ( rest) = line. value_after_colon ( ) . map ( str:: trim)
1502
+ {
1505
1503
let ( min_version, max_version) = extract_version_range ( rest, extract_gdb_version)
1506
1504
. unwrap_or_else ( || {
1507
1505
panic ! ( "couldn't parse version range: {:?}" , rest) ;
@@ -1528,14 +1526,14 @@ fn ignore_gdb(config: &Config, line: &DirectiveLine<'_>) -> IgnoreDecision {
1528
1526
}
1529
1527
1530
1528
fn ignore_lldb ( config : & Config , line : & DirectiveLine < ' _ > ) -> IgnoreDecision {
1531
- let & DirectiveLine { raw_directive : line, .. } = line;
1532
-
1533
1529
if config. debugger != Some ( Debugger :: Lldb ) {
1534
1530
return IgnoreDecision :: Continue ;
1535
1531
}
1536
1532
1537
1533
if let Some ( actual_version) = config. lldb_version {
1538
- if let Some ( rest) = line. strip_prefix ( "min-lldb-version:" ) . map ( str:: trim) {
1534
+ if line. name == "min-lldb-version"
1535
+ && let Some ( rest) = line. value_after_colon ( ) . map ( str:: trim)
1536
+ {
1539
1537
let min_version = rest. parse ( ) . unwrap_or_else ( |e| {
1540
1538
panic ! ( "Unexpected format of LLDB version string: {}\n {:?}" , rest, e) ;
1541
1539
} ) ;
0 commit comments