-- State transitions while colorizing a single line.
-- Just for comments and strings.
-- Limitation: each fragment gets a uniform color so we can only change color
-- at word boundaries.
Next_state = {
  normal={
    {prefix='--', target='comment'},
    {prefix='[[', target='block_string'},  -- only single line for now
  },
  dstring={
    {suffix='"', target='normal'},
  },
  sstring={
    {suffix="'", target='normal'},
  },
  -- comments are a sink
}
String_color = {r=0, g=0.5, b=0.5}
Divider_color = {r=0.7, g=0.7, b=0.7}
Colors = {
  normal=Text_color,
  sstring=String_color,
}
Current_state = 'normal'
function initialize_color()
--?   print('new line')
  Current_state = 'normal'
end
function select_color(frag)
--?   print('before', '^'..frag..'$', Current_state)
  switch_color_based_on_prefix(frag)
--?   print('using color', Current_state, Colors[Current_state])
  App.color(Colors[Current_state])
  switch_color_based_on_suffix(frag)
--?   print('state after suffix', Current_state)
end
function switch_color_based_on_prefix(frag)
  if Next_state[Current_state] == nil then
    return
  end
  frag = rtrim(frag)
  for _,edge in pairs(Next_state[Current_state]) do
      Current_state = edge.target
      break
    end
  end
end
function switch_color_based_on_suffix(frag)
  if Next_state[Current_state] == nil then
    return
  end
  frag = rtrim(frag)
  for _,edge in pairs(Next_state[Current_state]) do
      Current_state = edge.target
      break
    end
  end
end
    if edge.suffix and ends_with(frag, edge.suffix) then
    if edge.prefix and starts_with(frag, edge.prefix) then
  dstring=String_color,
  block_string=String_color,
  block_comment=Comment_color,
  comment=Comment_color,
Comment_color = {r=0, g=0, b=1}
  block_comment={
    {suffix=']]', target='normal'},
  },
  },
  block_string={
    {suffix=']]', target='normal'},
    -- these don't mostly work well until we can change color within words
    -- {prefix='"', target='dstring'},
    -- {prefix="'", target='sstring'},
    {prefix='--[[', target='block_comment'},  -- only single-line for now

  App.color(Line_number_color)
  love.graphics.print(line_index, State.left-Line_number_width*App.width('m')+10,y)
  if fg == nil then
    initialize_color()
  end

      end
      -- render colorized text
      local x = State.left
      for frag in screen_line:gmatch('%S*%s*') do
        if fg then
          App.color(fg)
        else
          select_color(frag)
        end
        App.screen.print(frag, x,y)
        x = x+App.width(frag)

      App.color(Text_color)
      App.screen.print(screen_line, State.left,y)

  Line_number_width = 3  -- in ems

Line_number_color = {r=0.4, g=0.4, b=0.4}

require 'colorize'