Commit 9e4282a3 authored by Jérôme Abel's avatar Jérôme Abel

fix: [mem] add file even if it is not exist

parent a02db3e8
......@@ -199,7 +199,7 @@
#X restore 194 140 pd \$0-AUTO-GUI;
#X obj 258 8 initbang;
#X msg 258 65 auto-max 1;
#N canvas 185 79 1035 638 \$0-PROCESSING 0;
#N canvas 45 81 1165 644 \$0-PROCESSING 0;
#X obj 177 316 text define \$0-mem;
#X obj 24 531 text get \$0-mem;
#X obj 150 488 text size \$0-mem;
......@@ -260,40 +260,47 @@
#X obj 183 217 t a b;
#X obj 706 34 r \$1-file, f 10;
#X obj 706 176 stat;
#X obj 854 405 s \$0-file-ok;
#X obj 981 408 s \$0-file-ok;
#X msg 792 110 set \$1;
#X obj 792 86 makefilename %%s/%s;
#X obj 706 200 symbol;
#X obj 706 152 t a a;
#X obj 706 128 makefilename;
#X obj 706 87 path relative;
#X obj 806 218 symbol;
#X obj 806 362 stat;
#X msg 892 296 set \$1;
#X obj 892 272 makefilename %%s/%s;
#X obj 800 410 symbol;
#X obj 806 338 t a a;
#X obj 806 243 t b a;
#X obj 806 314 makefilename;
#X obj 806 194 b;
#X obj 806 273 path current;
#X msg 854 380 0;
#X obj 826 218 symbol;
#X obj 826 362 stat;
#X msg 912 296 set \$1;
#X obj 912 272 makefilename %%s/%s;
#X obj 820 410 symbol;
#X obj 826 338 t a a;
#X obj 826 243 t b a;
#X obj 826 314 makefilename;
#X obj 826 194 b;
#X obj 826 273 path current;
#X msg 981 383 0;
#X text 706 11 Check relative file first;
#X obj 715 244 s \$0-file-read;
#X obj 706 273 s \$0-file-write;
#X obj 800 434 s \$0-file-read;
#X text 853 227 Check current file;
#X obj 820 434 s \$0-file-read;
#X text 873 227 Check current file;
#X obj 706 57 t b a;
#X obj 839 194 r \$1-file, f 10;
#X obj 859 194 r \$1-file, f 10;
#X obj 700 435 s \$0-file-write;
#X obj 700 412 symbol;
#X obj 773 384 t b b;
#X obj 793 384 t b b;
#X text 793 49 path relative: project folder \; path current: abs folder
;
#X obj 779 144 r \$1-restore;
#X obj 779 168 t b b;
#X obj 818 169 s \$1-update;
#X text 866 142 Restore file;
#X obj 799 144 r \$1-restore;
#X obj 799 168 t b b;
#X obj 838 169 s \$1-update;
#X text 886 142 Restore file;
#X obj 954 492 s \$0-file-read;
#X obj 921 517 s \$0-file-write;
#X obj 921 491 path;
#X obj 921 464 symbol;
#X obj 954 440 r \$1-file, f 10;
#X obj 922 377 t b b;
#X text 916 354 if file is new;
#X connect 1 0 4 0;
#X connect 1 0 33 0;
#X connect 2 0 5 0;
......@@ -370,7 +377,7 @@
#X connect 66 0 65 0;
#X connect 67 0 73 0;
#X connect 68 0 87 0;
#X connect 68 1 77 0;
#X connect 68 1 98 0;
#X connect 69 0 74 0;
#X connect 70 0 69 0;
#X connect 71 0 81 0;
......@@ -391,6 +398,12 @@
#X connect 89 0 90 0;
#X connect 90 0 91 0;
#X connect 90 1 75 0;
#X connect 95 0 93 0;
#X connect 95 0 94 0;
#X connect 96 0 95 0;
#X connect 97 0 96 1;
#X connect 98 0 96 0;
#X connect 98 1 77 0;
#X restore 40 100 pd \$0-PROCESSING;
#X obj 344 50 s \$0-lb-i;
#X connect 0 0 3 0;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment