Skip to content

Instantly share code, notes, and snippets.

@hakobe
hakobe / Build.scala
Created April 2, 2014 00:23
run sub process while runnning play
import sbt._
import Process._
import Keys._
import play.PlayRunHook
object SubProcess {
def apply(command: String): PlayRunHook = {
object SubProcessHook extends PlayRunHook {
|- let twice = fun f -> fun x -> f (f x) in twice twice (fun x -> x * x) 2 evalto 65536 by E-Let {
|- fun f -> fun x -> f (f x) evalto ()[fun f -> fun x -> f (f x)] by E-Fun {};
twice = ()[fun f -> fun x -> f (f x)] |- twice twice (fun x -> x * x) 2 evalto 65536 by E-App {
twice = ()[fun f -> fun x -> f (f x)]
|- twice twice (fun x -> x * x) evalto (f = (f = (twice = ()[fun f -> fun x -> f (f x)])[fun x -> x * x])[fun x -> f (f x)])[fun x -> f (f x)] by E-App {
twice = ()[fun f -> fun x -> f (f x)]
|- twice twice evalto (f = ()[fun f -> fun x -> f (f x)])[fun x -> f (f x)] by E-App {
twice = ()[fun f -> fun x -> f (f x)] |- twice evalto ()[fun f -> fun x -> f (f x)] by E-Var1 {};
twice = ()[fun f -> fun x -> f (f x)] |- twice evalto ()[fun f -> fun x -> f (f x)] by E-Var1 {};
f = ()[fun f -> fun x -> f (f x)] |- fun x -> f (f x) evalto (f = ()[fun f -> fun x -> f (f x)])[fun
%lex
%%
\s+ /* skip whitespace */
"fun" return 'FUN'
[0-9]+ return 'INT'
"=>" return '=>'
<<EOF>> return 'EOF'
. return 'INVALID'
   _,,....,,_  _人人人人人人人人人人人人人人人_
-''":::::::::::::`''>   ゆっくりしていってね!!!   <
ヽ::::::::::::::::::::: ̄^Y^Y^Y^Y^Y^Y^Y^Y^Y^Y^Y^Y^Y^Y^ ̄
 |::::::;ノ´ ̄\:::::::::::\_,. -‐ァ     __   _____   ______
 |::::ノ   ヽ、ヽr-r'"´  (.__    ,´ _,, '-´ ̄ ̄`-ゝ 、_ イ、
_,.!イ_  _,.ヘーァ'二ハ二ヽ、へ,_7   'r ´          ヽ、ン、
::::::rー''7コ-‐'"´    ;  ', `ヽ/`7 ,'==─-      -─==', i
r-'ァ'"´/  /! ハ  ハ  !  iヾ_ノ i イ iゝ、イ人レ/_ルヽイ i |
!イ´ ,' | /__,.!/ V 、!__ハ  ,' ,ゝ レリイi (ヒ_]     ヒ_ン ).| .|、i .||
`!  !/レi' (ヒ_]     ヒ_ン レ'i ノ   !Y!""  ,___,   "" 「 !ノ i |
require 'benchmark'
puts Benchmark.measure {
(2..100).select { |n| '_' * n !~ /\A(__+)\1+\z/ }
}
puts ">_<X"
puts ">_<X"
puts ">_<X"
puts ">_<X"
@hakobe
hakobe / key_value_slice.pl
Created August 14, 2014 14:34
"Perl5.20のKey/Value Hash Slice" + "リストをスカラコンテキストで評価するとリストの最後の値になる" が組み合わさった様子
use strict;
use warnings;
use utf8;
use v5.20.0;
my $h = {
hoge => 'hoo',
fuga => 'foo',
};
class Problem
attr_reader :x, :y, :op
def initialize(op, x, y)
@op = op
@x = x
@y = y
end
puts "hello"
@hakobe
hakobe / gist:cf0de437dd7f5d1f7025
Last active August 29, 2015 14:18
なんかコンパイル通らない様子です
[error] (x$1: java.nio.file.Path,x$2: Iterable[_ <: CharSequence],x$3: java.nio.charset.Charset,x$4: java.nio.file.OpenOption*)java.nio.file.Path <and>
[error] (x$1: java.nio.file.Path,x$2: Array[Byte],x$3: java.nio.file.OpenOption*)java.nio.file.Path
[error] cannot be applied to (java.nio.file.Path, List[String], java.nio.charset.Charset)
[error] java.nio.file.Files.write(path, List("hoge"), StandardCharsets.UTF_8)
open my $ruby, '|/opt/local/bin/ruby';
print $ruby 'puts "hello"';
close $ruby;