getSymbolType :: Throws (Located GeneratorError) e => Id -> SymbolTable -> GenerateJvm e Type
getSymbolType name table = do
  case lookupSymbol name table of
    Nothing -> failCheck GeneratorError $ "Unknown symbol: " ++ name
    Just symbol -> return $ symbolType symbol
getSymbolType :: Throws (Located GeneratorError) e => Id -> SymbolTable -> GenerateJvm e Type
getSymbolType name table = do
  case lookupSymbol name table of
    Nothing -> failCheck GeneratorError $ "Unknown symbol: " ++ name
    Just symbol -> return $ symbolType symbol
getSymbolType name table = do
  case lookupSymbol name table of
    Nothing -> failCheck GeneratorError $ "Unknown symbol: " ++ name
    Just symbol -> return $ symbolType symbol