ciena.grammar
changeset 26 e2265c3545d7
parent 25 321b5a1c217c
child 27 99ddc553a868
equal deleted inserted replaced
25:321b5a1c217c 26:e2265c3545d7
   236 		}
   236 		}
   237 
   237 
   238 # Virtual switch
   238 # Virtual switch
   239 l_vs:		"virtual-switch" "create" "vs" identifier
   239 l_vs:		"virtual-switch" "create" "vs" identifier
   240 		{ $::res->{vs}->{$item{identifier}} = {}; }
   240 		{ $::res->{vs}->{$item{identifier}} = {}; }
   241 		| "virtual-switch" "ethernet" "create" "vs" identifier "vc" identifier
   241 		| "virtual-switch" "ethernet" "create" "vs" identifier avls
   242 		{
   242 		{
   243 		my ($vs, $vc) = ($item[5], $item[7]);
   243 		my ($vs, $vc) = ($item[5], $avl->{vc});
   244 		$::res->{vs}->{$vs}->{ethernet}->{vc} = $vc;
   244 		$::res->{vs}->{$vs}->{ethernet}->{vc} = $vc;
   245 		}
   245 		}
   246 		| "virtual-switch" "ethernet" "add" "vs" identifier avls
   246 		| "virtual-switch" "ethernet" "add" "vs" identifier avls
   247 		{
   247 		{
   248 		my $vs = $item{identifier};
   248 		my $vs = $item{identifier};