function strategy(text)
  return "text = "..luaQuote(text).."\n"
    .."function p(m, s) return text end"
end

function luaQuote(s)
  return ("%q"):format(s)
end