LZW压缩在Lua中

以下是 Lempel-Ziv-Welch 压缩的伪代码。

pattern = 获取输入字符
while (未到文件结尾) {
    K = 获取输入字符
    如果(<<pattern, K>> 不在字符串表中) {
         输出 pattern 的代码
         将 <<pattern, K>> 添加到字符串表中
         pattern = K
    }
    否则 { pattern = <<pattern, K>> }
}
输出 pattern 的代码
输出 EOF_CODE

我试图在 Lua 中编写此代码，但它并没有正常工作。下面是我基于 Python 中的 LZW 函数模拟的代码，但我在第 8 行得到了一个 "尝试调用字符串值" 错误。

function compress(uncompressed)

 local dict_size = 256
 local dictionary = {}

 w = ""
 result = {}
 for c in uncompressed do
  -- while c is in the function compress
     local wc = w .. c
     if dictionary[wc] == true then
         w = wc
     else
         dictionary[w] = ""
         -- Add wc to the dictionary.
         dictionary[wc] = dict_size
         dict_size = dict_size + 1
         w = c
    end
 -- Output the code for w.
 if w then
   dictionary[w] = ""
 end
 end
 return dictionary
 end

 compressed = compress('TOBEORNOTTOBEORTOBEORNOT')
 print (compressed)

我非常希望能够得到帮助，无论是使我的代码运行，还是帮助我在 Lua 中编写 LZW 压缩。非常感谢！