LeviSchuck

{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE NoMonomorphismRestriction #-}

-- This example is known to be incomplete...

import qualified Solar.Data.KV as K
import Solar.Storage.FS as FS
import Solar.Storage as St
import Data.Map as Map
import Data.Dynamic as D

LeviSchuck

lookupThing t = do
  ?s <- someStorageConstant
  context <- getContextSandbox
  (res, context') <- runKV context $ do
    thing <- getKV t
    return $ case thing of
      Nothing -> Left "Nope, nothin'"
      Just kv -> Right kv
  return res

LeviSchuck

genericFunction :: (Show a) -> a -> String
genericFunction thing = show thing

data OneThing = OneThing (deriving Show)
data AnotherThing = AnotherThing (deriving Show)

data MyFunctions = MyFunctions
  { showOne :: OneThing -> String
  , showAnother :: AnotherThing -> String
  }

LeviSchuck

//
//  main.m
//  ScreenSampleServ
//
//  Created by Levi Schuck on 8/22/15.
//  Copyright (c) 2015 Levi Schuck. All rights reserved.
//

#import <Foundation/Foundation.h>
@import CoreGraphics;

LeviSchuck

Last login: Wed Sep 16 17:36:52 on ttys002
➜  ~  cd (......)/com.github.atom.ShipIt 
➜  com.github.atom.ShipIt  du -h .
560K	./update.2ORJIs8/Atom.app/Contents/_CodeSignature
8.0K	./update.2ORJIs8/Atom.app/Contents/Frameworks/Atom Framework.framework/Versions/A/_CodeSignature
 74M	./update.2ORJIs8/Atom.app/Contents/Frameworks/Atom Framework.framework/Versions/A/Libraries
 92K	./update.2ORJIs8/Atom.app/Contents/Frameworks/Atom Framework.framework/Versions/A/Resources/crash_report_sender.app/Contents/MacOS
4.0K	./update.2ORJIs8/Atom.app/Contents/Frameworks/Atom Framework.framework/Versions/A/Resources/crash_report_sender.app/Contents/Resources/English.lproj
188K	./update.2ORJIs8/Atom.app/Contents/Frameworks/Atom Framework.framework/Versions/A/Resources/crash_report_sender.app/Contents/Resources
288K	./update.2ORJIs8/Atom.app/Contents/Frameworks/Atom Framework.framework/Versions/A/Resources/crash_report_sender.app/Contents

LeviSchuck

{-# LANGUAGE RecordWildCards #-}
module Ruben where

import Debug.Trace

data SomeState = SomeState
    { a :: Int
    , b :: Int
    , c :: Int
    } deriving(Show)

LeviSchuck

import Prelude((<),(+),(-),($))
import qualified Prelude as P
import qualified Data.List as L
import qualified Data.Set as S

data Event = Add | Remove deriving (P.Eq,P.Ord,P.Show)

events li = L.sort $ L.concat $ L.map (\(x,y,k) -> [(x,Add,k),(y,Remove,k)]) li
process ((st,stv,stk):events) = L.map (\(a,b,c) -> (a, b, S.toList c)) $ L.reverse res
    where (_,_,res) = L.foldl step (S.singleton stk,st,[]) events

LeviSchuck

(function() {
  // Create an array to store our particles
var particles = [];

// The amount of particles to render
var particleCount = 30;

var activeCount = 1;

// The maximum velocity in each direction

LeviSchuck

diff --git a/runelite-client/src/main/java/net/runelite/client/plugins/xptracker/XpSnapshotSingle.java b/runelite-client/src/main/java/net/runelite/client/plugins/xptracker/XpSnapshotSingle.java
index 69d5d77..ccd0706 100644
--- a/runelite-client/src/main/java/net/runelite/client/plugins/xptracker/XpSnapshotSingle.java
+++ b/runelite-client/src/main/java/net/runelite/client/plugins/xptracker/XpSnapshotSingle.java
@@ -24,18 +24,38 @@
  */
 package net.runelite.client.plugins.xptracker;
 
-import lombok.Value;
+import lombok.Builder;

LeviSchuck

diff --git a/runelite-client/src/main/java/net/runelite/client/plugins/xptracker/XpSnapshotSingle.java b/runelite-client/src/main/java/net/runelite/client/plugins/xptracker/XpSnapshotSingle.java
index 69d5d77..be0b6be 100644
--- a/runelite-client/src/main/java/net/runelite/client/plugins/xptracker/XpSnapshotSingle.java
+++ b/runelite-client/src/main/java/net/runelite/client/plugins/xptracker/XpSnapshotSingle.java
@@ -24,18 +24,20 @@
  */
 package net.runelite.client.plugins.xptracker;
 
+import lombok.Builder;
 import lombok.Value;