Skip to content

Instantly share code, notes, and snippets.

{-# LANGUAGE DeriveFunctor #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE GADTs #-}
{-# LANGUAGE OverloadedStrings #-}
-- | Jednoducha kalkulacka, na vstupu ocekava vyrazy
-- 1 + 3
-- 1 - -3
-- atd.
module Main where
2017/05/15 22:43:57 [INFO] Terraform version: 0.9.5 a59ee0b30e1350d18e44a3a2a405124302751f93
2017/05/15 22:43:57 [INFO] Go runtime version: go1.8
2017/05/15 22:43:57 [INFO] CLI args: []string{"/Users/ondra/.local/bin/terraform", "apply", "--target", "aws_security_group.test"}
2017/05/15 22:43:57 [DEBUG] Detected home directory from env var: /Users/ondra
2017/05/15 22:43:57 [DEBUG] Detected home directory from env var: /Users/ondra
2017/05/15 22:43:57 [DEBUG] Attempting to open CLI config file: /Users/ondra/.terraformrc
2017/05/15 22:43:57 [DEBUG] File doesn't exist, but doesn't need to. Ignoring.
2017/05/15 22:43:57 [DEBUG] Detected home directory from env var: /Users/ondra
2017/05/15 22:43:57 [INFO] CLI command args: []string{"apply", "--target", "aws_security_group.test"}
2017/05/15 22:43:57 [DEBUG] command: loading backend config file: /Users/ondra/xcontest/xcontest-propellor/terraform/test
ondra@dhcp7:~/xcontest/xcontest-propellor/terraform/test$ terraform apply --target aws_security_group.test
Deprecation warning: This environment is configured to use legacy remote state.
Remote state changed significantly in Terraform 0.9. Please update your remote
state configuration to use the new 'backend' settings. For now, Terraform
will continue to use your existing settings. Legacy remote state support
will be removed in Terraform 0.11.
You can find a guide for upgrading here:
https://www.terraform.io/docs/backends/legacy-0-8.html
@ondrap
ondrap / Main.hs
Last active May 3, 2016 12:47
Priklad Haskell JSON
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DeriveAnyClass #-}
import Data.Aeson
import GHC.Generics
data Message = Message { uuid :: Int, content :: Int }
deriving (Generic, FromJSON)
@ondrap
ondrap / Main.hs
Last active February 5, 2016 13:33
Failing QuickCheck test on serialise/deserialise
module Main where
import Data.Binary.Serialise.CBOR
import Data.Binary.Serialise.CBOR.Decoding (decodeListLen, decodeWord)
import Data.Binary.Serialise.CBOR.Encoding (encodeListLen, encodeWord)
import qualified Data.ByteString as BS
import qualified Data.ByteString.Lazy as BL
import Data.Monoid ((<>))
import qualified Data.Text as T
import Test.Hspec
@ondrap
ondrap / gist:06cee0da33eb658e8d52
Created January 14, 2016 15:05
Sample echo server for hs-tls
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RankNTypes #-}
import Network.Socket
import Control.Concurrent (forkIO)
import Control.Exception (finally)
import Control.Monad (forever, unless)
import Control.Monad.IO.Class (MonadIO, liftIO)
import qualified Data.ByteString as BS
@ondrap
ondrap / gist:befb8f98883338f07516
Created January 14, 2016 14:58
Sample echo server for hs-tls
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RankNTypes #-}
import Network.Socket
import Control.Concurrent (forkIO)
import Control.Exception (finally)
import Control.Monad (forever, unless)
import Control.Monad.IO.Class (MonadIO, liftIO)
import qualified Data.ByteString as BS
{
"vars": {
"@gray-darker": "lighten(#000, 13.5%)",
"@gray-dark": "lighten(#000, 20%)",
"@gray": "lighten(#000, 33.5%)",
"@gray-light": "lighten(#000, 46.7%)",
"@gray-lighter": "lighten(#000, 93.5%)",
"@brand-primary": "#428bca",
"@brand-success": "#5cb85c",
"@brand-info": "#5bc0de",