90 static void LoadCode(LoadState* S, Proto* f)  in LoadCode()  argument
93  f->code=luaM_newvector(S->L,n,Instruction);  in LoadCode()
94  f->sizecode=n;  in LoadCode()
95  LoadVector(S,f->code,n,sizeof(Instruction));  in LoadCode()
100 static void LoadConstants(LoadState* S, Proto* f)  in LoadConstants()  argument
104  f->k=luaM_newvector(S->L,n,TValue);  in LoadConstants()
105  f->sizek=n;  in LoadConstants()
106  for (i=0; i<n; i++) setnilvalue(&f->k[i]);  in LoadConstants()
109   TValue* o=&f->k[i];  in LoadConstants()
131  f->p=luaM_newvector(S->L,n,Proto*);  in LoadConstants()
132  f->sizep=n;  in LoadConstants()
133  for (i=0; i<n; i++) f->p[i]=NULL;  in LoadConstants()
134  for (i=0; i<n; i++) f->p[i]=LoadFunction(S,f->source);  in LoadConstants()
137 static void LoadDebug(LoadState* S, Proto* f)  in LoadDebug()  argument
141  f->lineinfo=luaM_newvector(S->L,n,int);  in LoadDebug()
142  f->sizelineinfo=n;  in LoadDebug()
143  LoadVector(S,f->lineinfo,n,sizeof(int));  in LoadDebug()
145  f->locvars=luaM_newvector(S->L,n,LocVar);  in LoadDebug()
146  f->sizelocvars=n;  in LoadDebug()
147  for (i=0; i<n; i++) f->locvars[i].varname=NULL;  in LoadDebug()
150   f->locvars[i].varname=LoadString(S);  in LoadDebug()
151   f->locvars[i].startpc=LoadInt(S);  in LoadDebug()
152   f->locvars[i].endpc=LoadInt(S);  in LoadDebug()
155  f->upvalues=luaM_newvector(S->L,n,TString*);  in LoadDebug()
156  f->sizeupvalues=n;  in LoadDebug()
157  for (i=0; i<n; i++) f->upvalues[i]=NULL;  in LoadDebug()
158  for (i=0; i<n; i++) f->upvalues[i]=LoadString(S);  in LoadDebug()
163  Proto* f;  in LoadFunction()  local
165  f=luaF_newproto(S->L);  in LoadFunction()
166  setptvalue2s(S->L,S->L->top,f); incr_top(S->L);  in LoadFunction()
167  f->source=LoadString(S); if (f->source==NULL) f->source=p;  in LoadFunction()
168  f->linedefined=LoadInt(S);  in LoadFunction()
169  f->lastlinedefined=LoadInt(S);  in LoadFunction()
170  f->nups=LoadByte(S);  in LoadFunction()
171  f->numparams=LoadByte(S);  in LoadFunction()
172  f->is_vararg=LoadByte(S);  in LoadFunction()
173  f->maxstacksize=LoadByte(S);  in LoadFunction()
174  LoadCode(S,f);  in LoadFunction()
175  LoadConstants(S,f);  in LoadFunction()
176  LoadDebug(S,f);  in LoadFunction()
177  IF (!luaG_checkcode(f), "bad code");  in LoadFunction()
180  return f;  in LoadFunction()