name | dx | com | vop | fld | fls | ufls | mov | predicate | call | uw | imp | rec | any |
* | y | y | y | y | y | ||||||||
+ | y | y | y | y | y | ||||||||
- | y | y | y | y | |||||||||
/ | y | y | y | ||||||||||
/= | y | y | y | y | |||||||||
1+ | y | y | y | y |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
*~ | |
random_generators_speed_* |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/sh | |
#|-*- mode:lisp -*-|# | |
#| | |
exec ros -Q -- $0 "$@" | |
|# | |
(progn ;;init forms | |
(ros:ensure-asdf) | |
#+quicklisp (ql:quickload '(:plump :uiop :trivia :clss :iterate :alexandria) :silent t) | |
) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
3bgl-shader/walker.lisp:(defwalker cl-walker (catch tag &rest forms) | |
3bgl-shader/walker.lisp: `(catch ,(@ tag) ,@(@@ forms))) | |
3bgl-shader/walker.lisp:(defwalker cl-walker (throw tag result-form) | |
3bgl-shader/walker.lisp: `(throw ,(@ tag) ,(@ result-form))) | |
3bz/deflate.lisp: (catch :exit-loop | |
3bz/deflate.lisp: (throw :exit-loop :eoi))) | |
3bz/deflate.lisp: (throw :exit-loop :eoo)))) | |
agnostic-lizard/debugger-prototype.lisp: (catch 'debugger-hook-result | |
agnostic-lizard/examples.lisp: (throw :eval-check-failed "Form expansion changed behaviour"))))) | |
agnostic-lizard/examples.lisp: (throw :lexenv-check-fail "Form expansion changed behaviour")))) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; This also gets converted into a jump table | |
(defun fn (x) | |
(if (eql x #\a) | |
:a | |
(if (eql x #\b) | |
:b | |
(if (eql x #\c) | |
:c | |
(if (eql x #\d) | |
:d))))) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; -*- mode : lisp -*- | |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
;;; 4 Op-blocks world | |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
(define (domain BLOCKS) | |
(:requirements :strips) | |
(:predicates (on ?x ?y) | |
(ontable ?x) | |
(clear ?x) |
総額36万ぐらいを見ています ショック オーリンズそのままの場合+10万
(別件: 37型プラズマテレビ 無料で譲ります。詳細は↓)
NCEC H17 (2005年) モデル (マイチェン前)
買ったときの値段 | 値段 |
---|
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
./configure | |
Switching to directory `/home/guicho/repos/c-or-cpp/mkcl/src' to continue configuration. | |
checking build system type... x86_64-unknown-linux-gnu | |
checking host system type... x86_64-unknown-linux-gnu | |
checking for gcc... gcc | |
checking whether the C compiler works... yes | |
checking for C compiler default output file name... a.out | |
checking for suffix of executables... | |
checking whether we are cross compiling... no | |
checking for suffix of object files... o |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
; (UPGRADED-ARRAY-ELEMENT-TYPE TYPE) -> (UPGRADED-ARRAY-ELEMENT-TYPE (UNSIGNED-BYTE 1)) -> T | |
; (UPGRADED-ARRAY-ELEMENT-TYPE TYPE) -> (UPGRADED-ARRAY-ELEMENT-TYPE (UNSIGNED-BYTE 2)) -> T | |
; (UPGRADED-ARRAY-ELEMENT-TYPE TYPE) -> (UPGRADED-ARRAY-ELEMENT-TYPE (UNSIGNED-BYTE 3)) -> T | |
; (UPGRADED-ARRAY-ELEMENT-TYPE TYPE) -> (UPGRADED-ARRAY-ELEMENT-TYPE (UNSIGNED-BYTE 4)) -> T | |
; (UPGRADED-ARRAY-ELEMENT-TYPE TYPE) -> (UPGRADED-ARRAY-ELEMENT-TYPE (UNSIGNED-BYTE 5)) -> T | |
; (UPGRADED-ARRAY-ELEMENT-TYPE TYPE) -> (UPGRADED-ARRAY-ELEMENT-TYPE (UNSIGNED-BYTE 6)) -> T | |
; (UPGRADED-ARRAY-ELEMENT-TYPE TYPE) -> (UPGRADED-ARRAY-ELEMENT-TYPE (UNSIGNED-BYTE 7)) -> T | |
; (UPGRADED-ARRAY-ELEMENT-TYPE TYPE) -> (UPGRADED-ARRAY-ELEMENT-TYPE (UNSIGNED-BYTE 8)) -> (UNSIGNED-BYTE 8) | |
; (UPGRADED-ARRAY-ELEMENT-TYPE TYPE) -> (UPGRADED-ARRAY-ELEMENT-TYPE (UNSIGNED-BYTE 9)) -> T | |
; (UPGRADED-ARRAY-ELEMENT-TYPE TYPE) -> (UPGRADED-ARRAY-ELEMENT-TYPE (UNSIGNED-BYTE 10)) -> T |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/sh | |
#|-*- mode:lisp -*-|# | |
#| | |
exec ros -Q -- $0 "$@" 2>/dev/null | |
|# | |
; Refer to the demostuff file for definitions and descriptions. | |
(load "demostuff") | |
(defun main (&rest argv) | |
(declare (ignorable argv)) |
NewerOlder