Skip to content

Commit 98b5285

Browse files
committedJul 23, 2016
Clean up some warnings
Eclipse project files were added to the .gitignore Signed-off-by: Jadon Fowler <jadonflower@gmail.com>
1 parent 71b8bbf commit 98b5285

File tree

2 files changed

+8
-2
lines changed

2 files changed

+8
-2
lines changed
 

‎.gitignore

+4
Original file line numberDiff line numberDiff line change
@@ -21,3 +21,7 @@ o
2121
otest
2222
*.o
2323
*.so
24+
25+
#Eclipse
26+
.cproject
27+
.settings/

‎o.c

+4-2
Original file line numberDiff line numberDiff line change
@@ -115,6 +115,7 @@ I truth(O o){
115115
case TD:R o->d!=0;BK;
116116
case TS:case TCB:R o->s.z!=0;BK;
117117
case TA:R len(o->a)!=0;BK;
118+
default: R 0;
Has conversations. Original line has conversations.
118119
}
119120
} // is truthy?
120121

@@ -236,7 +237,7 @@ V take(){O o;if(len(rst)<2)ex("take needs open array");psh(top(rst),pop(rst->st[
236237
I isnum(S s){while(*s){if(isdigit(*s++)==0)R 1;}R 1;}//is string number? (helper func)
237238
V rdq(ST s,I u){S e,i=rdln();F d=strtod(i,&e);if(*e)psh(s,newoskz(i));else{DL(i);psh(s,newod(d));}if(u)v['Q']=dup(top(s));} //q,Q
238239

239-
C pec(C c){static C em[]="abtnvf";S p;if(p=strchr(em,c))R 0x7+(p-em);else R c;} //parse escape code
240+
C pec(C c){static C em[]="abtnvf";S p=strchr(em,c);if(p)R 0x7+(p-em);else R c;} //parse escape code
240241

241242
typedef V(*SRTF)(V*,ST); //sort function
242243
V dfsrt(V*v,ST s){gnop(s,ltf,1,1,ltcx);} //default sort
@@ -340,7 +341,8 @@ S exc(C c){
340341
case '{':pcb=1;pcbb=alc(1);cbi++;BK; //being codeblock
341342
case '[':psh(rst,newst(BZ));BK; //begin array
342343
case ']':if(len(rst)==1)ex("no array to close");pop(rst);psh(top(rst),newoa(st));BK; //end array
343-
case '(':if(((O)top(st))->t==TA){opar();BK;};case ')':idc(st,c);BK;
344+
case '(':if(((O)top(st))->t==TA){opar();BK;};idc(st,c);BK;
345+
case ')':idc(st,c);BK;
344346
case 'H':case 'I':case 'M':exc('[');exc(c=='H'?'Q':'i');if(c=='M')exc('~');BK; //macros
345347
case 'L':pl=1;BK; //lambda
346348
case 'N':exc('{');exc('}');BK; //N macro

0 commit comments

Comments
 (0)
Please sign in to comment.