| |||||||||||||
Turning VistA into a "real" open source projectTurning VistA into a "real" open source projectPosted Mar 19, 2011 15:19 UTC (Sat) by Guhvanoh (subscriber, #4449)In reply to: Turning VistA into a "real" open source project by dark Parent article: Turning VistA into a "real" open source project
And all that snippet is doing is looping thru the global IB, checking some conditions and setting up a temporary global. It is pretty easy to read when you know what the commands are: K kill; S set; F for; Q quit; I if. I don't know what all the fuss is about. MUMPS is a pretty easy language to pick up. For instance the line '.. Q:'$D(^IB(IBX,0)) S IBZ=^(0)' just means go on to the next iteration if there is no data at the node ^IB(IBX,0) else set IBZ equal to the data held at that node. Yep, $D is used to test for existence. I guess that's enough MUMPS for today.
(Log in to post comments)
Turning VistA into a "real" open source project Posted Mar 20, 2011 20:27 UTC (Sun) by vonbrand (subscriber, #4458) [Link] Looks something like Teco... (Or line noise during a particularly bad thunderstorm ;-)
Turning VistA into a "real" open source project Posted Mar 20, 2011 21:29 UTC (Sun) by jthill (guest, #56558) [Link] However, just a few commands suffice to get real work done, and a novice TECO user can begin creating and editing text files after only a few hours of instruction. Gonna see if I can't remember more than IHELLO$0TT$. What the hey. Maybe this'll get me to write a vi shell function to refuse to create a file, make you type vim to get it to make one; I still miss that. And of course you know the first file I made, right? Thanks for the link.
|
|||||||||||||