joinstr acc _ []                           = error $ "unclosed string: " ++ (intercalate [] $ reverse acc)
joinstr acc _ []                           = error $ "unclosed string: " ++ (intercalate [] $ reverse acc)
joinstr acc _ []                           = error $ "unclosed string: " ++ (intercalate [] $ reverse acc)