From bdbb4708c0434ef7085486c381902f69fbbaf110 Mon Sep 17 00:00:00 2001 From: j8takagi Date: Tue, 22 Mar 2011 23:05:10 +0900 Subject: [PATCH] =?utf8?q?=E3=83=89=E3=82=AD=E3=83=A5=E3=83=A1=E3=83=B3?= =?utf8?q?=E3=83=88=E5=86=85=E3=81=AEcasl2lib=E3=83=95=E3=82=A9=E3=83=AB?= =?utf8?q?=E3=83=80=E3=82=92=E6=95=B4=E7=90=86?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- doc/Makefile | 3 +- doc/casl2lib/Define.mk | 131 +---------------------------------- doc/casl2lib/Define_group.mk | 95 ------------------------- doc/casl2lib/Define_test.mk | 80 --------------------- doc/casl2lib/Makefile | 53 +------------- doc/casl2lib/Test.mk | 66 +----------------- doc/casl2lib/abs/Makefile | 1 - doc/casl2lib/addl32/Makefile | 1 - doc/casl2lib/addl32/cmd | 6 +- doc/casl2lib/diva/Makefile | 1 - doc/casl2lib/divl/Makefile | 1 - doc/casl2lib/inl/0.txt | 4 +- doc/casl2lib/inl/Makefile | 1 - doc/yacasl2.html | 2 +- 14 files changed, 11 insertions(+), 434 deletions(-) mode change 100644 => 120000 doc/casl2lib/Define.mk delete mode 100644 doc/casl2lib/Define_group.mk delete mode 100644 doc/casl2lib/Define_test.mk mode change 100644 => 120000 doc/casl2lib/Makefile mode change 100644 => 120000 doc/casl2lib/Test.mk diff --git a/doc/Makefile b/doc/Makefile index d43de39..2008539 100644 --- a/doc/Makefile +++ b/doc/Makefile @@ -11,7 +11,7 @@ MAKEINFO = makeinfo .INTERMEDIATE: $(DOCNAME).dvi -all: info htmlnosplit html pdf +doc: info htmlnosplit html pdf htmlnosplit: $(DOCNAME).html @@ -39,3 +39,4 @@ $(DOCNAME).dvi: $(SRC) clean: @rm -rf html $(DOCNAME).info $(DOCNAME).pdf $(DOCNAME).html $(DOCNAME).dvi + @rm -rf $(DOCNAME).aux $(DOCNAME).cp $(DOCNAME).cps $(DOCNAME).fn $(DOCNAME).ky $(DOCNAME).log $(DOCNAME).pg $(DOCNAME).pgs $(DOCNAME).tmp $(DOCNAME).toc $(DOCNAME).tp $(DOCNAME).vr diff --git a/doc/casl2lib/Define.mk b/doc/casl2lib/Define.mk deleted file mode 100644 index efc1aeb..0000000 --- a/doc/casl2lib/Define.mk +++ /dev/null @@ -1,130 +0,0 @@ -# autotest.mk > test_template > Define.mk -# 自動テスト用の変数、マクロ定義 - -ifndef DEFINE_INCLUDED -DEFINE_INCLUDED = 1 - -# 現在の日時 -DATE = $(shell date +"%F %T") - -# 現在のディレクトリー -CURRDIR = $(shell pwd) - -# Makefile -MAKEFILE := Makefile - -###################################################################### -# コマンド -###################################################################### - -CP ?= cp - -CAT ?= cat - -MKDIR ?= mkdir - -RM ?= rm -f - -ECHO ?= echo - -TIME ?= /usr/bin/time --quiet - -DIFF ?= diff -c - -DEV_NULL ?= /dev/null - -CHMOD ?= chmod - -GREP ?= grep - -LINECOUNT ?= wc -l - -FIND ?= find - -TR ?= tr - -EXPR ?= expr - -LINK ?= ln -s - -###################################################################### -# テストグループとテストでの共通マクロ -###################################################################### - -# chk_var_null: 引数がNULLの場合、エラー -# 用例: $(call chk_var_null,var) -define chk_var_null - $(if $1,,$(error NULL argument)) -endef - -# chk_file_ext: 指定されたファイルが実在する場合、エラー -# 用例: $(call chk_file_ext,file) -define chk_file_ext - $(if $(wildcard $1),$(error $1 exists in $(CURRDIR))) -endef - -# chk_file_notext: 指定されたファイルが実在しない場合、エラー -# 用例: $(call chk_file_notext,file) -define chk_file_notext - $(if $(wildcard $1),,$(error $1 not exists in $(CURRDIR))) -endef - -###################################################################### -# テストグループのディレクトリー -###################################################################### - -# テストグループとテストの変数を定義したMakefile -DEF_FILE := Define.mk - -# テストグループの変数を定義したMakefile -DEF_GROUP_FILE := Define_group.mk - -# テストの変数を定義したMakefile -DEF_TEST_FILE := Define_test.mk - -# テストのターゲットを定義したMakefile -TEST_MAKEFILE := Test.mk - -# すべてのMakefile群 -MAKEFILES := $(DEF_FILE) $(DEF_GROUP_FILE) $(DEF_TEST_FILE) $(TEST_MAKEFILE) - -MAKEFILES_ABS := $(foreach file,$(MAKEFILES),$(CURRDIR)/$(file)) - -# テストごとのMakefileでインクルードするMakefile群 -TEST_MAKEFILES := $(DEF_FILE) $(DEF_TEST_FILE) $(TEST_MAKEFILE) - -###################################################################### -# テストのディレクトリー -###################################################################### - -# テストコマンドファイル -CMD_FILE := cmd - -# テスト説明ファイル -DESC_FILE := desc.txt - -# テスト想定結果ファイル -TEST0_FILE := 0.txt - -# テスト結果ファイル -TEST1_FILE := 1.txt - -# テストの、想定結果と結果の差分ファイル -DIFF_FILE := diff.txt - -# テストエラーファイル -ERR_FILE := err.txt - -# テストログファイル -LOG_FILE := test.log - -# 実行時間ファイル -TIME_FILE := time.log - -# テスト詳細レポートファイル -DETAIL_FILE := detail.log - -# テストの結果として作成されるファイル群 -TEST_RES_FILES := $(TEST1_FILE) $(DIFF_FILE) $(ERR_FILE) $(LOG_FILE) $(DETAIL_FILE) $(TIME_FILE) - -endif diff --git a/doc/casl2lib/Define.mk b/doc/casl2lib/Define.mk new file mode 120000 index 0000000..551896d --- /dev/null +++ b/doc/casl2lib/Define.mk @@ -0,0 +1 @@ +../../test/template/Define.mk \ No newline at end of file diff --git a/doc/casl2lib/Define_group.mk b/doc/casl2lib/Define_group.mk deleted file mode 100644 index f3cda2c..0000000 --- a/doc/casl2lib/Define_group.mk +++ /dev/null @@ -1,95 +0,0 @@ -###################################################################### -# テストグループのディレクトリー -# ほかに、Define.mkでも一部定義 -###################################################################### - -# グループディレクトリー -GROUP_DIR := $(CURRDIR) - -# グループ名。ディレクトリ名から取得 -GROUP := $(notdir $(GROUP_DIR)) - -# テスト名。カレントディレクトリー内の、名前が大文字または.以外で始まるディレクトリー -TESTS = $(notdir $(shell $(FIND) -maxdepth 1 -name "[^A-Z.]*" -type d)) - -# テストグループログファイル -GROUP_LOG_FILE := $(shell $(ECHO) $(GROUP) | $(TR) '[a-z]' '[A-Z]').log - -# テストグループレポートファイル -GROUP_REPORT_FILE := Report.log - -# テストグループ実行時間ファイル -GROUP_TIME_FILE := $(shell echo $(GROUP) | $(TR) '[a-z]' '[A-Z]')_time.log - -# グループで、テスト結果として作成されるファイル群 -GROUP_RES_FILES := $(GROUP_LOG_FILE) $(GROUP_REPORT_FILE) $(GROUP_TIME_FILE) - -# テストごとのログファイル -TEST_LOG_FILES := $(foreach test,$(TESTS),$(test)/$(LOG_FILE)) - -###################################################################### -# テストグループのマクロ -###################################################################### - -# 指定したディレクトリーを作成 -# 用例: $(call create_dir,name) -define create_dir - $(call chk_var_null,$1) - $(call chk_file_ext,$1) - $(MKDIR) $1 -endef - -# リストで指定された親ディレクトリーにあるMakefileをインクルードするMakefileを作成 -# 用例: $(call create_makefile,file,list_include_file) -define create_makefile - $(RM) $1 - $(foreach infile,$2,$(ECHO) "include ../$(infile)" >>$1; ) -endef - -# テストごとのファイルをグループファイルに出力 -# 引数は、テストのリスト、グループファイル、テストファイル -# 用例: $(call group_log,files_test_log,file_group_log) -define group_log - $(foreach target,$1,$(call group_log_each,$(target),$2)) -endef - -# テストのログファイルをグループログファイルに出力。引数は、テスト、グループログファイル -# 用例: $(call group_log_each,file_test_log,file_group_log) -define group_log_each - if test -s $1; then $(CAT) $1 >>$2; else $(ECHO) $(dir $1)": no log" >>$2; fi - $(ECHO) >>$2; - -endef - -# 成功したテストの数。テストグループログファイルから取得 -SUCCESS_TEST = $(shell $(GREP) "^[^A-Z.].*: Test Success" $(GROUP_LOG_FILE) | $(LINECOUNT)) - -# 失敗したテストの数。テストグループログファイルから取得 -FAIL_TEST = $(shell $(GREP) "^[^A-Z.].*: Test Failure" $(GROUP_LOG_FILE) | $(LINECOUNT)) - -# すべてのテストの数 -ALL_TEST = $(shell $(EXPR) $(SUCCESS_TEST) + $(FAIL_TEST)) - -# テストごとの実行時間ファイル -TEST_TIME_FILES := $(foreach test,$(TESTS),$(test)/$(TIME_FILE)) - -# テストの結果を、グループログファイルを元にレポート。 -# 引数は、グループ名、グループログファイル、グループレポートファイル -# 用例: $(call group_report,name,file_log,file_report) -define group_report - $(ECHO) "$1: $(SUCCESS_TEST) / $(ALL_TEST) tests passed. Detail in $(GROUP_DIR)/$2" >$3; - if test $(FAIL_TEST) -eq 0; then $(ECHO) "$1: All tests are succeded." >>$3; fi -endef - -# リストで指定したディレクトリーでmakeを実行 -# 用例: $(call make_tests,list_dir,target) -define make_tests - $(foreach dir,$1,$(call make_test_each,$(dir),$2)) -endef - -# 指定したディレクトリーでmakeを実行 -# 用例: $(call make_test_each,tests,target) -define make_test_each - $(MAKE) $2 -sC $1; - -endef diff --git a/doc/casl2lib/Define_test.mk b/doc/casl2lib/Define_test.mk deleted file mode 100644 index 78394cb..0000000 --- a/doc/casl2lib/Define_test.mk +++ /dev/null @@ -1,80 +0,0 @@ -###################################################################### -# マクロ -###################################################################### - -# 引数のファイルをチェックし、内容がない場合は削除 -# 用例: $(call rm_null,file) -define rm_null - if test ! -s $1; then $(RM) $1; fi -endef - -# 説明ファイルの内容を、引数のファイルに出力 -# 用例: $(call desc_log,file_out) -define desc_log - if test -s $(DESC_FILE); then $(CAT) $(DESC_FILE) >>$1; fi -endef - -# テスト実行の経過時間を、ファイルに出力して表示 -# 引数は、テスト名、コマンドファイル、出力ファイル -# 用例: $(call time_cmd,name,file_cmd,file_out) -define time_cmd - $(call chk_file_notext,$2) - $(CHMOD) u+x $2 - $(TIME) -f"$1: %E" -o $3 ./$2 >$(DEV_NULL) 2>&1 -endef - -# テスト実行コマンド。引数は、コマンドファイル、出力ファイル、エラーファイル -# コマンドファイルを実行し、標準出力を出力ファイルに保存。 -# エラー発生時は、エラー出力を出力ファイルとエラーファイルに保存。 -# 用例: $(call exec_cmd,file_cmd,file_out,file_err) -define exec_cmd - $(call chk_file_notext,$1) - $(CHMOD) u+x $1 - ./$1 >>$2 2>$3 - if test -s $3; then $(CAT) $3 >>$2; fi - $(call rm_null,$3) -endef - -# 2つのファイルを比較し、差分ファイルを作成 -# 引数は、2ファイルのリスト、差分ファイル -# 用例: $(call diff_files,files,file_out) -define diff_files - $(DIFF) $1 >$2 2>&1 - $(call rm_null,$2) -endef - -# 差分ファイルの内容をログファイルに出力 -# 引数は、テスト名、差分ファイル、ログファイル -# 用例: $(call test_log,name,file_diff,file_log) -define test_log - $(call desc_log,$3) - if test ! -s $2; then RES=Success; else RES=Failure; fi; $(ECHO) "$1: Test $$RES $(DATE)" >>$3 - $(ECHO) "Detail in $(CURRDIR)/$(DETAIL_FILE)" >>$3 -endef - -# NODISPが設定されていない時は、ログファイルを表示 -# 引数は、ログファイル -# 用例: $(call disp_test_log,file_log) -define disp_test_log - $(if $(NODISP),,$(CAT) $1) -endef - -# ファイル群から、ファイル名とファイルの内容を出力 -# 引数は、対象ファイル群、出力ファイル -# 用例: $(call report_files,list_file_target,file_out) -define report_files - $(call chk_file_ext,$2) - $(foreach tfile,$1,$(call report_file,$(tfile),$2)) -endef - -# ファイル名とファイルの内容を出力 -# 引数は、対象ファイル、出力ファイル -# 用例: $(call report_file,file_target,file_out) -define report_file - $(call chk_var_null,$1) - if test -s $1; then $(ECHO) "== $1 ==" >>$2; $(call echo_hr,$2); cat $1 >>$2; $(call echo_hr,$2); $(ECHO) >>$2; fi -endef - -define echo_hr - $(ECHO) "----------------------------------------------------------------------" >>$1 -endef diff --git a/doc/casl2lib/Makefile b/doc/casl2lib/Makefile deleted file mode 100644 index e22d03c..0000000 --- a/doc/casl2lib/Makefile +++ /dev/null @@ -1,52 +0,0 @@ -# autotest.mk > template > Group.mk -# テストグループのMakefile -# -# オペレーター -# make : すべてのテストを実施し、ログファイルを作成 -# make check : ↓ -# make create : TESTNAMEで指定されたテストを新規に作成 -# make set : すべてのテストの、想定結果を出力 -# make checkeach: すべてのテストを実施 -# make report : ログファイルから、テストの結果をレポート -# make clean : すべてのテストで、"make" で生成されたファイルをクリア -# make cleanall: すべてのテストで、"make" と "make set" で生成されたファイルをクリア - -SHELL = /bin/sh - -include Define.mk -include Define_group.mk - -.PHONY: check checkall time create clean cleantime - -check checkall: clean $(GROUP_REPORT_FILE) - @$(CAT) $(GROUP_REPORT_FILE) - -time: cleantime $(GROUP_TIME_FILE) - @$(CAT) $(GROUP_TIME_FILE) - -create: - @$(call create_dir,$(TEST)) - @$(call create_makefile,$(TEST)/$(MAKEFILE),$(TEST_MAKEFILES)) - -clean: - @$(call make_tests,$(TESTS),$@) - @$(RM) $(GROUP_RES_FILES) - -cleantime: - @$(call make_tests,$(TESTS),$@) - @$(RM) $(GROUP_TIME_FILE) - -$(GROUP_REPORT_FILE): $(GROUP_LOG_FILE) - @$(call group_report,$(GROUP),$^,$@) - -$(GROUP_LOG_FILE): $(TEST_LOG_FILES) - @$(call group_log,$^,$@) - -$(TEST_LOG_FILES): - @$(MAKE) $(MAKECMDGOALS) -sC $(dir $@) NODISP=1 - -$(GROUP_TIME_FILE): $(TEST_TIME_FILES) - @$(call group_log,$^,$@) - -$(TEST_TIME_FILES): - @$(MAKE) time -sC $(dir $@) diff --git a/doc/casl2lib/Makefile b/doc/casl2lib/Makefile new file mode 120000 index 0000000..c2ca8ea --- /dev/null +++ b/doc/casl2lib/Makefile @@ -0,0 +1 @@ +../../test/template/Group.mk \ No newline at end of file diff --git a/doc/casl2lib/Test.mk b/doc/casl2lib/Test.mk deleted file mode 100644 index edfa278..0000000 --- a/doc/casl2lib/Test.mk +++ /dev/null @@ -1,65 +0,0 @@ -# autotest.mk > test_template > Test.mk -# 自動テスト用のMakefile -# -# 要: Define.mk Define_test.mk -# -# オペレーター -# make : CMDの標準出力をTEST1_FILEに保存したあと、TEST0_FILEとの差分を比較し、結果をLOG_FILEに出力 -# make check : ↓ -# make set : CMDの標準出力をTEST0_FILEに保存。TEST0_FILEが存在する場合は実行しない -# make reset : CMDの標準出力をTEST0_FILEに保存。TEST0_FILEが存在する場合は上書き -# make time : CMDの実行にかかった時間をTIME_FILEに保存し、出力 -# make cleantime: "make time" で作成されたファイルをクリア -# make clean : "make" で作成されたファイルをクリア -# make cleanall: "make" と "make set" で作成されたファイルをクリア - -SHELL = /bin/sh - -# テスト名。カレントディレクトリー名から取得 -TEST = $(notdir $(CURRDIR)) - -.PHONY: check set reset time cleantime clean cleanall - -check: clean $(DETAIL_FILE) - @$(call disp_test_log,$(LOG_FILE)) - -checkall: check $(TIME_FILE) - @$(CAT) $(TIME_FILE) >>$(LOG_FILE) - @$(call disp_test_log,$(LOG_FILE)) - -set: $(TEST0_FILE) - @$(CAT) $^ - -reset: cleanall $(TEST0_FILE) - @$(CAT) $(TEST0_FILE) - -time: cleantime $(TIME_FILE) - -cleantime: - @$(RM) $(TIME_FILE) - -clean: - @$(RM) $(TEST_RES_FILES) - -cleanall: clean - @$(RM) $(TEST0_FILE) - -$(CMD_FILE): - @$(call chk_file_notext,$@) - @$(CHMOD) u+x $@ - -$(TEST0_FILE) $(TEST1_FILE): $(CMD_FILE) - @-$(call exec_cmd,$^,$@,$(ERR_FILE)) - -$(DIFF_FILE): $(TEST0_FILE) $(TEST1_FILE) - @$(call chk_file_notext,$(TEST0_FILE)) - @-$(call diff_files,$^,$@) - -$(LOG_FILE): $(DIFF_FILE) - @$(call test_log,$(TEST),$^,$@) - -$(DETAIL_FILE): $(LOG_FILE) - @$(call report_files,$(LOG_FILE) $(CMD_FILE) $(TEST0_FILE) $(ERR_FILE) $(DIFF_FILE) $(TEST1_FILE),$@) - -$(TIME_FILE): $(CMD_FILE) - @-$(call time_cmd,$(TEST),$^,$@) diff --git a/doc/casl2lib/Test.mk b/doc/casl2lib/Test.mk new file mode 120000 index 0000000..41e1cd8 --- /dev/null +++ b/doc/casl2lib/Test.mk @@ -0,0 +1 @@ +../../test/template/Test.mk \ No newline at end of file diff --git a/doc/casl2lib/abs/Makefile b/doc/casl2lib/abs/Makefile index e38b63c..b6dac59 100644 --- a/doc/casl2lib/abs/Makefile +++ b/doc/casl2lib/abs/Makefile @@ -1,3 +1,2 @@ include ../Define.mk -include ../Define_test.mk include ../Test.mk diff --git a/doc/casl2lib/addl32/Makefile b/doc/casl2lib/addl32/Makefile index e38b63c..b6dac59 100644 --- a/doc/casl2lib/addl32/Makefile +++ b/doc/casl2lib/addl32/Makefile @@ -1,3 +1,2 @@ include ../Define.mk -include ../Define_test.mk include ../Test.mk diff --git a/doc/casl2lib/addl32/cmd b/doc/casl2lib/addl32/cmd index ac6c38a..d6e4227 100755 --- a/doc/casl2lib/addl32/cmd +++ b/doc/casl2lib/addl32/cmd @@ -1,3 +1,3 @@ -PATH=../../../..:$PATH -CASL2LIBDIR=../../../../as/casl2lib -cat call_addl32.casl && casl2 call_addl32.casl $CASL2LIBDIR/addl32.casl $CASL2LIBDIR/outl.casl +PATH=../../..:$PATH +CASL2LIBDIR=../../../as/casl2lib +cat call_addl32.casl && casl2 call_addl32.casl $CASL2LIBDIR/addl32.casl $CASL2LIBDIR/divl.casl $CASL2LIBDIR/rev.casl $CASL2LIBDIR/outl.casl diff --git a/doc/casl2lib/diva/Makefile b/doc/casl2lib/diva/Makefile index e38b63c..b6dac59 100644 --- a/doc/casl2lib/diva/Makefile +++ b/doc/casl2lib/diva/Makefile @@ -1,3 +1,2 @@ include ../Define.mk -include ../Define_test.mk include ../Test.mk diff --git a/doc/casl2lib/divl/Makefile b/doc/casl2lib/divl/Makefile index e38b63c..b6dac59 100644 --- a/doc/casl2lib/divl/Makefile +++ b/doc/casl2lib/divl/Makefile @@ -1,3 +1,2 @@ include ../Define.mk -include ../Define_test.mk include ../Test.mk diff --git a/doc/casl2lib/inl/0.txt b/doc/casl2lib/inl/0.txt index a3de2d7..0a54b97 100644 --- a/doc/casl2lib/inl/0.txt +++ b/doc/casl2lib/inl/0.txt @@ -8,7 +8,7 @@ 65535 Over 65535 Over 65535 -Not A Number -Not A Number +Not integer +Not integer 12345 Str too long. Stop diff --git a/doc/casl2lib/inl/Makefile b/doc/casl2lib/inl/Makefile index e38b63c..b6dac59 100644 --- a/doc/casl2lib/inl/Makefile +++ b/doc/casl2lib/inl/Makefile @@ -1,3 +1,2 @@ include ../Define.mk -include ../Define_test.mk include ../Test.mk diff --git a/doc/yacasl2.html b/doc/yacasl2.html index 5617de3..fa71d23 100644 --- a/doc/yacasl2.html +++ b/doc/yacasl2.html @@ -1399,7 +1399,7 @@ Up: CASL2LIB Manual

次のコマンドを実行すると、数値の入力が受け付けられ、入力された数値が表示される。 

;;; casl2 -M1024 call_inl.casl $CASL2LIB/inl.casl $CASL2LIB/str2l.casl  $CASL2LIB/mull.casl \
-;;;              $CASL2LIB/outl.casl $CASL2LIB/divl.casl $CASL2LIB/rev.casl
+;;; $CASL2LIB/outl.casl $CASL2LIB/divl.casl $CASL2LIB/rev.casl
 MAIN    START
 LOOP    CALL    INL             ; GR1に数値、GR0に文字列の長さ
         JOV     OV
-- 
2.18.0