Charging Objects in Io

charge_object.io

# Charging Objects in Io
#
# See "Charging Objects in Ruby" 
#      - http://timeless.judofyr.net/charging-objects-in-ruby
#      - http://news.ycombinator.com/item?id=2022107

Rules := Object clone do (
    rules := list()
    
    + := method (obj,
        obj setCharge("positive")
        rules append(obj)
        obj
    )
    
    - := method (obj,
        obj setCharge("negative")
        rules append(obj)
        obj
    )
    
    url := method (value,
        Rule clone setKind("url") setValue(value)
    )
    
    run := method (
        rules foreach (println)   # just print for now
    )
)

Rule := Object clone do (
    kind   ::= nil
    value  ::= nil
    charge ::= "neutral"
)

Rules do (
    + url("http://timeless.judofyr.net/*")
    - url("http://timeless.judofyr.net/")
    - url("http://timeless.judofyr.net/changelog/*")
)

Rules run