projects
/
m6w6
/
ext-psi
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
|
github
raw
|
inline
| side by side
expand let marshal's parameters
[m6w6/ext-psi]
/
m4
/
psi_decl.m4
diff --git
a/m4/psi_decl.m4
b/m4/psi_decl.m4
index 6a0ef809916b256dd99e8f7e8cfeedd93c7d2014..540b48f2662ce977bbfd03a1321903e440a4dca7 100644
(file)
--- a/
m4/psi_decl.m4
+++ b/
m4/psi_decl.m4
@@
-10,6
+10,11
@@
EOF
# Add a pre-defined decl to $PSI_VA_DECLS/$PSI_DECLS.
psi_add_decl() {
case "$2" in
# Add a pre-defined decl to $PSI_VA_DECLS/$PSI_DECLS.
psi_add_decl() {
case "$2" in
+ *functor*)
+ cat >>$PSI_FN_DECLS <<EOF
+ $1, {0},
+EOF
+ ;;
*vararg*)
cat >>$PSI_VA_DECLS <<EOF
$1, {0},
*vararg*)
cat >>$PSI_VA_DECLS <<EOF
$1, {0},
@@
-23,6
+28,12
@@
EOF
esac
}
esac
}
+dnl PSI_DECL_TYPE(type functor_name, args)
+dnl Adds a pre-defined functor decl to $PSI_FN_DECLS.
+AC_DEFUN(PSI_DECL_TYPE, [
+ PSI_DECL_ARGS($1, $2)
+ psi_add_decl "$psi_decl_args" functor
+])
dnl PSI_REDIR(name, custom symbol)
dnl Create a function redirection to an optional custom symbol.
AC_DEFUN(PSI_REDIR, [
dnl PSI_REDIR(name, custom symbol)
dnl Create a function redirection to an optional custom symbol.
AC_DEFUN(PSI_REDIR, [
@@
-97,8
+108,9
@@
AC_DEFUN(PSI_DECL, [
])
])
;;
])
])
;;
- "*")
- PSI_REDIR($psi_symbol, $psi_symbol_redirect)
+ *)
+ PSI_REDIR($psi_symbol)
+ psi_add_decl "$psi_decl_args" $3
;;
esac
])
;;
esac
])