This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
import androidx.compose.runtime.Composable | |
import androidx.compose.runtime.DisposableEffect | |
import androidx.compose.runtime.getValue | |
import androidx.compose.runtime.mutableStateOf | |
import androidx.compose.runtime.remember | |
import androidx.compose.runtime.setValue | |
import androidx.compose.ui.Modifier | |
import androidx.compose.ui.platform.LocalLifecycleOwner | |
import androidx.compose.ui.viewinterop.AndroidView | |
import androidx.lifecycle.Lifecycle |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
module Main where | |
import System.Environment ( getArgs ) | |
import System.FSNotify | |
import System.FilePath.Posix ( takeFileName ) | |
import System.Process ( spawnProcess ) | |
import Control.Monad ( forever, void ) | |
import Control.Concurrent ( threadDelay ) | |
main :: IO () |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{-# LANGUAGE ForeignFunctionInterface #-} | |
module Main where | |
import qualified System.Posix.Memory as M | |
import qualified System.Posix.Types as P | |
import qualified Foreign as F | |
import qualified Foreign.C as F | |
import qualified Foreign.C.Error as F | |
import qualified Foreign.Storable as F | |
import System.IO.Error |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- I don't know if I'm gonna continue doing Advent of Code till the end, | |
-- but I felt that I should share with the world, the horror that is this module's `main` | |
module Adv1 where | |
import qualified Data.IntSet as S | |
partOne :: [Int] -> Int | |
partOne = sum | |
partTwo :: [Int] -> Int |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{-# LANGUAGE TypeApplications #-} | |
module Main where | |
import System.Environment | |
import Data.Aeson | |
import Data.Aeson.Encode.Pretty | |
import Data.Maybe ( fromJust ) | |
import qualified Data.ByteString.Lazy as LBS | |