순간 당황했으나, 방금 추가한 테스트 케이스를 살펴보니 _assert macro에 들어가는 내용이 잘못되어 있었다. boolean expression이 들어가야하는 곳에 그냥 expression만 하나 들어있었고, _assert(very_complex_expression) =:= expected value의 형태로 되어 있었다(어제 급히 추가하고 안돌려보고 바로 퇴근한 것이 후회되는 순간이었다). 그래도 컴파일은 멀쩡히 평소처럼 잘 되고 runtime에 가서야 에러가 나는 것은 좀 불편해보인다.
간략히 축약해서 예를 들자면 다음과 같다.
%% causes runtime error (see above msg).
?_assert(1+1) =:= 2
%% runs well w/o runtime error (good)
?_assert(1+1 =:= 2)
실제 내 코드에서는 1+1부분이 많이 복잡해서 화면을 넘어가고 있었고, _assert macro가 여러 개의 리스트로 묶여져 있어서 찾는데 좀 고생했다. Orz.
외부 DTD 파일에 <?xml version ... ?> 같은 XML 파일임을 나타내는 PI가 들어있으면 xmerl_scan:(file|string)에서는 다음과 같은 에러를 내면서 parsing이 안된다 (java 쪽에서는 별 문제가 없었던 DTD 파일이다).
error msg:
1066- fatal: {invalid_target_name," version=\""} ** exception exit: {fatal,{{invalid_target_name," version=\""}, {file,"/path/to/dtd.dtd"}, {line,6}, {col,18}}} in function xmerl_scan:fatal/2 in call from xmerl_scan:scan_ext_subset/2 in call from xmerl_scan:scan_decl_sep/2 in call from xmerl_scan:scan_ext_subset/2 in call from xmerl_scan:scan_decl/2 in call from xmerl_scan:fetch_and_parse/3 in call from xmerl_scan:fetch_DTD/2 in call from xmerl_scan:scan_doctype2/3
간편 해결책: DTD 들이 있는 디렉토리에서 다음을 실행해주자 (DTD 파일이 여러개일때...)
$ sed -i -r "/<\?xml .*\?>/s/.*//" *.dtd # remove xml PI stuff. $ sed -i '/./,/^$/!d' *.dtd # remove leading blank line(s).
문제를 푸는 것자체는 그다지 어렵지 않았으나, 멋있게 풀어보려고, 오늘 출근길 지하철에서 타블렛에 좀 끄적였다. W by H 행렬이라 보고, top left에서, 시계방향, 반시계방향 Spiral Array를 출력해주는 것을 만들었다. (물론 요즘은 erlang에 심취해있으므로, 구현언어는 당연히 erlang이다.)
요지는 조건 검사 같은 것을 하는 것이아니라, 수열을 사용한다. 즉, 동일한 상태 이동의 반복 회수가 수열이다. 연속된 transition의 개수를 구하는 함수를 f(x)라 하면,
f(x) = f(x - 2) - 1
x가 2보다 크면 무조건 성립이고, x = 1, 2 일때의 값은 clockwise, counterclockwise에 따라 W 또는 H로 조금 달라지기는 하지만 중요한 요점은 수열을 이용해 계산으로 구한다는것이다. 자세한 건 코드 참조!
2008-08-18 : 거의 동일한 방법으로 푼 사람이 이미 있었다. 맨앞에 몇개와 끝부분의 erlang 버전만 확인하고서 획기적인 방법이라고 좋아라하고 있었다니.... Orz. 그래도 high order function을 사용해서 functional에 걸맞는 멋진 프로그램이라고 나 자신에게 조금은 구차한(?) 최면을 거는 중이다.
unit test - makefile에서... make file에 다음과 같은 부분을 추가한 후에, make test 하면 간편하게 명령행에서 unit test를 수행할 수있다. (makefile 뼈대는 Programming Erlang을 기초로 했다.)
...... MODS = doc str_util db i18n tiny_scan ......
test: compile test_subdirs rm -rf Mnesia.nonode@nohost # removes previous mneisa db (optional). @for m in ${MODS};\ do \ echo "testing $$m";\ ${ERL} -noshell -pz "subdir1" -pz "subdir2" -s $$m test -s init stop;\ done
test_subdirs: cd subdir1; make test cd subdir2; make test
unit test, coverage test - 개발중 REPL(distel 또는 erl prompt) 에서... REPL을 사용해서 (멋지게) 코딩-테스트를 반복중이라면, 다음과 같은 모듈을 하나 디렉토리에 넣어서 test:unit() 또는 test:cover() 를 실행시켜서 unit test 및 coverage test를 시시때때로 수행해 볼 수 있다.
%%%------------------------------------------------------------------- %%% File : test.erl %%% Author : manywaypark <manywaypark@gmail.com> %%% Description : some test codes. %%% %%% Created : 11 Aug 2008 by manywaypark <manywaypark@gmail.com> %%%------------------------------------------------------------------- -module(test).
83> foo:save_xml("/tmp/foo.xml", Root). ** exception exit: {badarg,[{io,format, [<0.3348.0>,"~s~n", [[60,63,120,109,108,32,118,101,114,115,105, 111,110,61,34,49,46,48,34|...]]]}, {erl_eval,do_apply,5}, {shell,exprs,6}, {shell,eval_exprs,6}, {shell,eval_loop,3}]} in function io:o_request/2
이거 분명히 예전에 공부할 때 예제가 동작하는 것을 확인한 함수였는데.... binary로 써보기로했다.
84> Export=xmerl:export_simple([Root], xmerl_xml). ........ 85> file:write_file("/tmp/1.xml", list_to_binary(lists:flatten(Export))). ** exception error: bad argument in function list_to_binary/1 called as list_to_binary([60,63,120,109,108,32,118,101,114,115,105, 111,110,61,34,49,46,48,34,63,62,60,111,108, 100,114,103,112|...])
한글이 포함되어 안되는 것으로 짐작이 갔다.
99> list_to_binary([0, 1, 2]). <<0,1,2>> 100> list_to_binary([0, 1, 2, 255]). <<0,1,2,255>> 101> list_to_binary([0, 1, 2, 255, 256]). ** exception error: bad argument in function list_to_binary/1 called as list_to_binary([0,1,2,255,256])
결론은 list_to_binary가 255를 넘어가는 non-ascii를 제대로 처리하지 못해서였다.
