File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change 5858static char * lt_dlerror (void );
5959void init_call_stack_list (void );
6060struct call_stack_list
61- cob_create_call_stack_list (const char * );
61+ cob_create_call_stack_list (const char * );
6262void cob_cancel_call_stack_list (struct call_stack_list * );
6363
6464static HMODULE
@@ -698,7 +698,7 @@ coblongjmp (struct cobjmp_buf *jbuf)
698698}
699699
700700void
701- init_call_stack_list ()
701+ init_call_stack_list ()
702702{
703703 if (!call_stack_list_head ) {
704704 call_stack_list_head = cob_malloc (sizeof (struct call_stack_list ));
@@ -713,7 +713,7 @@ cob_create_call_stack_list (char *name)
713713 struct call_stack_list * new_list = cob_malloc (sizeof (struct call_stack_list ));
714714 memset (new_list , 0 , sizeof (struct call_stack_list ));
715715 new_list -> parent = current_call_stack_list ;
716- new_list -> name = cob_malloc (strlen (name ) + 1 );
716+ new_list -> name = cob_malloc (strlen (name ) + 1 );
717717 strcpy (new_list -> name , name );
718718 current_call_stack_list = new_list ;
719719 return new_list ;
@@ -782,7 +782,7 @@ cob_cancel_call_stack_list (struct call_stack_list *p)
782782}
783783
784784void
785- cob_cancel_all ()
785+ cob_cancel_all ()
786786{
787787 if (!current_call_stack_list ) {
788788 cob_runtime_error ("Call to 'cob_cancel_all' current stack is NULL" );
Original file line number Diff line number Diff line change @@ -36,7 +36,7 @@ struct call_stack_list {
3636 struct call_stack_list * parent ;
3737 struct call_stack_list * children ;
3838 struct call_stack_list * sister ;
39- const char * name ;
39+ const char * name ;
4040};
4141
4242DECLNORET COB_EXPIMP void cob_call_error (void ) COB_A_NORETURN ;
You can’t perform that action at this time.
0 commit comments