[Wisp-cvs] wisp/src essence.c,1.204,1.205 wordlist.txt,1.569,1.570

[<di...@us...>]

Update of /cvsroot/wisp/wisp/src
In directory usw-pr-cvs1:/tmp/cvs-serv26135/src

Modified Files:
	essence.c wordlist.txt 
Log Message:
Dropped the obsolete |hide-slots| procedure.

Index: essence.c
===================================================================
RCS file: /cvsroot/wisp/wisp/src/essence.c,v
retrieving revision 1.204
retrieving revision 1.205
diff -u -d -r1.204 -r1.205
--- essence.c	18 Sep 2002 20:55:54 -0000	1.204
+++ essence.c	18 Sep 2002 20:56:48 -0000	1.205
@@ -676,385 +676,384 @@
 void*Y231[]={binc,&branch_EVM_invargc,hop,V 4,mca,subc,V 2,binzc,&branch_EVM_invargca,mlt,p,s,V 1,p,s,V 0,mla,l,V 0,q,mlt,s,V 2,qi,&BCL0,li,rvec+11,tc,V 2,c,mla,l,V 1,q,dig,V 0,q,mha,l,V 1,l,V 125,tc,V 1,c,jinf,V 15,qi,W(symbol_huh),dig,V 1,q,mha,l,V 1,l,V 111,tc,V 2,c,j,V 0,ds,V 1,t,Q,mlt,s,V 3,t,B 230,q,qi,V 2,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 3,mla,l,V 2,l,V 3,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mla,l,V 3,tc,V 1,c,r};
 void*Y232[]={binc,&branch_EVM_invargc,hop,V 3,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,mlt,s,V 0,qi,&BCL0,li,rvec+11,tc,V 2,c,t,Q,mlt,s,V 1,mla,l,V 0,l,V 3,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 2,mla,l,V 2,q,mha,l0,q,qi,W(zero_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 74,mla,l,V 2,q,qi,I(1),li,rvec+5,tc,V 2,c,mlt,s,V 2,mla,l,V 0,l,V 3,q,mla,l,V 2,q,mha,l,V 1,l,V 118,tc,V 2,c,q,dig,V 0,jif,V 33,dig,V 0,q,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,q,mla,l,V 1,q,mha,l,V 1,l,V 80,tc,V 2,c,mlt,s,V 1,ds,V 1,j,V 0,ds,V 1,j,V -93,mla,l,V 1,ds,V 1,r};
 void*Y233[]={binc,&branch_EVM_invargc,hop,V 1,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,mlt,s,V 0,qi,&BCL0,li,rvec+11,tc,V 2,c,mla,l,V 0,l,V 3,q,mha,l0,q,qi,W(vector_copy),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,ds,V 1,r};
-void*Y234[]={binc,&branch_EVM_invargc,hop,V 2,mca,subc,V 2,binzc,&branch_EVM_invargca,dig,V 1,q,mlt,s,V 0,qi,&BCL0,li,rvec+11,tc,V 2,c,mla,l,V 0,l,V 5,jif,V 15,qi,W(frozen),dig,V 2,q,mha,l,V 1,l,V 111,tc,V 2,c,j,V 0,dig,V 0,mlt,s,V 1,mla,l,V 1,xri,Q,jiz,V 87,mla,l,V 1,q,li,rvec+10,tc,V 1,c,ct,l0,q,t,T,q,mla,l,V 0,l,V 3,q,dig,V 4,q,dig,V 3,q,mha,l0,q,qi,W(lookup_slot),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,jinf,V 13,qi,W(unknown),dig,V 3,q,mha,l,V 1,l,V 111,tc,V 2,c,q,qi,F,mha,l,V 1,l,V 118,tc,V -3,c,ds,V 1,ds,V 1,mla,l,V 1,q,li,rvec+10,tc,V 1,c,ct,l,V 1,mlt,s,V 1,j,V -94,t,Z,ds,V 2,r};
-void*Y235[]={binc,&branch_EVM_invargc,hop,V 2,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,mlt,s,V 0,qi,&BCL0,li,rvec+11,tc,V 2,c,mla,l,V 0,l,V 3,l,V 1,mat,t,V 2,addat,mta,q,mha,l,V 1,l,V 142,tc,V 1,c,mlt,s,V 1,mla,l,V 1,q,dig,V 1,pt,s,V 1,t,V 10,s0,mla,l,V 1,ds,V 1,r};
-void*Y236[]={binc,&branch_EVM_invargc,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,mha,l,V 1,l,V 97,tc,V 1,c,jif,V 44,dig,V 0,q,mha,l0,q,qi,W(class_of),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l0,q,qi,W(LTclassGT),t,&NN_dict_ref_2,tc,V 2,c,q,mha,l0,q,qi,W(subclass_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,ds,V 1,r,t,F,ds,V 1,r};
-void*Y237[]={binc,&branch_EVM_invargc,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,dig,V 0,q,mha,l,V 1,l,V 97,tc,V 1,c,jinf,V 15,qi,W(instance_huh),dig,V 1,q,mha,l,V 1,l,V 111,tc,V 2,c,j,V 0,ds,V 1,dig,V 0,l,V 1,ds,V 1,r};
-void*Y238[]={binc,&branch_EVM_invargc,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,jif,V 68,dig,V 0,q,mha,l0,q,qi,W(LTclassGT),t,&NN_dict_ref_2,tc,V 2,c,xors,jiz,V 47,dig,V 0,q,mha,l,V 2,l,V 1,xors,jinz,V 4,t,T,j,V 2,t,F,jinf,V 25,dig,V 0,q,mha,l0,q,qi,W(superclass),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 2,l,V 2,tc,V 1,c,ds,V 1,r,t,F,ds,V 1,r,t,F,ds,V 1,r};
-void*Y239[]={binc,&branch_EVM_invargc,hop,V 3,mca,subc,V 2,binzc,&branch_EVM_invargca,mlt,p,s,V 1,p,s,V 0,mla,l,V 0,q,mha,l0,q,qi,W(LTclassGT),t,&NN_dict_ref_2,tc,V 2,c,xors,jinz,V 23,mla,l,V 1,q,mha,l0,q,qi,W(LTclassGT),t,&NN_dict_ref_2,tc,V 2,c,xors,jinz,V 3,t,T,r,t,F,r,mla,l,V 0,q,mha,l,V 1,l,V 97,tc,V 1,c,jinf,V 19,mla,l,V 0,q,mha,l0,q,qi,W(class_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jif,V 31,t,Q,mlt,s,V 2,t,B 238,q,qi,V 2,qh,ql,li,rvec+19,tc,V 4,c,mlt,s,V 2,mla,l,V 0,q,mla,l,V 2,tc,V 1,c,r,t,F,r};
-void*Y240[]={binc,&branch_EVM_invargc,hop,V 3,mca,subc,V 1,binc,&branch_EVM_invargca,mac,mca,subc,V 3,binnc,&branch_EVM_invargca,mac,mlt,mca,mca,subc,V 1,jizc,V 9,mac,p,s,V 1,p,s,V 0,j,V 8,mac,p,s,V 0,t,F,s,V 1,mla,l,V 0,q,dig,V 0,q,mha,l,V 1,l,V 146,tc,V 1,c,jinf,V 15,qi,W(vector_huh),dig,V 1,q,mha,l,V 1,l,V 111,tc,V 2,c,j,V 0,ds,V 1,mla,l,V 0,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 0,q,mha,l0,q,qi,W(zero_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 60,dig,V 0,q,qi,I(1),li,rvec+5,tc,V 2,c,bury,V 0,mla,l,V 0,q,dig,V 1,q,mha,l,V 1,l,V 118,tc,V 2,c,q,dig,V 0,q,mha,l,V 1,l,V 125,tc,V 1,c,jinf,V 15,qi,W(symbol_huh),dig,V 1,q,mha,l,V 1,l,V 111,tc,V 2,c,j,V 0,ds,V 1,j,V -78,ds,V 1,mla,l,V 1,jif,V 32,mla,l,V 1,q,mha,l0,q,qi,W(class2vector),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mla,l,V 0,q,mha,l,V 1,l,V 159,tc,V 2,c,j,V 17,mla,l,V 0,q,mha,l0,q,qi,W(vector_copy),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 0,mha,l,V 1,l,V 103,tc,V 0,c,q,mla,l,V 0,q,mha,l0,q,qi,W(length),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,dig,V 0,q,mha,l0,q,qi,W(zero_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 173,dig,V 0,q,qi,I(1),li,rvec+5,tc,V 2,c,bury,V 0,mla,l,V 0,q,dig,V 1,q,mha,l,V 1,l,V 118,tc,V 2,c,q,dig,V 0,q,mha,l,V 1,l,V 81,tc,V 1,c,jif,V 12,dig,V 0,q,li,rvec+10,tc,V 1,c,ct,l0,j,V 2,dig,V 0,q,dig,V 0,jif,V 23,dig,V 3,q,dig,V 1,q,qi,F,mha,l0,q,qi,W(dict_ref),t,&NN_dict_ref_2,tc,V 2,c,tc,V 3,c,j,V 2,t,F,jif,V 15,qi,W(duplicate_slot_name),dig,V 2,q,mha,l,V 1,l,V 111,tc,V 2,c,j,V 65,dig,V 1,q,mha,l,V 1,l,V 125,tc,V 1,c,jif,V 31,mla,l,V 0,q,dig,V 3,q,dig,V 3,q,qi,T,mha,l,V 1,l,V 99,tc,V 2,c,q,mha,l,V 1,l,V 118,tc,V -3,c,j,V 0,dig,V 3,q,dig,V 1,q,qi,T,mha,l0,q,qi,W(dict_ref),t,&NN_dict_ref_2,tc,V 2,c,tc,V -3,c,ds,V 1,ds,V 1,j,V -191,ds,V 1,ds,V 1,mla,l,V 1,jif,V 41,mla,l,V 1,q,dig,V 0,q,mha,l0,q,qi,W(class_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,jinf,V 15,qi,W(class_huh),dig,V 1,q,mha,l,V 1,l,V 111,tc,V 2,c,j,V 0,ds,V 1,j,V 0,mha,l0,q,qi,W(LTclassGT),t,&NN_dict_ref_2,tc,V 2,c,q,mha,l0,q,qi,W(make_instance),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,mlt,s,V 2,qi,F,mla,l,V 1,jif,V 7,mla,l,V 1,l,V 4,j,V 2,t,Q,q,mla,l,V 0,q,mla,l,V 1,q,mla,l,V 2,pt,st,V 2,pt,st,V 3,pt,st,V 4,pt,st,V 5,mla,l,V 2,r};
-void*Y241[]={binc,&branch_EVM_invargc,mca,subc,V 1,binzc,&branch_EVM_invargca,dig,V 0,q,mha,l,V 1,l,V 97,tc,V 1,c,jif,V 39,dig,V 0,q,mha,l0,q,qi,W(class_of),t,&NN_dict_ref_2,tc,V 2,c,tc,V 1,c,q,mha,l,V 2,l,V 0,q,mha,l0,q,qi,W(subclass_huh),t,&NN_dict_ref_2,tc,V 2,c,tc,V 2,c,ds,V 1,r,t,F,ds,V 1,r};
[...1025 lines suppressed...]
 
 struct cons conses [] = {
@@ -2078,13 +2076,13 @@
 [328]{car:CH('C'),cdr:BC 327},
 [329]{car:CH('A'),cdr:BC 328},
 [330]{car:CH('e'),cdr:BC 329},
-[331]{car:B 682,cdr:Q},
-[332]{car:B 681,cdr:BC 331},
-[333]{car:B 683,cdr:Q},
+[331]{car:B 681,cdr:Q},
+[332]{car:B 680,cdr:BC 331},
+[333]{car:B 682,cdr:Q},
 };
 
 /* The root node of the compiled builtin library */
 struct node *
-builtin_root = B 685;
+builtin_root = B 684;
 
 /* essence.c ends here */

Index: wordlist.txt
===================================================================
RCS file: /cvsroot/wisp/wisp/src/wordlist.txt,v
retrieving revision 1.569
retrieving revision 1.570
diff -u -d -r1.569 -r1.570
--- wordlist.txt	18 Sep 2002 20:56:18 -0000	1.569
+++ wordlist.txt	18 Sep 2002 20:56:51 -0000	1.570
@@ -93,15 +93,15 @@
 for-each fork form? formfeed fourth fraction fraction? freeze-class
 frer frer->structure friend frozen frozen? ftruncate getcwd getegid
 geteuid getgid getpgid getpid getppid getuid gid grammar-error hache
-hidden hide hide* hide-slots hold home hop ia32 if iflag
-immediate-sublambdas imported-variables inc incr! infix init-input-file
-init-output-file init-port ino input-port? instance
-instance-of-wrong-class instance? instruction-list int integer
-integer->char integer->flag-list integer->string integer? intermingle
-internal-trouble invalid invalid-argument-name invalid-assignment
-invalid-branch-target invalid-char invalid-cut invalid-definition
-invalid-dollar-construct invalid-export invalid-form invalid-frer
-invalid-frer-opcode invalid-intercode-instruction invalid-lambda-list
+hidden hide hide* hold home hop ia32 if iflag immediate-sublambdas
+imported-variables inc incr! infix init-input-file init-output-file
+init-port ino input-port? instance instance-of-wrong-class instance?
+instruction-list int integer integer->char integer->flag-list
+integer->string integer? intermingle internal-trouble invalid
+invalid-argument-name invalid-assignment invalid-branch-target
+invalid-char invalid-cut invalid-definition invalid-dollar-construct
+invalid-export invalid-form invalid-frer invalid-frer-opcode
+invalid-intercode-instruction invalid-lambda-list
 invalid-lambda-pack-clause invalid-module-name invalid-my-target
 invalid-place invalid-reader-syntax invalid-slot-name
 invalid-system-constant-name-part invalid-try-clause