diff --git a/versions/pdpjs/1.34.3/pdp10-dbg.js b/versions/pdpjs/1.34.3/pdp10-dbg.js index 3cd1d870f..ba5ad5038 100644 --- a/versions/pdpjs/1.34.3/pdp10-dbg.js +++ b/versions/pdpjs/1.34.3/pdp10-dbg.js @@ -201,9 +201,9 @@ m.stop=function(a,b){if(this.A.P){this.A.P=!1;this.F=b-this.La;if(!this.O){b="st function ud(a,b,c){var d=-1;c||(d=a.v.f(b),2756==d>>23&&a.v.Ea==b&&(b=sd(a.v,1)));if(0d&&(d=a.v.f(b)),0<=d&&(cf(a.j[a.W],b),++a.W==a.j.length&&(a.W=0)));return!1} function Cf(a,b,c,d){var e=Z(b.B),f=a.Na(b,1),g,h,k,l=0,p=f/Yb|0,u;for(u in Df)if(g=Df[u][p&u]){h=+u;p>>=6;switch(h){case 32512:k=Ef;l=p&3;break;case 32256:k=Ff;l=p&7;break;case 29248:k=Gf,l=(p&48)>>2|(p&6)>>1}break}k=k&&k[l]||"";"S"==k&&g>Hf&&(k="B");k=If[g||0]+k;if(g){if(28700==h)h=f/Zb&127,l=K(a,h,-1);else for(h=f>>23&15,l=K(a,h,-1),p=0;l&&p>18&15)&&(k+="("+K(a,f, -1)+")")}else k=Ba(k,8)+kf(a,f);f=k;g="";h=K(a,e.B,18)+":";if(-1!==e.B&&-1!==b.B){do if(k=a.Na(e,1),g+=" "+kf(a,k),null==e.B)break;while(e.B!=b.B)}h+=Ba(g,16)+f;c&&(h=Ba(h,48)+";"+(c||""),h=a.v.A.Va?h+("cycles="+fd(a.v).toString()+" cs="+n(a.v.Ha)):h+(null!=d?"="+d.toString():""));return h} -function Kf(a,b,c,d,e){var f=-1,g,h;a.ja=null;if(b){for(var k=b.toUpperCase(),l=0;lHf&&(P="B");if(k==If[h]+P){f=29248!=g?I:(I&3)<<1|(I&12)<<2;f=(D|f<<6)*Yb;break}}if(0<=f)break}if(0<=f)break}0>f&&c&&!c.match(/^[0-9A-Z$%.?]/i)&& -(c=b+c,b="",f=0)}else c&&(f=g=0);if(0<=f&&c)for(k=c.split(","),u=0;uh||15h||127 -h||15h||262143f&&!e&&a.u("unknown instruction: "+b+" "+c);return f}function Ze(a){var b,c;a.b=["bp"];if(a.N)for(b=1;b>>d.i],!1)}a.N=["br"];if(a.K)for(b=1;b>>d.i],!0);a.K=["bw"];a.Ca=0;a.qa=0} +function Kf(a,b,c,d,e){var f=-1,g,h;a.ja=null;if(b){for(var k=b.toUpperCase(),l=0;lHf&&(P="B");if(k==If[h]+P){f=29248!=g?I:(I&3)<<1|(I&12)<<2;f=(D|f<<6)*Yb;break}}if(0<=f)break}if(0<=f)break}!(0>f)||c&& +c.match(/^[0-9A-Z$%.?]/i)||(c=b+c,b="",f=0)}else c&&(f=g=0);if(0<=f&&c)for(k=c.split(","),u=0;uh||15 +h||127h||15h||262143f&&!e&&a.u("unknown instruction: "+b+" "+c);return f}function Ze(a){var b,c;a.b=["bp"];if(a.N)for(b=1;b>>d.i],!1)}a.N=["br"];if(a.K)for(b=1;b>>d.i],!0);a.K=["bw"];a.Ca=0;a.qa=0} m.Ra=function(a,b,c){var d=!0;c||Lf(this,a,b,!1,!0);if(a!=this.b){var e=bf(b);if(-1===e)this.u("invalid address: "+K(this,b.B,18)),d=!1;else{var f=this.G;f.b[e>>>f.i].Ra(e&16383,a==this.K)}}d&&(a.push(b),c?b.ra=!0:(Mf(this,a,a.length-1,"set"),$e(this)));return d};function Lf(a,b,c,d,e){var f=!1;c=bf(c);for(var g=1;g>>d.i],b==a.K));h.ra||$e(a);break}}return f} function Nf(a,b){for(var c=1;c -I)break;var u=I+1,P=I+l.length,fb="",Ab="";I&&(fb=b[I-1]).match(/[0-9A-Z$%.]/i)||!(P>=b.length)&&(Ab=b[P]).match(/[0-9A-Z$%.]/i)||("'"==fb&&I--,"'"==Ab&&P++,b=b.substr(0,I)+p+b.substr(P),u=I+p.length,g=!0)}c=null}}d=h[1];b=h[3];c=h[4].trim();h=h[4]+h[5];d&&(d=d.slice(0,-1),Hg(a,d,a.X,Ig));var G;f&&(G=c.match(/^([=:]+)(.*)/))&&(e=0,d=f,f=G[1],c=G[2],"=="==f?e|=Rg:"=:"==f&&(e|=Sg),Hg(a,d,c,e),f=c="");if(!f&&!c)return!0;a.M=f;for((G=Tg(a,c))&&(c=c.replace(G,Ug(a,Vg,Tg(a,h))));G=Wg(a,c);)c=c.replace(G, -G.slice(0,-1));if(!Xg(a,f,c))switch(f){case Yg:case Zg:case $g:Og(a,h);break;case ah:f=c;G=Lg(a,f);void 0!==G&&null==a.b.ja&&0<=G&&262143>=G?a.X+=G:a.error("unrecognized BLOCK expression '"+f+"'");break;case bh:(f=c)?(a.H=Lg(a,f,!0),void 0===a.H&&a.error("unrecognized END expression '"+f+"'")):a.H=a.la;break;case ch:dh(a,c);break;case eh:a.X=Lg(a,c)||0;break;case fh:dh(a,c.replace(",",",,"));break;case gh:case hh:case ih:case jh:case kh:case lh:case mh:case Pg:case Qg:case nh:case oh:Ug(a,f,h);break; -case ph:case qh:case rh:case sh:case th:case uh:case vh:break;default:f=(f+b+c).trim(),G=Lg(a,f,!0),void 0!==G?Jg(a,G,a.b.ja):a.error("unrecognized word expression '"+f+"'")}return!0} +I)break;var u=I+1,P=I+l.length,fb="",Ab="";I&&(fb=b[I-1]).match(/[0-9A-Z$%.]/i)||!(P>=b.length)&&(Ab=b[P]).match(/[0-9A-Z$%.]/i)||("'"==fb&&I--,"'"==Ab&&P++,b=b.substr(0,I)+p+b.substr(P),u=I+p.length,g=!0)}c=null}}d=h[1];b=h[3];c=h[4].trim();h=h[4]+h[5];d&&(d=d.slice(0,-1),Hg(a,d,a.X,Ig));var G;f&&(G=c.match(/^([=:]+)(.*)/))&&(e=0,d=f,f=G[1],c=G[2],"=="==f?e|=Rg:"=:"==f&&(e|=Sg),Hg(a,d,c,e),f=c="");if(!f&&!c)return!0;a.M=f;if(G=Tg(a,c))c=c.replace(G,Ug(a,Vg,Tg(a,h))),b||(b="\t");for(;G=Wg(a,c);)c= +c.replace(G,G.slice(0,-1));if(!Xg(a,f,c))switch(f){case Yg:case Zg:case $g:Og(a,h);break;case ah:f=c;G=Lg(a,f);void 0!==G&&null==a.b.ja&&0<=G&&262143>=G?a.X+=G:a.error("unrecognized BLOCK expression '"+f+"'");break;case bh:(f=c)?(a.H=Lg(a,f,!0),void 0===a.H&&a.error("unrecognized END expression '"+f+"'")):a.H=a.la;break;case ch:dh(a,c);break;case eh:a.X=Lg(a,c)||0;break;case fh:dh(a,c.replace(",",",,"));break;case gh:case hh:case ih:case jh:case kh:case lh:case mh:case Pg:case Qg:case nh:case oh:Ug(a, +f,h);break;case ph:case qh:case rh:case sh:case th:case uh:case vh:break;default:f=(f+b+c).trim(),G=Lg(a,f,!0),void 0!==G?Jg(a,G,a.b.ja):a.error("unrecognized word expression '"+f+"'")}return!0} function Xg(a,b,c){var d=a.v[b];if(!d)return!1;if(null!=c){if(d.Sa==wh){var e=a.X;Kg(a,d.ma);if(e d.Sa&&Kg(a,d.ma);break;case lh:case hh:d.Sa&&Kg(a,d.ma);break;case Pg:case Qg:for(b=0;ba.Fa&&(a.Fa=a.X);a.X=0} function yh(a){if(a.w.length){var b=a.w[a.w.length-1].name;b&&a.R.push({name:b,S:a.S,ea:a.ea});b=a.w.pop();a.S=b.S;a.ea=b.ea;a.X=b.X;a.Fa=b.Fa;a.w.length||-1==a.Fa||a.error("scope restore error")}else a.error("scope nesting error")} function Ah(a,b){var c;c=void 0===c?",":c;for(var d=0,e=!1,f=null,g=0;d"==h&&0>--g){a.error("missing bracket(s) in '"+b+"'");break}}}g?0e&&(e=Ue(a.b,b.replace(/\.([^0-9]|$)/g,K(a.b,d,-1)+"$1"),c),void 0===e&&a.error("unable to parse expression '"+ +function Lg(a,b,c,d){var e,f=b.match(/^([^,]*),,([^,]*)$/);if(f)b=f[1]?Lg(a,f[1],c,d):0,void 0!==b&&(c=f[2]?Lg(a,f[2],c,d):0,void 0!==c&&(e=Y(a.b,b,18,!0)*Math.pow(2,18)+Y(a.b,c,18,!0)));else{void 0===d&&(d=0<=a.Fa?a.Fa:a.X);b=b.replace(/SIXBIT\s*(\S)(.*?)\1/g,"'$2'").replace(/ASCII\s*(\S)(.*?)\1/g,'"$2"');e="";var g=b;if(f=b.match(/^([^\s]+)\s*(.*?)\s*$/))e=f[1],g=f[2];e=Kf(a.b,e,g,d,!0);0>e&&(e=Ue(a.b,b.replace(/\.([^0-9]|$)/g,K(a.b,d,-1)+"$1"),c),void 0===e&&a.error("unable to parse expression '"+ b+"'"))}return e}function Tg(a,b){for(var c=0,d="",e=0,f=-1,g=b.length;e=--c){g=e;break}}0>c&&a.error("missing bracket(s) in '"+b+"'");0<=f&&(d=b.substr(f,g-f));return d}function Fg(a,b){b=void 0===b?a.ia:b;for(var c=0;b>a.T[c];)if(b-=a.T[c],c