Gadzhi mgadzhi

mgadzhi / stack.clj

Created February 26, 2014 18:53

	(ns algo.stack)

	(defn make-stack [] {:first nil})

	(defn is-empty? [stack] (nil? (:first stack)))

	(defn stack-push [stack item]
	(let [previous (:first stack)]
	{:first
	{:item item :next previous}}))

mgadzhi / locales

Created June 27, 2013 12:35

Problem with locales in ubuntu http://www.thomas-krenn.com/de/wiki/Perl_warning_Setting_locale_failed_unter_Debian

mgadzhi / year_month_group.sql

Last active December 18, 2015 19:09

Grouping by month and year in Postgres

	SELECT CAST(date_part('year', date) AS varchar(4)) \|\| '-' \|\| CAST(date_part('month', date) AS varchar(2)) AS month, SUM(amount)
	FROM withdrawals
	WHERE some_predicate()
	GROUP BY month
	ORDER BY month;