이민석/리스프 - Revision history

Maintenance script: Repair batch-0006 pages from live compare

2026-03-27T01:08:40Z

Repair batch-0006 pages from live compare

← Older revision		Revision as of 01:08, 27 March 2026
Line 148:		Line 148:
	** 리스트의 예:		** 리스트의 예:
	(RED GREEN BLUE)		(RED GREEN BLUE)
	, ~~{{{~~(AARDVARK)~~}}}~~, ~~{{{~~(2 3 5 7 11 13 17)~~}}}~~		, (AARDVARK), (2 3 5 7 11 13 17)
	** 메모리에서의 실제 형태: 셀(cell)마다 원소를 가리키는 포인터, 다음 셀을 가리키는 포인터를 가진다		** 메모리에서의 실제 형태: 셀(cell)마다 원소를 가리키는 포인터, 다음 셀을 가리키는 포인터를 가진다
	** 마지막 셀은 NIL을 가리킨다		** 마지막 셀은 NIL을 가리킨다
Line 265:		Line 265:
	** 그럼 CAR니 CDR은 왜 쓰는 건데 ㅡㅡ		** 그럼 CAR니 CDR은 왜 쓰는 건데 ㅡㅡ
	** Common Lisp에는 EGGPLANT라는 내장 변수가 없으며 EGGPLANT 심볼을 평가하면 오류가 발생한다		** Common Lisp에는 EGGPLANT라는 내장 변수가 없으며 EGGPLANT 심볼을 평가하면 오류가 발생한다
	** <span style="color:#ff0000">심볼이 왜 자꾸 문단에선 대문자로 나왔다 코드에선 소문자로 나왔다 하는 거야 뭐가 맞는 거야</span>		** <span style="color:#ff0000">심볼이 왜 자꾸 문단에선 대문자로 나왔다 코드에선 소문자로 나왔다 하는 거야 뭐가 맞는 거야</span>
	* 심볼과 리스트를 데이터로 활용하기		* 심볼과 리스트를 데이터로 활용하기
	** 심볼 KIRK과 SPOCK이 같은 지 비교하고 싶어요		** 심볼 KIRK과 SPOCK이 같은 지 비교하고 싶어요
Line 277:		Line 277:
	** (third (my aunt mary)) => Error! MY undefined function.		** (third (my aunt mary)) => Error! MY undefined function.
	(third '(my aunt mary)) => mary		(third '(my aunt mary)) => mary
	** <span style="color:#ff0000">그러니까 따옴표는 평가되는 걸 막는다는 뜻인가</span>		** <span style="color:#ff0000">그러니까 따옴표는 평가되는 걸 막는다는 뜻인가</span>
	** 리스트를 만드는 세 가지 방법		** 리스트를 만드는 세 가지 방법
	** '(foo bar baz) => (foo bar baz)		** '(foo bar baz) => (foo bar baz)
Line 675:		Line 675:
	** 두 번째 인자는 format control string (C의 printf의 인자와 비슷해보인다)		** 두 번째 인자는 format control string (C의 printf의 인자와 비슷해보인다)
	**		**
	~%		<code>%</code>
	는 printf의 ~~{{{~~\n~~}}}~~		는 printf의 \n
	**		**
	~&		<code>&</code>
	는 새로운 줄이 아닐 때만 새로운 줄을 시작		는 새로운 줄이 아닐 때만 새로운 줄을 시작
	**		**
	~S		<code>S</code>
	는 리스프 객체의 문자열 표현 (FORMAT 함수의 나머지 인자들을 채워줘야 한다)		는 리스프 객체의 문자열 표현 (FORMAT 함수의 나머지 인자들을 채워줘야 한다)
	**		**
	~A		<code>A</code>
	는 ~S에서 이스케이프 문자를 떼어내고 출력		는 ~S에서 이스케이프 문자를 떼어내고 출력
	* READ 함수: 키보드 입력 -> 리스프 객체로 변환		* READ 함수: 키보드 입력 -> 리스프 객체로 변환
Line 759:		Line 759:
	** 판매량을 전역 변수로 표현		** 판매량을 전역 변수로 표현
	(setf total-glasses 0)		(setf total-glasses 0)
	** <span style="color:#ff0000">전역 변수 이름 양끝에 *를 붙인 건 그냥 관례. 특별한 의미는 없다</span>		** <span style="color:#ff0000">전역 변수 이름 양끝에 *를 붙인 건 그냥 관례. 특별한 의미는 없다</span>
	** 레모네이드를 팔 때마다		** 레모네이드를 팔 때마다
	total-glasses		total-glasses
