kfish

{-# OPTIONS -Wall #-}

module Main where

import Control.Concurrent (threadDelay)
import System.Environment (getArgs)
import System.INotify

main :: IO ()
main = do

kfish

module Main where

import Control.Arrow
import Control.Applicative
import Control.Monad
import Data.Maybe

import FRP.Euphoria.Collection
import FRP.Euphoria.Event
import FRP.Euphoria.Signal

kfish

{-# LANGUAGE TemplateHaskell #-}

module FieldNames (
     fieldNames
) where
 
import Data.List (nub)
import Language.Haskell.TH
 
-- | Generate a list of all field names used in the constructors

kfish

{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RebindableSyntax  #-}

module TodoFay (
    Todo(..)
  , TodoState(..)
  , initialState
  , remaining
  , addTodo
  , archive

kfish

diff --git a/src/Fay/Compiler.hs b/src/Fay/Compiler.hs
index 8de77fc..ed388d5 100644
--- a/src/Fay/Compiler.hs
+++ b/src/Fay/Compiler.hs
@@ -81,24 +81,27 @@ compileToplevelModule filein mod@Module{}  = do
     either throwError warn res
   initialPass filein
   -- Reset imports after initialPass so the modules can be imported during code generation.
-  startCompile compileFileWithSource filein
+  (hstmts, fstmts) <- startCompile compileFileWithSource filein

kfish

#!/bin/bash

apply () {
  filename=$1
  shift
  patch_args=$*

  gotSubject=no
  msg=""

kfish

function cd_down_rec () {
    case $(find ./* -maxdepth 0 -type d -not -name ".*" | wc -l) in
    1)
        cd *
        cd_down_rec
        ;; 
    *)
        ;;
    esac   

kfish

#!/bin/sh
#
# ci: Continuously invoke a command when input files change
#
# Requires inotifywait, from inotify-tools:
#   # apt-get install inotify-tools
#   # yum install inotify-tools
#
# Conrad Parker 2015

kfish

(Read the comments)

kfish

# To use this, you need to implement some class with a read() method, eg.
#
# class MyReader(object):
#     def __init__(self, path):
#         self.path = path
#
#     def read(self):
#         with open(self.path, 'r') as f:
#             return f.read()
# ...