| function download(filename, text) { | |
| var element = document.createElement('a'); | |
| element.setAttribute('href', 'data:text/plain;charset=utf-8,' + encodeURIComponent(text)); | |
| element.setAttribute('download', filename); | |
| element.style.display = 'none'; | |
| document.body.appendChild(element); | |
| element.click(); |
| /** | |
| node --max-old-space-size=4048 --initial-old-space-size=4048 --max-heap-size=4048 stress-memory-1.js | |
| x64 | |
| rss 7.62 GB | |
| heapTotal 3.74 GB | |
| heapUsed 3.73 GB | |
| */ |
| {-# LANGUAGE FlexibleContexts, ScopedTypeVariables, TypeApplications, TypeFamilies #-} | |
| module EvilList where | |
| import Data.Typeable | |
| type family EvilListContent a where | |
| EvilListContent Int = () | |
| EvilListContent a = a |
| $ stack install stack-run | |
| terminfo-0.4.1.0: configure | |
| hslogger-1.2.10: configure | |
| hslogger-1.2.10: build | |
| hslogger-1.2.10: copy/register | |
| Progress 2/5 | |
| -- While building custom Setup.hs for package terminfo-0.4.1.0 using: | |
| /tmp/stack19043/terminfo-0.4.1.0/.stack-work/dist/x86_64-linux/Cabal-1.24.2.0/setup/setup --builddir=.stack-work/dist/x86_64-linux/Cabal-1.24.2.0 configure --with-ghc=/home/wizek/.stack/programs/x86_64-linux/ghc-8.0.2/bin/ghc --with-ghc-pkg=/home/wizek/.stack/programs/x86_64-linux/ghc-8.0.2/bin/ghc-pkg --user --package-db=clear --package-db=global --package-db=/home/wizek/.stack/snapshots/x86_64-linux/lts-9.14/8.0.2/pkgdb --libdir=/home/wizek/.stack/snapshots/x86_64-linux/lts-9.14/8.0.2/lib --bindir=/home/wizek/.stack/snapshots/x86_64-linux/lts-9.14/8.0.2/bin --datadir=/home/wizek/.stack/snapshots/x86_64-linux/lts-9.14/8.0.2/share --libexecdir=/home/wizek/.stack/snapshots/x86_64-linux/lts-9.14/8.0.2/libexec --sysconfdir=/home/wizek/.stack/snapshots/x86_64-linux/lts-9.14/8.0.2/etc --docdi |
| module Main where | |
| import Control.Alternative ((<|>)) | |
| import Control.Apply (lift2) | |
| import Control.Monad.Eff (Eff) | |
| import Control.Monad.Eff.Console (CONSOLE, logShow) | |
| import Data.Argonaut.Core (Json) | |
| import Data.Argonaut.Decode (class DecodeJson, decodeJson) | |
| import Data.Argonaut.Encode (class EncodeJson, encodeJson) | |
| import Data.Either (hush) |
| {-# LANGUAGE KindSignatures, DataKinds, FlexibleInstances, FlexibleContexts, | |
| FunctionalDependencies, TypeFamilies, TypeOperators, | |
| PatternSynonyms, UndecidableInstances, ConstraintKinds, | |
| TypeApplications, ScopedTypeVariables, CPP #-} | |
| module NamedDefaults (FillDefaults, fillDefaults, (!.)) where | |
| import Prelude (Maybe(..), id) | |
| import Data.Kind (Type) |
| #!/bin/usr/env bash | |
| # Originaly from: https://www.reddit.com/r/NixOS/comments/5yxt45/simple_nix_package_search/ | |
| nq () { | |
| local CACHE="$HOME/.cache/nq-cache" | |
| if ! ( [ -e $CACHE ] && [ $(stat -c %Y $CACHE) -gt $(( $(date +%s) - 3600*24*7 )) ] ); then | |
| # read gotcha.. can't pipe to read (as usual zsh beats bash) | |
| read x MEM_AVAIL_KB UNIT < <(grep MemAvailable: /proc/meminfo) | |
| if [[ $UNIT != "kB" || $MEM_AVAIL_KB -lt 1000000 ]]; then | |
| # nix-env can easily use up to 1GB during -qa |
Try commenting out line 21 in ./test-suite/HsDiExample/MainSpec.hs
21: & override "logger" [qc| \a -> modifyIORef logs (++ [a]) |]
Run it with stack test, and you'll get [an error like the following][error]:
• Ambiguous type variable ‘m0’
v0.3.0 of a Given-When-Then implementation for Haskell's HSpec. In similar vein to Ruby's rspec-given and Javascript's (Node's) jasmine-given.
I guess we could call it hspec-given.
If there is some interest I could package it up for Hackage. Ideas on improvements and contributions are also welcome, as I suspect I've only found a local optimum while implementing, e.g. in terms of syntax.
| #!/usr/bin/env bash | |
| # | |
| # Backup selected directories to a Backblaze B2 bucket | |
| # | |
| # Example daily cron: | |
| # @daily /usr/local/bin/b2backup >/dev/null | |
| # | |
| # Account creds | |
| id=xxxxxxxxxx |