This is a pong clone written in haskell.
-
First get the [Haskell Platform][hp].
-
Clone the project
module Modulo where | |
data Expr = | |
V Integer | |
| Plus Expr Expr | |
| Mult Expr Expr | |
deriving (Eq, Show) | |
instance Num Expr where | |
(+) = Plus |
Makar's Violin | |
The Legend of Zelda: The Wind Waker | |
Composed by Koji Kondo | |
Tabbed by Richard Schaefer ([email protected]) | |
8/8/06 | |
e----------0-------0---------------------0---------------- | |
B----1-------1-1-3---3-------1-3-1---------1-1-------1---- | |
G--0---0-0-------------2-0-2-------2-0-2-------2-0-2---0-0 | |
D--------------------------------------------------------- |
(not my work!!! /Arash) | |
I usually use -# for drawing in air | |
Sarias song | |
-5 -6 -7 -5 -6 -7 | |
-5 -6 -7 8 -8 -7 7 -7 6 5 -4 5 6 5 |
name: Tiny | |
version: 0.0.0 | |
license: BSD3 | |
license-file: LICENSE | |
author: Arash | |
maintainer: Arash | |
synopsis: The greatest Yesod web application ever. | |
description: I'm sure you can say something clever here if you try. | |
category: Web | |
stability: Experimental |
Hello, I'm thinking of creating a package for hackage. I need it myself in a project. First I just implemented it in my own project, but now I want to give back to the community by publishing the reuseable parts in tidy package.
The package is best described by my application specific [code], it's basically a helper function creating an IORef a
thats updated say every hour. For example scraping a site. So given an action IO a
, run it every hour and save the result in the IORef a
, if the provided action crashes, then the parent thread shouldn't crash, instead it should just re-run the action the next hour. The application in mind is indeed for scraping.
I've got two questions about this:
Is something like this already done? I've not found it anywhere.
Where in the module hierarchy does this fit? Control.Concurrent.Helpers.TimedRepeating
or System.IO.TimedRepeating
? Any better name idea than TimedRepeating
?
#!/usr/bin/ruby | |
r = /\*\*[\d :\-]+\*\*/ | |
s = $stdin.readlines.join | |
ms = s.scan r | |
class Interval | |
attr_accessor :time0, :time1 | |
def initialize(s) | |
r = /[*:-]/ |
module StrictFoldr where | |
-- A deep strict foldr, very memory inefficient | |
dsFoldr :: (a -> b -> b) -> b -> [a] -> b | |
dsFoldr f z [] = z | |
dsFoldr f z (x:xs) = seq below $ f x $ below | |
where below = dsFoldr f z xs | |
-- The lazy value will be `"abc" ++ undefined` whilst the strict will be just `undefined` | |
valueLazy, valueStrict :: String |
1) CommitRequest validation validates a commitrequest | |
Failure/Error: @labgroup = create(:lab_group) | |
NoMethodError: | |
undefined method `identification=' for #<LabGroup:0xaa4cbbc> | |
# ./spec/models/commit_request_spec.rb:43:in `block (2 levels) in <top (required)>' | |