VS
Подскажите плиз
etcd_url_ <- getEnv "ETCD_URL"
response <- httpJSON etcd_url
Size: a a a
2020 December 06
VS
VS
Как правильно передать url из переменной etcd_url на вход функции httpJSON
JS
Как правильно передать url из переменной etcd_url на вход функции httpJSON
вот именно так, как написано выше
JS
etcd_url_ <- getEnv "ETCD_URL"
response <- httpJSON etcd_url
response <- httpJSON etcd_url
только одно подчёркивание лишнее
VS
это опечатка
VS
{-# LANGUAGE OverloadedStrings #-}
import System.Environment (getEnvironment,getEnv)
import Data.Aeson (Value)
import qualified Data.ByteString.Char8 as S8
import qualified Data.Yaml as Yaml
import Network.HTTP.Simple
( getResponseBody,
getResponseHeader,
getResponseStatusCode,
httpJSON )
main :: IO ()
main = do
etcd_url <- getEnv "ETCD_URL"
print etcd_url
response <- httpJSON etcd_url
import System.Environment (getEnvironment,getEnv)
import Data.Aeson (Value)
import qualified Data.ByteString.Char8 as S8
import qualified Data.Yaml as Yaml
import Network.HTTP.Simple
( getResponseBody,
getResponseHeader,
getResponseStatusCode,
httpJSON )
main :: IO ()
main = do
etcd_url <- getEnv "ETCD_URL"
print etcd_url
response <- httpJSON etcd_url
VS
Вот полный текст
VS
The last statement in a 'do' block must be an expression
response <- httpJSON etcd_url
|
16 | response <- httpJSON etcd_url
| ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
response <- httpJSON etcd_url
|
16 | response <- httpJSON etcd_url
| ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
VS
Это ошибка
YS
надо чтобы что-то возвращалось из функции
YS
return () можно дописатьVS
где именно ?
IR
В конце
IR
The last statement in a 'do' block must be an expression
response <- httpJSON etcd_url
|
16 | response <- httpJSON etcd_url
| ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
response <- httpJSON etcd_url
|
16 | response <- httpJSON etcd_url
| ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Компилятор дело говорит.
JS
The last statement in a 'do' block must be an expression
response <- httpJSON etcd_url
|
16 | response <- httpJSON etcd_url
| ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
response <- httpJSON etcd_url
|
16 | response <- httpJSON etcd_url
| ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
ошибка в том, что вы response не используете
IR
return () можно дописатьСкорее
print responseIR
ошибка в том, что вы response не используете
Нет, респонс не при чём, это вопрос синтаксиса
VS
main = do
etcd_url <- getEnv "ETCD_URL"
print etcd_url
response <- httpJSON etcd_url
putStrLn $ "The status code was: " ++ show (getResponseStatusCode response)
print $ getResponseHeader "Content-Type" response
S8.putStrLn $ Yaml.encode (getResponseBody response :: Value)
etcd_url <- getEnv "ETCD_URL"
print etcd_url
response <- httpJSON etcd_url
putStrLn $ "The status code was: " ++ show (getResponseStatusCode response)
print $ getResponseHeader "Content-Type" response
S8.putStrLn $ Yaml.encode (getResponseBody response :: Value)
VS
Заиспользовал