1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
|
#! /usr/bin/env ruby
require 'spec_helper'
require 'puppet/pops'
require_relative 'parser_rspec_helper'
describe "egrammar parsing of site expression" do
include ParserRspecHelper
before(:each) { Puppet[:app_management] = true }
after(:each) { Puppet[:app_management] = false }
context "when parsing 'site'" do
it "an empty body is allowed" do
prog = "site { }"
ast = "(site ())"
expect(dump(parse(prog))).to eq(ast)
end
it "a body with one expression is allowed" do
prog = "site { $x = 1 }"
ast = "(site (block\n (= $x 1)\n))"
expect(dump(parse(prog))).to eq(ast)
end
it "a body with more than one expression is allowed" do
prog = "site { $x = 1 $y = 2}"
ast = "(site (block\n (= $x 1)\n (= $y 2)\n))"
expect(dump(parse(prog))).to eq(ast)
end
end
context 'When parsing collections containing application management specific keywords' do
%w(application site produces consumes).each do |keyword|
it "allows the keyword '#{keyword}' in a list" do
expect(dump(parse("$a = [#{keyword}]"))).to(eq("(= $a ([] '#{keyword}'))"))
end
it "allows the keyword '#{keyword}' as a key in a hash" do
expect(dump(parse("$a = {#{keyword}=>'x'}"))).to(eq("(= $a ({} ('#{keyword}' 'x')))"))
end
it "allows the keyword '#{keyword}' as a value in a hash" do
expect(dump(parse("$a = {'x'=>#{keyword}}"))).to(eq("(= $a ({} ('x' '#{keyword}')))"))
end
end
end
end
|