Line 775:		Line 775:
	**		**
	(SETF A (+ A 5))		(SETF A (+ A 5))
	=> ~~{{{~~(INCF A 5)~~}}}~~		=> (INCF A 5)
	** DECF는 빼기. INCF와 DECF는 두 번째 인자를 생략하면 1을 덧셈/뺄셈		** DECF는 빼기. INCF와 DECF는 두 번째 인자를 생략하면 1을 덧셈/뺄셈
	** '''PUSH 매크로와 POP 매크로''': 리스트를 스택으로 취급해서 맨 처음 위치에 삽입/제거		** '''PUSH 매크로와 POP 매크로''': 리스트를 스택으로 취급해서 맨 처음 위치에 삽입/제거
	**		**
	(SETF X (CONS 'FOO X))		(SETF X (CONS 'FOO X))
	=> ~~{{{~~(PUSH 'FOO X)~~}}}~~		=> (PUSH 'FOO X)
	** PUSH와 POP은 다른 할당 형태들과 일관성을 지키려면 PUSHF와 POPF가 됐어야 하지만 SETF보다 먼저 발명됨		** PUSH와 POP은 다른 할당 형태들과 일관성을 지키려면 PUSHF와 POPF가 됐어야 하지만 SETF보다 먼저 발명됨
	** SETF는 "set field"를 뜻한다		** SETF는 "set field"를 뜻한다
Line 813:		Line 813:
	**		**
	test		test
	가 NIL이면 NIL 반환. NIL이 아니면 ~~{{{body}}}를~~ 평가하고 마지막 값을 반환		가 NIL이면 NIL 반환. NIL이 아니면 body를 평가하고 마지막 값을 반환
	** UNLESS는		** UNLESS는
	test		test
Line 901:		Line 901:
	* DOTIMES와 DOLIST는 매크로 함수여서 인자들을 평가하지 않는다		* DOTIMES와 DOLIST는 매크로 함수여서 인자들을 평가하지 않는다
	*		*
	(DOTIMES (index-var n [result-form]) body)		(DOTIMES (index-var n [result-form]) body)
	** index-var가 0에서 n-1까지		** index-var가 0에서 n-1까지
	*		*
	(DOLIST (index-var list [result-form]) body)		(DOLIST (index-var list [result-form]) body)
	** result-form은 반환할 값. 생략하면 NIL 반환		** result-form은 반환할 값. 생략하면 NIL 반환
	**		**
Line 920:		Line 920:
	** test를 평가한다. 참이면 action-1 ... action-n을 평가하고 action-n의 값을 반환한다		** test를 평가한다. 참이면 action-1 ... action-n을 평가하고 action-n의 값을 반환한다
	** 거짓이면 body를 평가한다		** 거짓이면 body를 평가한다
	(DO ((var1 init1 [update1])		(DO ((var1 init1 [update1])
	(var2 init2 [update2])		(var2 init2 [update2])
	...)		...)
	(test action-1 ... action-n)		(test action-1 ... action-n)
Line 942:		Line 942:
	** 사실		** 사실
	RETURN x		RETURN x
	는 ~~{{{~~RETURN-FROM NIL ~~x}}}이다~~		는 RETURN-FROM NIL x이다
	(defun find-first-odd (x)		(defun find-first-odd (x)
	(format t "~&Searching for an odd number...")		(format t "~&Searching for an odd number...")

Maintenance script: Repair MoniWiki formatting after migration

2026-03-26T14:01:47Z

Repair MoniWiki formatting after migration

← Older revision		Revision as of 14:01, 26 March 2026
Line 265:		Line 265:
	** 그럼 CAR니 CDR은 왜 쓰는 건데 ㅡㅡ		** 그럼 CAR니 CDR은 왜 쓰는 건데 ㅡㅡ
	** Common Lisp에는 EGGPLANT라는 내장 변수가 없으며 EGGPLANT 심볼을 평가하면 오류가 발생한다		** Common Lisp에는 EGGPLANT라는 내장 변수가 없으며 EGGPLANT 심볼을 평가하면 오류가 발생한다
	**		** <span style="color:#ff0000">심볼이 왜 자꾸 문단에선 대문자로 나왔다 코드에선 소문자로 나왔다 하는 거야 뭐가 맞는 거야</span>
	{color:#ff0000} 심볼이 왜 자꾸 문단에선 대문자로 나왔다 코드에선 소문자로 나왔다 하는 거야 뭐가 맞는 거야
	* 심볼과 리스트를 데이터로 활용하기		* 심볼과 리스트를 데이터로 활용하기
	** 심볼 KIRK과 SPOCK이 같은 지 비교하고 싶어요		** 심볼 KIRK과 SPOCK이 같은 지 비교하고 싶어요
Line 278:		Line 277:
	** (third (my aunt mary)) => Error! MY undefined function.		** (third (my aunt mary)) => Error! MY undefined function.
	(third '(my aunt mary)) => mary		(third '(my aunt mary)) => mary
	**		** <span style="color:#ff0000">그러니까 따옴표는 평가되는 걸 막는다는 뜻인가</span>
	{color:#ff0000}그러니까 따옴표는 평가되는 걸 막는다는 뜻인가
	** 리스트를 만드는 세 가지 방법		** 리스트를 만드는 세 가지 방법
	** '(foo bar baz) => (foo bar baz)		** '(foo bar baz) => (foo bar baz)
Line 761:		Line 759:
	** 판매량을 전역 변수로 표현		** 판매량을 전역 변수로 표현
	(setf total-glasses 0)		(setf total-glasses 0)
	**		** <span style="color:#ff0000">전역 변수 이름 양끝에 *를 붙인 건 그냥 관례. 특별한 의미는 없다</span>
	{color:#ff0000} 전역 변수 이름 양끝에 *를 붙인 건 그냥 관례. 특별한 의미는 없다
	** 레모네이드를 팔 때마다		** 레모네이드를 팔 때마다
	total-glasses		total-glasses
Line 1,321:		Line 1,318:
	** 일반적인 lambda-list는 (var1 var2 ...)		** 일반적인 lambda-list는 (var1 var2 ...)
	** 이건 ((var1 class1) (var2 class2) ...) ; 변수의 타입을 제한		** 이건 ((var1 class1) (var2 class2) ...) ; 변수의 타입을 제한

imported>codeonwort at 07:07, 9 January 2015

2015-01-09T07:07:25Z

← Older revision		Revision as of 07:07, 9 January 2015
Line 1:		Line 1:
	== 개발 환경 갖추기 ==		== 1. 개발 환경 갖추기 ==
	* SBCL로 컴파일하기		* SBCL로 컴파일하기
	** http://stackoverflow.com/questions/14171849/compiling-common-lisp-to-an-executable		** http://stackoverflow.com/questions/14171849/compiling-common-lisp-to-an-executable
Line 38:		Line 38:

	----		----
	== 직접 겪으며 해결하는 고통이 가득한 트러블슈팅 ==		== 2. 직접 겪으며 해결하는 고통이 가득한 트러블슈팅 ==
	* 동적 바인딩으로 빅엿 먹은 사례		* 동적 바인딩으로 빅엿 먹은 사례
	(defvar clients '())		(defvar clients '())
Line 48:		Line 48:
	)		)
	----		----
	== A Gentle Introduction To Symbolic Computation ==		== 3. A Gentle Introduction To Symbolic Computation ==
	* [http://www.cs.cmu.edu/~dst/LispBook/]에서 무료로 볼 수 있다		* [http://www.cs.cmu.edu/~dst/LispBook/]에서 무료로 볼 수 있다
	* 읽으면서 정리해보자		* 읽으면서 정리해보자

imported>codeonwort at 06:58, 9 January 2015

2015-01-09T06:58:51Z

← Older revision		Revision as of 06:58, 9 January 2015
Line 38:		Line 38:

	----		----
	==직접 겪으며 해결하는 ~~고통받는 리스프~~ 트러블슈팅==		== 직접 겪으며 해결하는 고통이 가득한 트러블슈팅 ==
	* 동적 바인딩으로 빅엿 먹은 사례		* 동적 바인딩으로 빅엿 먹은 사례
	(defvar clients '())		(defvar clients '())

imported>codeonwort at 06:58, 9 January 2015

2015-01-09T06:58:24Z

@@ Line 37: / Line 37: @@
 ** 뭐 이런 문법이 있어 http://psg.com/~dlamkins/sl/chapter03-09.html
 ----
 == A Gentle Introduction To Symbolic Computation ==

imported>codeonwort at 04:21, 18 December 2014

2014-12-18T04:21:35Z

← Older revision		Revision as of 04:21, 18 December 2014
Line 1,305:		Line 1,305:
	** 그럼 :initform은요? 겹치는데??		** 그럼 :initform은요? 겹치는데??
	** b의 정의가 c의 정의보다 우선순위가 높다		** b의 정의가 c의 정의보다 우선순위가 높다
			* 메서드 정의하기
			(DEFMETHOD generic-function-name specialized-lambda-list
			form*)
			** specialized-lambda-list라구요?
			** 일반적인 lambda-list는 (var1 var2 ...)
			** 이건 ((var1 class1) (var2 class2) ...) ; 변수의 타입을 제한

imported>codeonwort at 02:44, 18 December 2014

2014-12-18T02:44:27Z

← Older revision		Revision as of 02:44, 18 December 2014
Line 5:		Line 5:
	(sb-ext:save-lisp-and-die "hello.exe" :toplevel #'main :executable t)		(sb-ext:save-lisp-and-die "hello.exe" :toplevel #'main :executable t)

	* 커먼 리스프로 소켓을 만들어서 실행해보자!!!		* 커먼 리스프로 소켓을 만들어서 실행해보자!!
	** 개발 환경		** 개발 환경
	** 서버: 우분투		** 서버: 우분투
Line 25:		Line 25:
	** usocket 설치하기:		** usocket 설치하기:
	(ql:quickload "usocket")		(ql:quickload "usocket")
	*** 아마 설치 안됐으면 설치하고 돼있으면 로드만 하는 듯..?		*** 아마 설치 안됐으면 설치하고 돼있으면 로드만 하는 듯?

	* 커먼 리스프에서 쓰레드 쓰기		* 커먼 리스프에서 쓰레드 쓰기
Line 1,252:		Line 1,252:

	----		----
	== Common Lisp Object ~~Sysem~~ ==		== Common Lisp Object System ==
	* 커먼 리스프에서 클래스 써보자		* 커먼 리스프에서 클래스 써보자
	* A Brief Guide to CLOS: [http://www.aiai.ed.ac.uk/~jeff/clos-guide.html]		* A Brief Guide to CLOS: [http://www.aiai.ed.ac.uk/~jeff/clos-guide.html]

imported>codeonwort at 02:43, 18 December 2014

2014-12-18T02:43:38Z

@@ Line 35: / Line 35: @@
 ** multiple value return
-** 뭐 이런 문법이 있어 -_-
+** 뭐 이런 문법이 있어 http://psg.com/~dlamkins/sl/chapter03-09.html
 ----
@@ Line 61: / Line 60: @@
 ** 잘 알려지지 않은 PUSHNEW 같은 원시형을 사용하느니 함수를 좀 더 풀어쓴 것이 몇 군데 있다
 ** 가장 고급 주제인 multiple value나 package system은 다루지 않는다
 == 1장. 함수와 데이터 ==
@@ Line 1,253: / Line 1,250: @@
 ** DEFCONSTANT: 상수를 정의한다
 끝!!! ㅋㅋ 이제 소켓 프로그래밍 해야지

imported>codeonwort at 18:40, 12 December 2014

2014-12-12T18:40:56Z

← Older revision		Revision as of 18:40, 12 December 2014
Line 342:		Line 342:
	(defun my-abs (x) (if (< x 0) (- x) x))		(defun my-abs (x) (if (< x 0) (- x) x))
	** 세 번째 인자 즉 false-part는 생략할 수 있다. 이 경우 NIL로 처리된다.		** 세 번째 인자 즉 false-part는 생략할 수 있다. 이 경우 NIL로 처리된다.
			** true-part에 표현식을 여러 개 쓰고 싶을 때!!! 절대 (expr1 expr2 exprN) 이따구로 쓰지 말 것! 문법 오류
			** (true-part) => (progn expr1 expr2 exprN)
			** 9장에 PROGN 나오니 참조
	* COND 매크로		* COND 매크로
	** 간략한 형태		** 간략한 형태
Line 952:		Line 955:
	** PROG2는 두 번째 표현식의 값을 반환한다		** PROG2는 두 번째 표현식의 값을 반환한다
	** PROGN은 마지막 표현식의 값을 반환한다		** PROGN은 마지막 표현식의 값을 반환한다
	** 근데 ~~요즘인~~ 이것 다 잘 안 써요		** 근데 요즘은 이것 다 잘 안 써요
	* 추가 인자^^optional argument^^		* 추가 인자^^optional argument^^
	** 함수는 키워드 인자나 임의 개수의 인자를 취할 수 있다		** 함수는 키워드 인자나 임의 개수의 인자를 취할 수 있다

imported>codeonwort at 05:51, 12 December 2014

2014-12-12T05:51:21Z

← Older revision		Revision as of 05:51, 12 December 2014
Line 33:		Line 33:
	(defun test () (print "assdasdasdsadasdasd"))		(defun test () (print "assdasdasdsadasdasd"))
	(bordeaux-threads:make-thread #'test)		(bordeaux-threads:make-thread #'test)

			** multiple value return
			** 뭐 이런 문법이 있어 -_-
			http://psg.com/~dlamkins/sl/chapter03-09.html

	----		----