Skip to content

Instantly share code, notes, and snippets.

;; *** REPL ***
(defun game-repl ()
(let ((cmd (game-read)))
(unless (eq (car cmd) 'quit)
(game-print (game-eval cmd))
(game-repl))))
;; 入力に対して()を補い第二引数以降をシンボルとする
;; ex. walk east far => (WALK 'EAST 'FAR)
(defun game-read ()
;; CL-PDF Hello World
;;
;; Use ASDF to load the CL-PDF library
;;
(asdf:operate 'asdf:load-op 'cl-pdf)
;;
;; Function to generate a Hello World pdf file.
;; On calling this function, you should see a pdf file
@t-cool
t-cool / aobench.lisp
Created June 18, 2017 14:19 — forked from youz/aobench.lisp
aobench CommonLisp ver.
(defparameter image-width 256)
(defparameter image-height 256)
(defparameter nsubsamples 2)
(defparameter nao-samples 8)
;; vector
(defmacro vx (v) `(svref ,v 0))
(defmacro vy (v) `(svref ,v 1))
(defmacro vz (v) `(svref ,v 2))
(ql:quickload :parenscript)
(ql:quickload :cl-who)
(ql:quickload :clack)
(in-package :ps)
(defvar *canvas-id* "alien-canvas")
(clack:clackup
(lambda (env)
(list 200
'(:content-type "text/html")
(list
@t-cool
t-cool / article.md
Created September 1, 2018 02:04 — forked from y2q-actionman/a_road_to_common_lisp_jp.md
A Road to Common Lisp ほんやく
@t-cool
t-cool / styled-components-howtouse.md
Created January 29, 2020 03:56 — forked from kenmori/styled-components-howtouse.md
styled-componentsの使い方(パッとわかりやすく、色々なパターンを説明することを目指しています)

styled-componentsの使い方(パッとわかりやすく、色々なパターンを説明することを目指す記事)

styled-compoents

本家ドキュメント

こちらはStyled-componentsの使い方、ユースケースを集めた端的なページです。
なにかの問題解決、参考になりましたらスターを押してくださいませ。励みになります。
@t-cool
t-cool / shiguredo_tech.rst
Created March 7, 2020 09:39 — forked from voluntas/shiguredo_tech.rst
時雨堂を支える技術

時雨堂を支える技術

日時

2019-09-26

時雨堂

バージョン

19.09.0

URL

https://shiguredo.jp/

言語

@t-cool
t-cool / shiguredo_tech.rst
Created March 7, 2020 09:39 — forked from voluntas/shiguredo_tech.rst
時雨堂を支える技術

時雨堂を支える技術

日時

2019-09-26

時雨堂

バージョン

19.09.0

URL

https://shiguredo.jp/

言語

@t-cool
t-cool / main.dart
Last active October 19, 2021 05:15
import 'dart:math';
void main() {
print('--データ型--');
num n1 = pow(2, 63);
int n2 = 2;
double n3 = 1.23;
bool b1 = true;
String s1 = "string";
@t-cool
t-cool / mixin.dart
Created November 8, 2021 03:14
Dart Mixin
// クラスの継承関係でうまくいかないとき Mixin で継承をする
mixin M {
int intM = 111;
String methodM() => "M's method";
}
mixin N {
int intN = 111;
String methodN() => "N's method";