OT: Punctuation-starved Programming Languages

It was thus said that the Great John R. once stated: Well, having written my own Forth-like language the only hack I found I needed was a way of recognizing a quote terminated string and dumping it (the string) on the stack. So I didn't have to read ahead into the input stream ... well ... not in the way that : does in Forth. I did something like: "foo" define ( the code for foo here ... ) ; (only, it looked more like: "foo" :' ( the code for foo here ... ) ; ) There's no need to read ahead for loops either and I supported while, until and just about any other type of loop you care to do. Here's the code I had for supporting higher level loops (and yes, I did support the Forth word : in my language anyway): // '(barf)' '(brat)' '(bra)' 'here' and '(resolve)' are the low level routines to // implement branches of various types. : c(barf) '(barf)' find drop compile ; // compile a branch if false : c(brat) '(brat)' find drop compile ; // compile a branch if true : c(bra) '(bra)' find drop compile ; // compile a branch : (mark) here -1 compile ; // leave fixup addr on stack : resolve here swap (resolve) ; // resolve foreare/back branch ( the always popular if else then clause ... ) : if c(barf) (mark) ;imm : ifnot c(brat) (mark) ;imm : else c(bra) (mark) swap resolve ;imm : then resolve ;imm // because it's been like this : endif resolve ;imm // because some might like this better ( some otherwise neato control flow words ... ) : begin here ;imm : until c(barf) here - compile ;imm : notuntil c(brat) here - compile ;imm : while c(barf) (mark) ;imm : whilenot c(brat) (mark) ;imm : repeat c(bra) swap here - compile resolve ;imm -spc (Even used this language for a class in college for a project)