Author: tpot Date: 2005-08-02 16:21:30 +0000 (Tue, 02 Aug 2005) New Revision: 8920
WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=8920 Log: Make NAME hash entry for struct elements a list. Return array length entries for elements that have an array specifier. Modified: branches/SAMBA_4_0/source/build/pidl/smb_interfaces.yp Changeset: Modified: branches/SAMBA_4_0/source/build/pidl/smb_interfaces.yp =================================================================== --- branches/SAMBA_4_0/source/build/pidl/smb_interfaces.yp 2005-08-02 16:06:35 UTC (rev 8919) +++ branches/SAMBA_4_0/source/build/pidl/smb_interfaces.yp 2005-08-02 16:21:30 UTC (rev 8920) @@ -70,7 +70,7 @@ | union | STRUCT IDENTIFIER pointers IDENTIFIER ';' {{ - "NAME" => $_[2], + "NAME" => [$_[2]], "POINTERS" => $_[3], "TYPE" => "struct $_[2]", }} @@ -82,20 +82,21 @@ }} | CONST type pointers IDENTIFIER array ';' {{ - "NAME" => $_[4], + "NAME" => [$_[4]], "TYPE" => $_[2], "POINTERS" => $_[3], }} | type pointers IDENTIFIER array ';' {{ - "NAME" => $_[3], + "NAME" => [$_[3]], "TYPE" => $_[1], "POINTERS" => $_[2], + "ARRAY_LENGTH" => $_[4] }} ; array: #empty - | '[' CONSTANT ']' + | '[' CONSTANT ']' { int($_[2]) } ; type: IDENTIFIER
