Lines Matching +full:1 +full:d
35 static int dumping=1; /* dump bytecodes? */
81 for (i=1; i<argc; i++) in doargs()
98 if (output==NULL || *output==0 || (*output=='-' && output[1]!=0)) in doargs()
105 stripping=1; in doargs()
119 if (version==argc-1) exit(EXIT_SUCCESS); in doargs()
131 *size=sizeof(FUNCTION)-1; in reader()
145 if (n==1) in combine()
146 return toproto(L,-1); in combine()
151 if (lua_load(L,reader,&i,"=(" PROGNAME ")",NULL)!=LUA_OK) fatal(lua_tostring(L,-1)); in combine()
152 f=toproto(L,-1); in combine()
155 f->p[i]=toproto(L,i-n-1); in combine()
165 return (fwrite(p,size,1,(FILE*)u)!=1) && (size!=0); in writer()
170 int argc=(int)lua_tointeger(L,1); in pmain()
179 if (luaL_loadfile(L,filename)!=LUA_OK) fatal(lua_tostring(L,-1)); in pmain()
182 if (listing) luaU_print(f,listing>1); in pmain()
185 FILE* D= (output==NULL) ? stdout : fopen(output,"wb"); in pmain() local
186 if (D==NULL) cannot("open"); in pmain()
188 luaU_dump(L,f,writer,D,stripping); in pmain()
190 if (ferror(D)) cannot("write"); in pmain()
191 if (fclose(D)) cannot("close"); in pmain()
207 if (lua_pcall(L,2,0,0)!=LUA_OK) fatal(lua_tostring(L,-1)); in main()
258 if (isprint(c)) printf("%c",c); else printf("\\%03d",c); in PrintString()
288 printf("?%d",ttypetag(o)); in PrintType()
324 printf("?%d",ttypetag(o)); in PrintConstant()
330 #define EXTRAARG GETARG_Ax(code[pc+1])
331 #define EXTRAARGC (EXTRAARG*(MAXARG_C+1))
352 printf("\t%d\t",pc+1); in PrintCode()
353 if (line>0) printf("[%d]\t",line); else printf("[-]\t"); in PrintCode()
358 printf("%d %d",a,b); in PrintCode()
361 printf("%d %d",a,sbx); in PrintCode()
364 printf("%d %d",a,sbx); in PrintCode()
367 printf("%d %d",a,bx); in PrintCode()
371 printf("%d",a); in PrintCode()
375 printf("%d",a); in PrintCode()
378 printf("%d",a); in PrintCode()
381 printf("%d",a); in PrintCode()
384 printf("%d %d",a,b); in PrintCode()
385 printf(COMMENT "%d out",b+1); in PrintCode()
388 printf("%d %d",a,b); in PrintCode()
392 printf("%d %d",a,b); in PrintCode()
396 printf("%d %d %d",a,b,c); in PrintCode()
401 printf("%d %d %d",a,b,c); in PrintCode()
404 printf("%d %d %d",a,b,c); in PrintCode()
407 printf("%d %d %d",a,b,c); in PrintCode()
411 printf("%d %d %d%s",a,b,c,ISK); in PrintCode()
417 printf("%d %d %d%s",a,b,c,ISK); in PrintCode()
421 printf("%d %d %d%s",a,b,c,ISK); in PrintCode()
425 printf("%d %d %d%s",a,b,c,ISK); in PrintCode()
430 printf("%d %d %d",a,b,c); in PrintCode()
431 printf(COMMENT "%d",c+EXTRAARGC); in PrintCode()
434 printf("%d %d %d%s",a,b,c,ISK); in PrintCode()
438 printf("%d %d %d",a,b,sc); in PrintCode()
441 printf("%d %d %d",a,b,c); in PrintCode()
445 printf("%d %d %d",a,b,c); in PrintCode()
449 printf("%d %d %d",a,b,c); in PrintCode()
453 printf("%d %d %d",a,b,c); in PrintCode()
457 printf("%d %d %d",a,b,c); in PrintCode()
461 printf("%d %d %d",a,b,c); in PrintCode()
465 printf("%d %d %d",a,b,c); in PrintCode()
469 printf("%d %d %d",a,b,c); in PrintCode()
473 printf("%d %d %d",a,b,c); in PrintCode()
477 printf("%d %d %d",a,b,c); in PrintCode()
481 printf("%d %d %d",a,b,sc); in PrintCode()
484 printf("%d %d %d",a,b,sc); in PrintCode()
487 printf("%d %d %d",a,b,c); in PrintCode()
490 printf("%d %d %d",a,b,c); in PrintCode()
493 printf("%d %d %d",a,b,c); in PrintCode()
496 printf("%d %d %d",a,b,c); in PrintCode()
499 printf("%d %d %d",a,b,c); in PrintCode()
502 printf("%d %d %d",a,b,c); in PrintCode()
505 printf("%d %d %d",a,b,c); in PrintCode()
508 printf("%d %d %d",a,b,c); in PrintCode()
511 printf("%d %d %d",a,b,c); in PrintCode()
514 printf("%d %d %d",a,b,c); in PrintCode()
517 printf("%d %d %d",a,b,c); in PrintCode()
520 printf("%d %d %d",a,b,c); in PrintCode()
523 printf("%d %d %d",a,b,c); in PrintCode()
527 printf("%d %d %d %d",a,sb,c,isk); in PrintCode()
532 printf("%d %d %d %d",a,b,c,isk); in PrintCode()
537 printf("%d %d",a,b); in PrintCode()
540 printf("%d %d",a,b); in PrintCode()
543 printf("%d %d",a,b); in PrintCode()
546 printf("%d %d",a,b); in PrintCode()
549 printf("%d %d",a,b); in PrintCode()
552 printf("%d",a); in PrintCode()
555 printf("%d",a); in PrintCode()
558 printf("%d",GETARG_sJ(i)); in PrintCode()
559 printf(COMMENT "to %d",GETARG_sJ(i)+pc+2); in PrintCode()
562 printf("%d %d %d",a,b,isk); in PrintCode()
565 printf("%d %d %d",a,b,isk); in PrintCode()
568 printf("%d %d %d",a,b,isk); in PrintCode()
571 printf("%d %d %d",a,b,isk); in PrintCode()
575 printf("%d %d %d",a,sb,isk); in PrintCode()
578 printf("%d %d %d",a,sb,isk); in PrintCode()
581 printf("%d %d %d",a,sb,isk); in PrintCode()
584 printf("%d %d %d",a,sb,isk); in PrintCode()
587 printf("%d %d %d",a,sb,isk); in PrintCode()
590 printf("%d %d",a,isk); in PrintCode()
593 printf("%d %d %d",a,b,isk); in PrintCode()
596 printf("%d %d %d",a,b,c); in PrintCode()
598 if (b==0) printf("all in "); else printf("%d in ",b-1); in PrintCode()
599 if (c==0) printf("all out"); else printf("%d out",c-1); in PrintCode()
602 printf("%d %d %d%s",a,b,c,ISK); in PrintCode()
603 printf(COMMENT "%d in",b-1); in PrintCode()
606 printf("%d %d %d%s",a,b,c,ISK); in PrintCode()
608 if (b==0) printf("all out"); else printf("%d out",b-1); in PrintCode()
613 printf("%d",a); in PrintCode()
616 printf("%d %d",a,bx); in PrintCode()
617 printf(COMMENT "to %d",pc-bx+2); in PrintCode()
620 printf("%d %d",a,bx); in PrintCode()
621 printf(COMMENT "exit to %d",pc+bx+3); in PrintCode()
624 printf("%d %d",a,bx); in PrintCode()
625 printf(COMMENT "to %d",pc+bx+2); in PrintCode()
628 printf("%d %d",a,c); in PrintCode()
631 printf("%d %d",a,bx); in PrintCode()
632 printf(COMMENT "to %d",pc-bx+2); in PrintCode()
635 printf("%d %d %d",a,b,c); in PrintCode()
636 if (isk) printf(COMMENT "%d",c+EXTRAARGC); in PrintCode()
639 printf("%d %d",a,bx); in PrintCode()
643 printf("%d %d",a,c); in PrintCode()
645 if (c==0) printf("all out"); else printf("%d out",c-1); in PrintCode()
648 printf("%d",a); in PrintCode()
651 printf("%d",ax); in PrintCode()
655 printf("%d %d %d",a,b,c); in PrintCode()
665 #define SS(x) ((x==1)?"":"s")
677 printf("\n%s <%s:%d,%d> (%d instruction%s at %p)\n", in PrintHeader()
681 printf("%d%s param%s, %d slot%s, %d upvalue%s, ", in PrintHeader()
684 printf("%d local%s, %d constant%s, %d function%s\n", in PrintHeader()
692 printf("constants (%d) for %p:\n",n,VOID(f)); in PrintDebug()
695 printf("\t%d\t",i); in PrintDebug()
701 printf("locals (%d) for %p:\n",n,VOID(f)); in PrintDebug()
704 printf("\t%d\t%s\t%d\t%d\n", in PrintDebug()
705 i,getstr(f->locvars[i].varname),f->locvars[i].startpc+1,f->locvars[i].endpc+1); in PrintDebug()
708 printf("upvalues (%d) for %p:\n",n,VOID(f)); in PrintDebug()
711 printf("\t%d\t%s\t%d\t%d\n", in PrintDebug()