Programming/lisp2013. 1. 28. 11:32

lisp when/unless macro

when 은 표준 clisp에는 없는 명령으로 if - progn 의 매크로라고 한다.

when 은 if가 참일경우에 대한
unless는 if가 거짓일에 대한 확장이다.

[링크 : http://gigamonkeys.com/book/macros-standard-control-constructs.html]
2013/01/28 - [Programming/lisp] - lisp 명령어 if progn 

'Programming > lisp' 카테고리의 다른 글

lisp 반복문 dolist, dotimes, do  (0) 2013.01.30
lisp cond  (0) 2013.01.28
lisp 명령어 if progn  (0) 2013.01.28
lisp eval & apply  (0) 2013.01.22
xlisp에서 incf 오류  (0) 2013.01.19
Posted by 구차니
Programming/lisp2013. 1. 28. 10:22

lisp 명령어 if progn

if문 예제
> (if (< 1 2) 'A 'B)
A
> (if (< 1 2) (if (< 1 2) 'C 'D) 'B)
C 

생각해보니 lisp의 if는 if then-else 이지 if - else if - else 가 아닌것 같다.
물론 불편하지만 else if 대신 else 에 if를 중첩해서 쓰면 되긴 하지만
언어 컨셉이 다르니 c언어와 다르다고 해서 안좋아! 라고 하긴 그렇겠....지?

[링크 : http://gigamonkeys.com/book/macros-standard-control-constructs.html]


그리고 if문에서 lisp 안에 하나의 문장만 해결하기에는 2% 부족하니
sequence로 여러개의 실행을 할 수 있도록 하는 progn이 필요하다.
progn은 마지막 것을
progn1 은 처음 것
progn2 는 두번째 것을 return 한다.

[10]> (progn (print "The first form")
       (print "The second form")
       (print "The third form"))

"The first form"
"The second form"
"The third form"
"The third form"
 
[11]> (prog1 (print "The first form")
       (print "The second form")
       (print "The third form"))

"The first form"
"The second form"
"The third form"
"The first form"
 
[12]> (prog2 (print "The first form")
       (print "The second form")
       (print "The third form"))

"The first form"
"The second form"
"The third form"
"The second form" 

[링크 : http://www.delorie.com/gnu/docs/elisp-manual-21/elisp_125.html]



+++
두개를 조합하면?
> (if (> 2 3)
(progn (print "i am a boy") (print "you are a girl"))
(progn (print "tt") (print"aa")))

"tt"
"aa"
"aa" 

 

'Programming > lisp' 카테고리의 다른 글

lisp cond  (0) 2013.01.28
lisp when/unless macro  (2) 2013.01.28
lisp eval & apply  (0) 2013.01.22
xlisp에서 incf 오류  (0) 2013.01.19
lisp backquote / 유사인용  (0) 2013.01.19
Posted by 구차니
개소리 왈왈/직딩의 비애2013. 1. 27. 12:57

아아 나에게 필요했던건 여행이구나

친구년+놈 결혼식에 참석하러 울산에 다녀왔다.
그녀석들 동아리 동기/선배들이 같이 갔는데
결혼한 친구들을 보고 있으니 불현듯 나도 결혼하고 싶다! 라는 생각이 든다.
결혼을 하고는 싶은데.. 그런 이유로 가고 싶어지는게 합당한 이유일까? 라는건 조금 접어두고..

이녀석들 이야기를 듣고 있으니
월급 직책 직위 이런것들이 떠오른다.
"돈과 건강을 맞바꿔서" 라는 말들도 들려오고

어느샌가 내가 나 답지 않아졌다는 생각이 들었다.

구름
시간
이동
여행



고등학교 시절 4층 난간에 걸터앉아 구름을 보면서 시간을 죽이던 나였는데
시간을 아끼려면 돈을 써야 한다.
돈도 아껴야 한다.
고로 집에서 시간을 아끼며 집에만 있으면 돈도 아껴진다.

그래서 항상 집에서만 짱박혀 있었던것 같다.
스스로에게 최소한의 여행이랍시고 주는건
일상이 되어버린 이동과, 자전거로 가던곳 조금더 빨리 가기 그리고 안가본곳 헤매기 정도







얼마전 휴가를 냈다가 또 퇴짜를 맞았는데
왜 뜬금없이 휴가를 내냐는 이사님이 물음에 이렇게 답을 했다.
"비일상이 필요해서요"

 
돌이켜 보면.. 그게 예전의 나의 일상이었는데
그게 비일상이 되었고, 그러한 비일상을 다시 꿈꾸다니.. 

'개소리 왈왈 > 직딩의 비애' 카테고리의 다른 글

북핵 실험 -_-  (0) 2013.02.12
1월 끝, 2월 시작  (0) 2013.01.31
내일 울산... ㅠ.ㅠ  (0) 2013.01.26
ytn 아나운서의 난해한 패션  (2) 2013.01.25
일하기 싫어 2012년 한해정리 주저리  (4) 2013.01.18
Posted by 구차니
개소리 왈왈/직딩의 비애2013. 1. 26. 23:35

내일 울산... ㅠ.ㅠ

집에서 사당까지 가는것도 문제고..
사당에서 울산이라니 ㅠ.ㅠ

왕복하면 하루 끝날듯 ㅠ.ㅠ 

'개소리 왈왈 > 직딩의 비애' 카테고리의 다른 글

1월 끝, 2월 시작  (0) 2013.01.31
아아 나에게 필요했던건 여행이구나  (6) 2013.01.27
ytn 아나운서의 난해한 패션  (2) 2013.01.25
일하기 싫어 2012년 한해정리 주저리  (4) 2013.01.18
2013년 새해가 밝았구나  (4) 2013.01.01
Posted by 구차니
개소리 왈왈/직딩의 비애2013. 1. 25. 12:40

ytn 아나운서의 난해한 패션

출근시간, 버스를 기다리다 GS25에 있는 TV를 보는데


읭?!

읭?!!?!!!!

으이이잉이이이잉?!?!?!?!!


아 맞다 나 dmb 되지!
하고 캡쳐 ㅋㅋㅋ


'개소리 왈왈 > 직딩의 비애' 카테고리의 다른 글

아아 나에게 필요했던건 여행이구나  (6) 2013.01.27
내일 울산... ㅠ.ㅠ  (0) 2013.01.26
일하기 싫어 2012년 한해정리 주저리  (4) 2013.01.18
2013년 새해가 밝았구나  (4) 2013.01.01
2013년 할일  (2) 2012.12.31
Posted by 구차니
프로그램 사용/ajaxplorer2013. 1. 24. 17:37

ajaxplorer 외부 공개 링크 만들기

share 기능을 활성화 하기 위해서는
php5-mcrypt 패키지를 설치해야 한다.

그렇지 않으면
"ERROR : MCrypt must be installed to use publiclets!" 요런 에러뜸

$ sudo apt-cache search mcrypt
libgringotts2 - gringotts data encapsulation and encryption library
libmcrypt-dev - De-/Encryption Library development files
libmcrypt4 - De-/Encryption Library
libtomcrypt-dev - static library, header files and documentation for libtomcrypt
libtomcrypt0 - public domain open source cryptographic toolkit
mcrypt - Replacement for old unix crypt(1)
php5-mcrypt - MCrypt module for php5

$ sudo apt-get install php5-mcrypt 

사용법은 원하는 파일 / 폴더 우클릭 "공개 링크" 혹은 "share"


유효한 날짜와 유효 다운로드
그리고 심심하면(귀찮아서 테스트 안함) 암호를 입력해준다.


유효기간과 유효 다운로드 횟수를 지정할수 있으며
다운로드 횟수 초과시
"Link is expired, sorry." 이런 메시지를 띄우며
정상 다운로드 되면 이런 아이콘이 뜬다.


 

'프로그램 사용 > ajaxplorer' 카테고리의 다른 글

ajaxplorer 5 권한/저장소 할당 변경점  (0) 2013.08.27
ajaxplorer 5  (0) 2013.07.25
ajaxplorer 3.4.0 에서 4.2.0으로 업그레이드 하기  (0) 2012.07.03
Ajaxplorer 세션 자동종료 막기 혹은 시간 늘리기  (0) 2011.07.28
ajaxplorer 3.2.4 released + update/upgrade  (0) 2011.06.15
Posted by 구차니
개소리 왈왈/모바일 생활2013. 1. 23. 22:28

아이러브 커피 이미지

계정 연동이 풀리면서 뜨는 이미지.
그나저나 같은 배경에 두개의 이미지 일까..
아니면 이 이미지를 배경으로 캐릭터가 추가되는걸까?



'개소리 왈왈 > 모바일 생활' 카테고리의 다른 글

찜찜한 인증문자  (4) 2013.03.05
KT 4G LTE 6667번 포트 막힘?  (0) 2013.02.28
아 문자.. 쫄았자나 ㅠ.ㅠ  (0) 2013.01.23
우분투 폰?  (2) 2013.01.13
꺄아아아아아!! 아이러브 커피 귀여워!!!  (0) 2012.12.28
Posted by 구차니
개소리 왈왈/모바일 생활2013. 1. 23. 22:26

아 문자.. 쫄았자나 ㅠ.ㅠ

xxxx 님의 메시지 도착. 확인불가시 전원 리셋 0 KB: 유효시간 0시간

요즘악명 높다는 그런 광고 스팸메일인줄 알았는데
MMS가 원인불명으로 전송되지 않아 다운로드 받으라는 메시지...
쫄았자나 -_-


근데 악용되기도 편한듯? 



'개소리 왈왈 > 모바일 생활' 카테고리의 다른 글

KT 4G LTE 6667번 포트 막힘?  (0) 2013.02.28
아이러브 커피 이미지  (2) 2013.01.23
우분투 폰?  (2) 2013.01.13
꺄아아아아아!! 아이러브 커피 귀여워!!!  (0) 2012.12.28
아이퐁5 WPA2-PSK 안되?  (0) 2012.12.12
Posted by 구차니
Programming/lisp2013. 1. 22. 22:39

lisp eval & apply

"만들면서 배우는 리스프 프로그래밍" 123p

스스로 변화하는 코드를 짜고 싶은가? eval은 좋은 벗이 될 것이다. 사실, 과거 인공지능 연구가가 리스프를 그토록 사랑했던 이유가 여기에 있다.


eval은 데이터를 코드로 처리하는 기능을 한다.
위에 말 처럼 스스로 변화하는 코드라는 말까지 와닫지는 않지만
데이터가 코드가 되는 살아움직이는 느낌 정도는 받는다고 해야 하려나?

eval은 리스트로 된 문장을 evaluate 한다.(재귀적인가?)
'(+ 1 2)는 단순한 데이터로 실행되지 않지만 eval에 넣으면 수행을 하게 된다.
> (eval (+ 1 2)) 
3                
> (eval '(+ 1 2))
3                
>                 

그에 반해 apply는 머하는데 쓰는건지 조금 의아한 녀석..
> (apply (function +) '(1 2))
3
> (apply + '(1 2))                                     
error: bad function - (apply (function +) (quote (1 2)))                              
매크로를 사용하면 #'+ 가 되겠지만 명시적으로  (function)을 사용해보면 위와 같이
함수에 대한 포인터(?)를 이용하여 eval에서 연산자를 제외한 동일한 형상을 띄게 된다


evaluate an xlisp expression
(eval <expr>)

<expr> the expression to be evaluated
returns the result of evaluating the expression

apply a function to a list of arguments
(apply <fun> <arg>...<args>)

<fun> the function to apply (or function symbol). May not be macro or fsubr.
<arg> initial arguments, which are consed to...
<args> the argument list
returns the result of applying the function to the arguments  

'Programming > lisp' 카테고리의 다른 글

lisp when/unless macro  (2) 2013.01.28
lisp 명령어 if progn  (0) 2013.01.28
xlisp에서 incf 오류  (0) 2013.01.19
lisp backquote / 유사인용  (0) 2013.01.19
lisp rem, mod  (0) 2013.01.17
Posted by 구차니
하드웨어/Server Case & board2013. 1. 22. 13:00

버려진 메인보드 - ASUS NCCH-DL

회사 공용 폐기장에 가서 택배용 박스나 구해볼까 뒤적뒤적하다가
먼지 자욱한 데탑발견!

사우스 브릿지쪽 냉각핀도 떨어지고
VRM쪽 냉각핀도 불안불안 해서 파워랑 CD만 떼올까? 하다가 귀찮아서 후퇴

검색해보니 노코나.. 응? 어디서 많이 듣던넘인데? ㅋㅋㅋ



머 집에 굴러 다니는 내꺼 보단 조금 꾸진건가.. 사이즈가 ATX라서 좋긴 한데 4GB까지가 한계군.
- Processor: Dual Intel® Nocona™ with 800FSB
- Chipset: Intel® 82875P, Intel® 6300ESB ICH
- Memory: Dual Channel PC3200 ECC or Non-ECC unbuffered up to 4GB
- Expansion: 2 x PCI , 2 x PCI-X
- Management Software: ASWM2.0
- Board size: 12" x 9.8" ATX
- On board LAN: Intel® PRO /1000 CT Network Connection
 
[링크 : http://www.asus.com/Server_Workstation/NCCHDL/] 

'하드웨어 > Server Case & board' 카테고리의 다른 글

ds213+ 와 ds213j  (0) 2015.04.02
라라비 / Xeon Phi  (0) 2013.09.13
ultra wide scsi3 와 ultra320 혼용  (0) 2012.11.21
구석기 시대 서버 Compaq ProLiant ML350  (2) 2012.11.21
NMI on Ubuntu Server Edition  (0) 2012.02.02
Posted by 구차니

티스토리툴바