• R/O
  • SSH
  • HTTPS

jpl: Commit


Commit MetaInfo

Revision479 (tree)
Time2019-03-09 11:54:50
Authorjakobthomsen

Log Message

deacitvate number-labels

Change Summary

Incremental Difference

--- trunk/experimental2/compiler.compiled.c (revision 478)
+++ trunk/experimental2/compiler.compiled.c (revision 479)
@@ -820,12 +820,12 @@
820820 break;
821821 }
822822 printf(" case ");
823- if(isdigit(ungetc(getchar(), stdin)))
824- {
825- while(isdigit(ungetc(getchar(), stdin)))
826- putchar(getchar()); // echo label
827- }
828- else
823+ //if(isdigit(ungetc(getchar(), stdin)))
824+ //{
825+ // while(isdigit(ungetc(getchar(), stdin)))
826+ // putchar(getchar()); // echo label
827+ //}
828+ //else
829829 if(isalpha(ungetc(getchar(), stdin)))
830830 {
831831 printf("/*");
@@ -876,22 +876,22 @@
876876 printf(" stack_push(&callstack, result);\n");
877877 break;
878878 }
879- else if(isdigit(c))
880- {
881- uint64_t dest = --tmpaddr;
882- printf("memory[tuple2_access0(state)].value = %lldLL;\n", (long long)dest); // use negative to display numbers concisely
883- printf(" stack_push(&callstack, state);\n");
884- printf(" state = tuple2_alloc(%c", c);
885- while(isdigit(ungetc(getchar(), stdin))) putchar(getchar()); // echo label
886- printf(", 0);\n");
887- printf(" result = 0;\n");
888- printf(" break;\n");
889- printf(" }\n");
890- //printf(" case %lluLLU:\n", (unsigned long long)--tmpaddr);
891- printf(" case %lldLL:\n", (long long)dest); // use negative to display numbers concisely
892- printf(" {\n");
893- printf(" result = stack_pop(&callstack);\n");
894- }
879+ //else if(isdigit(c))
880+ //{
881+ // uint64_t dest = --tmpaddr;
882+ // printf("memory[tuple2_access0(state)].value = %lldLL;\n", (long long)dest); // use negative to display numbers concisely
883+ // printf(" stack_push(&callstack, state);\n");
884+ // printf(" state = tuple2_alloc(%c", c);
885+ // while(isdigit(ungetc(getchar(), stdin))) putchar(getchar()); // echo label
886+ // printf(", 0);\n");
887+ // printf(" result = 0;\n");
888+ // printf(" break;\n");
889+ // printf(" }\n");
890+ // //printf(" case %lluLLU:\n", (unsigned long long)--tmpaddr);
891+ // printf(" case %lldLL:\n", (long long)dest); // use negative to display numbers concisely
892+ // printf(" {\n");
893+ // printf(" result = stack_pop(&callstack);\n");
894+ //}
895895 else if(isalpha(c))
896896 {
897897 printf("/*");
--- trunk/experimental2/compiler.source.c (revision 478)
+++ trunk/experimental2/compiler.source.c (revision 479)
@@ -430,12 +430,12 @@
430430 break;
431431 }
432432 printf(" case ");
433- if(isdigit(ungetc(getchar(), stdin)))
434- {
435- while(isdigit(ungetc(getchar(), stdin)))
436- putchar(getchar()); // echo label
437- }
438- else
433+ //if(isdigit(ungetc(getchar(), stdin)))
434+ //{
435+ // while(isdigit(ungetc(getchar(), stdin)))
436+ // putchar(getchar()); // echo label
437+ //}
438+ //else
439439 if(isalpha(ungetc(getchar(), stdin)))
440440 {
441441 printf("/*");
@@ -486,22 +486,22 @@
486486 printf(" stack_push(&callstack, result);\n");
487487 break;
488488 }
489- else if(isdigit(c))
490- {
491- uint64_t dest = --tmpaddr;
492- printf("memory[tuple2_access0(state)].value = %lldLL;\n", (long long)dest); // use negative to display numbers concisely
493- printf(" stack_push(&callstack, state);\n");
494- printf(" state = tuple2_alloc(%c", c);
495- while(isdigit(ungetc(getchar(), stdin))) putchar(getchar()); // echo label
496- printf(", 0);\n");
497- printf(" result = 0;\n");
498- printf(" break;\n");
499- printf(" }\n");
500- //printf(" case %lluLLU:\n", (unsigned long long)--tmpaddr);
501- printf(" case %lldLL:\n", (long long)dest); // use negative to display numbers concisely
502- printf(" {\n");
503- printf(" result = stack_pop(&callstack);\n");
504- }
489+ //else if(isdigit(c))
490+ //{
491+ // uint64_t dest = --tmpaddr;
492+ // printf("memory[tuple2_access0(state)].value = %lldLL;\n", (long long)dest); // use negative to display numbers concisely
493+ // printf(" stack_push(&callstack, state);\n");
494+ // printf(" state = tuple2_alloc(%c", c);
495+ // while(isdigit(ungetc(getchar(), stdin))) putchar(getchar()); // echo label
496+ // printf(", 0);\n");
497+ // printf(" result = 0;\n");
498+ // printf(" break;\n");
499+ // printf(" }\n");
500+ // //printf(" case %lluLLU:\n", (unsigned long long)--tmpaddr);
501+ // printf(" case %lldLL:\n", (long long)dest); // use negative to display numbers concisely
502+ // printf(" {\n");
503+ // printf(" result = stack_pop(&callstack);\n");
504+ //}
505505 else if(isalpha(c))
506506 {
507507 printf("/*");
Show on old repository browser