changeset 184:4bf42b2df5d7

function extrn1
author kono
date Sun, 30 Nov 2003 23:56:21 +0900
parents 1d80ad165831
children 427008a06333
files mc-parse.c
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/mc-parse.c	Sun Nov 30 23:30:14 2003 +0900
+++ b/mc-parse.c	Sun Nov 30 23:56:21 2003 +0900
@@ -2533,6 +2533,7 @@
 	case EMPTY:
 	    if(getsym(0)==LPAR) {
 		type= glist3(FUNCTION,INT,0);
+                nptr->sc = EXTRN1;
 		nptr->ty= type;
 		e1=expr15(list2(FNAME,(int)nptr));
 		break;