Lines Matching refs:symb
2875 var symb = sc_gensym("writeCircle");
2878 sc_prepWriteCircle(o, symb, nbPointer);
2879 return sc_genToWriteCircleString(o, symb);
2882 function sc_prepWriteCircle(o, symb, nbPointer) {
2886 if (o[symb] !== undefined) {
2888 o[symb]++;
2890 if (!o[symb + "nb"]) o[symb + "nb"] = nbPointer.nb++;
2893 o[symb] = 0;
2895 sc_prepWriteCircle(o.car, symb, nbPointer);
2896 sc_prepWriteCircle(o.cdr, symb, nbPointer);
2899 sc_prepWriteCircle(o[i], symb, nbPointer);
2904 function sc_genToWriteCircleString(o, symb) {
2908 return o.sc_toWriteCircleString(symb);
2910 sc_Pair.prototype.sc_toWriteCircleString = function(symb, inList) {
2911 if (this[symb + "use"]) { // use-flag is set. Just use it.
2912 var nb = this[symb + "nb"];
2913 if (this[symb]-- === 0) { // if we are the last use. remove all fields.
2914 delete this[symb];
2915 delete this[symb + "nb"];
2916 delete this[symb + "use"];
2923 if (this[symb]-- === 0) { // if we are the last use. remove all fields.
2924 delete this[symb];
2925 delete this[symb + "nb"];
2926 delete this[symb + "use"];
2931 if (this[symb] !== undefined) { // implies > 0
2932 this[symb + "use"] = true;
2934 res += '. #' + this[symb + "nb"] + '=';
2936 res += '#' + this[symb + "nb"] + '=';
2944 res += sc_genToWriteCircleString(this.car, symb);
2947 res += " " + this.cdr.sc_toWriteCircleString(symb, true);
2949 res += " . " + sc_genToWriteCircleString(this.cdr, symb);
2955 sc_Vector.prototype.sc_toWriteCircleString = function(symb) {
2956 if (this[symb + "use"]) { // use-flag is set. Just use it.
2957 var nb = this[symb + "nb"];
2958 if (this[symb]-- === 0) { // if we are the last use. remove all fields.
2959 delete this[symb];
2960 delete this[symb + "nb"];
2961 delete this[symb + "use"];
2965 if (this[symb]-- === 0) { // if we are the last use. remove all fields.
2966 delete this[symb];
2967 delete this[symb + "nb"];
2968 delete this[symb + "use"];
2972 if (this[symb] !== undefined) { // implies > 0
2973 this[symb + "use"] = true;
2974 res += '#' + this[symb + "nb"] + '=';
2978 res += sc_genToWriteCircleString(this[i], symb);
