aboutsummaryrefslogtreecommitdiffstats
path: root/tools/pidl/tests/header.pl
diff options
context:
space:
mode:
Diffstat (limited to 'tools/pidl/tests/header.pl')
-rwxr-xr-xtools/pidl/tests/header.pl9
1 files changed, 7 insertions, 2 deletions
diff --git a/tools/pidl/tests/header.pl b/tools/pidl/tests/header.pl
index 331f4dd9fb..8d0dccf507 100755
--- a/tools/pidl/tests/header.pl
+++ b/tools/pidl/tests/header.pl
@@ -4,19 +4,21 @@
use strict;
use warnings;
-use Test::More tests => 15;
+use Test::More tests => 16;
use FindBin qw($RealBin);
use lib "$RealBin";
use Util;
use Parse::Pidl::Util qw(MyDumper);
use Parse::Pidl::Samba4::Header;
use Parse::Pidl::IDL qw(parse_string);
+use Parse::Pidl::NDR;
sub parse_idl($)
{
my $text = shift;
my $idl = Parse::Pidl::IDL::parse_string($text, "nofile");
- return Parse::Pidl::Samba4::Header::Parse($idl);
+ my $ndr = Parse::Pidl::NDR::Parse($idl);
+ return Parse::Pidl::Samba4::Header::Parse($ndr);
}
like(parse_idl(""), qr/\/\* header auto-generated by pidl \*\/\n/sm, "includes work");
@@ -51,3 +53,6 @@ like(parse_idl("interface p { struct x; };"),
like(parse_idl("interface p { typedef struct x { int p; } x; };"),
qr/struct x.*{.*int32_t p;.*};/sm, "double struct declaration");
+
+like(parse_idl("cpp_quote(\"some-foo\")"),
+ qr/some-foo/sm, "cpp quote");