X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=m4%2Fpsi%2Fpsi_const.m4;h=6210ef9ec0f7f6d7a62394756f77784e61a7ecd4;hp=6c3cf6b28be665eaf28828e22461700a590d8fc0;hb=4368a446f8afc498138c9336b5d3cd86625f09ad;hpb=c9b3436bd51a4dcf7d6cc6817d4c7a8ad99538d4

diff --git a/m4/psi/psi_const.m4 b/m4/psi/psi_const.m4
index 6c3cf6b..6210ef9 100644
--- a/m4/psi/psi_const.m4
+++ b/m4/psi/psi_const.m4
@@ -1,19 +1,15 @@
 # psi_add_str_const(name, value)
-# Add a pre-defined string constant to $PSI_CONSTS
+# Add a pre-defined string constant to $PSI_CONSTS_H
 psi_add_str_const() {
-	grep -q "\"psi\\\\\\\\$1\"" $PSI_CONSTS \
-		|| cat >>$PSI_CONSTS <<EOF
-	{PSI_T_STRING, "string", "psi\\\\$1", $2, PSI_T_QUOTED_STRING},
-EOF
+	PSI_CONSTS="$PSI_CONSTS
+	{PSI_T_STRING, \"string\", \"psi\\\\$1\", $2, PSI_T_QUOTED_STRING},"
 }
 
 # psi_add_int_const(name, value)
-# Add a pre-defined int constant to $PSI_CONSTS
+# Add a pre-defined int constant to $PSI_CONSTS_H
 psi_add_int_const() {
-	grep -q "\"psi\\\\\\\\$1\"" $PSI_CONSTS \
-		|| cat >>$PSI_CONSTS <<EOF
-	{PSI_T_INT, "int", "psi\\\\$1", "$2", PSI_T_NUMBER}, 
-EOF
+	PSI_CONSTS="$PSI_CONSTS
+	{PSI_T_INT, \"int\", \"psi\\\\$1\", \"$2\", PSI_T_NUMBER},"
 }
 
 dnl PSI_CONST(const name, type)