Parse strings

lib/chervil/ast.rb

@@ -2,4 +2,5 @@ module Chervil::AST
   require "chervil/ast/application"
   require "chervil/ast/identifier"
   require "chervil/ast/number"
+  require "chervil/ast/string"
 end

lib/chervil/ast/string.rb

@@ -0,0 +1,13 @@
+module Chervil::AST
+  class String
+    attr_reader :value
+
+    def initialize(value)
+      @value = value
+    end
+
+    def ==(other)
+      @value == other.value
+    end
+  end
+end

lib/chervil/parser.rb

@@ -1,6 +1,5 @@
 module Chervil
-  class Parser
-    def initialize(lexer)
+  class Parser def initialize(lexer)
       @lexer = lexer
       @tree = Array.new
       @current_token = @lexer.get_next_token
@@ -14,7 +13,7 @@ module Chervil
     end
 
     def expr
-      if @current_token.type == :number
+      if [:string, :number].include?(@current_token.type)
         constant
       elsif @current_token.type == :identifier
         identifier
@@ -47,6 +46,9 @@ module Chervil
       when :number
         token = eat(:number)
         AST::Number.new(token.value.to_f)
+      when :string
+        token = eat(:string)
+        AST::String.new(token.value)
       end
     end
 

spec/parser_spec.rb

@@ -10,6 +10,10 @@ module Chervil
       expect(parse('1').first).to eq(AST::Number.new(1.0))
     end
 
+    it 'parses a string' do
+      expect(parse('"hello world"').first).to eq(AST::String.new('hello world'))
+    end
+
     it 'parses an identifier' do
       expect(parse('+').first).to eq(AST::Identifier.new('+'))
     end