Module: RplLang::Words::StringAndList

Includes:
Types
Included in:
Rpl
Defined in:
lib/rpl/words/string-list.rb

Instance Method Summary collapse

Methods included from Types

new_object

Instance Method Details

#populate_dictionary ⇒ Object 



8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
# File 'lib/rpl/words/string-list.rb', line 8

def populate_dictionary
  super

  category = 'Strings and Lists'

  @dictionary.add_word( ['rev'],
                        category,
                        '( s -- s ) reverse string or list',
                        proc do
                          args = stack_extract( [[RplString, RplList]] )

                          @stack << if args[0].is_a?( RplString )
                                      Types.new_object( RplString, "\"#{args[0].value.reverse}\"" )
                                    else
                                      Types.new_object( args[0].class, "{ #{args[0].value.reverse.join(' ')} }" )
                                    end
                        end )
end