diff options
Diffstat (limited to 'src/test')
-rw-r--r-- | src/test/regress/expected/euc_jp.out | 32 | ||||
-rwxr-xr-x | src/test/regress/regress.sh | 4 | ||||
-rw-r--r-- | src/test/regress/sql/euc_jp.sql | 4 |
3 files changed, 38 insertions, 2 deletions
diff --git a/src/test/regress/expected/euc_jp.out b/src/test/regress/expected/euc_jp.out index c710392738f..f976010e76b 100644 --- a/src/test/regress/expected/euc_jp.out +++ b/src/test/regress/expected/euc_jp.out @@ -53,3 +53,35 @@ QUERY: select * from 計算機用語 where 用語 ~* 'コンピュータ[デグ]'; コンピュータグラフィックス|分B10中 | (2 rows) +QUERY: select *,character_length(用語) from 計算機用語; +用語 |分類コード|備考1aだよ|length +--------------------------+----------+----------+------ +コンピュータディスプレイ |機A01上 | | 12 +コンピュータグラフィックス|分B10中 | | 13 +コンピュータプログラマー |人Z01下 | | 12 +(3 rows) + +QUERY: select *,octet_length(用語) from 計算機用語; +用語 |分類コード|備考1aだよ|octet_length +--------------------------+----------+----------+------------ +コンピュータディスプレイ |機A01上 | | 24 +コンピュータグラフィックス|分B10中 | | 26 +コンピュータプログラマー |人Z01下 | | 24 +(3 rows) + +QUERY: select *,position('デ' in 用語) from 計算機用語; +用語 |分類コード|備考1aだよ|strpos +--------------------------+----------+----------+------ +コンピュータディスプレイ |機A01上 | | 7 +コンピュータグラフィックス|分B10中 | | 0 +コンピュータプログラマー |人Z01下 | | 0 +(3 rows) + +QUERY: select *,substring(用語 from 10 for 4) from 計算機用語; +用語 |分類コード|備考1aだよ|substr +--------------------------+----------+----------+-------- +コンピュータディスプレイ |機A01上 | |プレイ +コンピュータグラフィックス|分B10中 | |ィックス +コンピュータプログラマー |人Z01下 | |ラマー +(3 rows) + diff --git a/src/test/regress/regress.sh b/src/test/regress/regress.sh index f12b431e31b..caa40033b80 100755 --- a/src/test/regress/regress.sh +++ b/src/test/regress/regress.sh @@ -1,5 +1,5 @@ #!/bin/sh -# $Header: /cvsroot/pgsql/src/test/regress/Attic/regress.sh,v 1.18 1998/03/15 07:39:04 scrappy Exp $ +# $Header: /cvsroot/pgsql/src/test/regress/Attic/regress.sh,v 1.19 1998/04/27 17:10:17 scrappy Exp $ # if echo '\c' | grep -s c >/dev/null 2>&1 then @@ -43,7 +43,7 @@ fi echo "=============== running regression queries... =================" echo "" > regression.diffs if [ a$MB != a ];then - mbtests=`echo $MB|tr A-Z a-z` + mbtests=`echo $MB|tr "[A-Z]" "[a-z]"` else mbtests="" fi diff --git a/src/test/regress/sql/euc_jp.sql b/src/test/regress/sql/euc_jp.sql index 8cba58055d5..2021205bf45 100644 --- a/src/test/regress/sql/euc_jp.sql +++ b/src/test/regress/sql/euc_jp.sql @@ -13,3 +13,7 @@ select * from 計算機用語 where 分類コード like '_Z01_'; select * from 計算機用語 where 分類コード like '_Z%'; select * from 計算機用語 where 用語 ~ 'コンピュータ[デグ]'; select * from 計算機用語 where 用語 ~* 'コンピュータ[デグ]'; +select *,character_length(用語) from 計算機用語; +select *,octet_length(用語) from 計算機用語; +select *,position('デ' in 用語) from 計算機用語; +select *,substring(用語 from 10 for 4) from 計算機用語; |