Skip to content

Instantly share code, notes, and snippets.

(define (expr x)
(define (calc op oprnd ans)
(if (null? op)
ans
(calc (cdr op) (cdr oprnd) ((car op) ans (car oprnd)))))
(define (expr-sub x op-stack oprnd-stack)
(cond [(number? x)
(lambda (y) (expr-sub y op-stack (cons x oprnd-stack)))]
[(member x '("+" "*" "-" "/"))
(lambda (y) (expr-sub y (cons (eval (string->symbol x)) op-stack) oprnd-stack))]
(define (expr num1)
(lambda (op)
(cond [(member op '("+" "*" "-" "/"))
(lambda (num2) (expr ((eval (string->symbol op)) num1 num2)))]
[else num1])))
((((((((expr 4) "+") 3) "*") 2) "-") 1) "=")
# 問題: 5, 6, 7, 8, 9, 1, 0, 1, 1, 1, 2, 1, 3, ...
# という数列のn番目の数字を求める関数を書け
f = (n) -> n + 5
solve = (index)->
ret = ""
cnt = 0
while true
ret += f(cnt++)
(defmacro ++ (&rest rest)
`(concatenate 'string ,@rest))
(let ((name "John"))
(princ (++ "Hello, " name "\n")))
# go勉強会、ソースコードリーディングの会vol.1
福岡でGoやってる! なにそれ?面白そう? とか、Goroutine気になるだとか!
CやC++でシステムプヨグヤミングやりたくないぽよ! とか思う人のためのGo勉強会でつ!
====================================
システムプログラミングで良く使われ、並列処理でGoroutineだとか面白い機能があり、
DockerやCockrouchDBで使われ出したりとか、現在注目をされているGo言語の勉強会です。
## 今回メンバー構成
イベントページ関係
* イベントページの内容を修正する
ソースコードリーティング会関係
* 題材を決定する
* コードリーディングのポイントを作成する
* ソースコードリーディングに関しての資料作り
@NobukazuHanada
NobukazuHanada / fizzbuzz.js
Last active September 3, 2015 04:26 — forked from kazuho/fizzbuzz.js
fizz = function f(n){
fizz = function(n){
fizz = function(n){
fizz = f;
return "Fizz";
};
return n;
};
return n;
};
class Symbol
def method_missing(name, *args)
self.to_s.method(name).call(*args)
end
end
puts :hello.start_with "he"
trait Creatable[T] {
def create : T
}
object Main extends App{
implicit object CreatableInt extends Creatable[Int] {
def create : Int = 3
}
object Main extends App{
trait Addable[T] {
def add(a:T) : T
}
implicit object CreatableInt extends Addable[Int]{
def add(a:Int) : Int = a + 3
}
implicit object CreatableString extends Addable[String] {