diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2013-12-23 21:53:37 +0200 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2013-12-23 21:53:37 +0200 |
| commit | 9beee977ccb0703656504c070ab85e54537f8f95 (patch) | |
| tree | 0dd1636d79223b91b23fd43cba0581fea63e295d /vms/vms_cli.c | |
| parent | d3e8016ffd4de45fb8ea5a76a1aa2048f3facaa9 (diff) | |
| download | egawk-9beee977ccb0703656504c070ab85e54537f8f95.tar.gz egawk-9beee977ccb0703656504c070ab85e54537f8f95.tar.bz2 egawk-9beee977ccb0703656504c070ab85e54537f8f95.zip | |
More doc updates, fix initialization on VAX/VMS.
Diffstat (limited to 'vms/vms_cli.c')
| -rw-r--r-- | vms/vms_cli.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/vms/vms_cli.c b/vms/vms_cli.c index 0cfe96fc..aa093441 100644 --- a/vms/vms_cli.c +++ b/vms/vms_cli.c @@ -34,7 +34,7 @@ extern U_Long CLI$GET_VALUE(const Dsc *, Dsc *, short *); extern U_Long CLI$DCL_PARSE(const Dsc *, const void *, ...); extern U_Long SYS$CLI(void *, ...); extern U_Long SYS$FILESCAN(const Dsc *, void *, long *); -extern void *lib$establish(U_Long (*handler)(void *, void *)); +extern void *LIB$ESTABLISH(U_Long (*handler)(void *, void *)); extern U_Long LIB$SIG_TO_RET(void *, void *); /* condition handler */ /* Cli_Present() - call CLI$PRESENT to determine whether a parameter or */ @@ -43,7 +43,7 @@ U_Long Cli_Present( const char *item ) { Dsc item_dsc; - (void)lib$establish(LIB$SIG_TO_RET); + (void)LIB$ESTABLISH(LIB$SIG_TO_RET); item_dsc.len = strlen(item_dsc.adr = (char *)item); return CLI$PRESENT(&item_dsc); @@ -57,7 +57,7 @@ Cli_Get_Value( const char *item, char *result, int size ) Dsc item_dsc, res_dsc; U_Long sts; short len = 0; - (void)lib$establish(LIB$SIG_TO_RET); + (void)LIB$ESTABLISH(LIB$SIG_TO_RET); item_dsc.len = strlen(item_dsc.adr = (char *)item); res_dsc.len = size, res_dsc.adr = result; @@ -79,7 +79,7 @@ Cli_Parse_Command( const void *cmd_tables, const char *cmd_verb ) U_Long sts; int ltmp; char longbuf[8200]; - (void)lib$establish(LIB$SIG_TO_RET); + (void)LIB$ESTABLISH(LIB$SIG_TO_RET); memset(&cmd, 0, sizeof cmd); cmd.rqtype = CLI$K_GETCMD; /* command line minus the verb */ |