IoLiteral := IoObject rawClone do(

    newSlot("literal")

    init := method(
        resend
    )

    setupProto := method(
        rawSetSlot("+", IoCFunction clone setImplName("___plus"))
    )
    
    activate := method(target, locals, m,
        debug("activating literal", literal, target)
        target
    )

    asString := method(
        "literal(" .. literal asString .. ")"
    )

    asSimpleString := method(
        "literal(" .. literal asSimpleString .. ")"
    )

    ___plus := method(locals, m,
        IoLiteral clone setLiteral(literal + locals evalMessage(locals, m argAt(0)) literal)
    )

    ___println := method(locals, m,
        literal println
    )
)