Mercurial Mercurial > hg > stx-libbasic2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorclaus
Mon, 28 Nov 1994 21:57:01 +0100
changeset 49 ec5828a97593
parent 48 18b9353c9d07
child 50 983d862738c1
*** empty log message ***
Make.proto file | annotate | diff | comparison | revisions
MappedColl.st file | annotate | diff | comparison | revisions
MappedCollection.st file | annotate | diff | comparison | revisions 
--- a/Make.proto	Thu Nov 17 15:21:02 1994 +0100
+++ b/Make.proto	Mon Nov 28 21:57:01 1994 +0100
@@ -6,7 +6,9 @@
 SUBDIRS=
 
 LIBNAME=libbasic2
+
 STCOPT=$(LIBBASIC2_STCOPT)
+STCLOCALOPT=-Padditional-basic-classes
 
 all::   abbrev.stc objs classList.stc $(OBJTARGET)
 
@@ -92,7 +94,7 @@
 
 I = $(INCLUDE)
 
-STCHDR=$(I)/stc.h $(I)/stcIntern.h
+STCHDR=$(I)/stc.h $(I)/stcIntern.h $(CPUINTERN_H)
 OBJECT=$(I)/Object.H $(STCHDR)
 BOOLEAN=$(I)/Boolean.H $(OBJECT)
 BEHAVIOR=$(I)/Behavior.H $(OBJECT)
--- a/MappedColl.st	Thu Nov 17 15:21:02 1994 +0100
+++ b/MappedColl.st	Mon Nov 28 21:57:01 1994 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic2/Attic/MappedColl.st,v 1.8 1994-11-17 14:21:01 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/Attic/MappedColl.st,v 1.9 1994-11-28 20:56:58 claus Exp $
 '!
 
 !MappedCollection class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic2/Attic/MappedColl.st,v 1.8 1994-11-17 14:21:01 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/Attic/MappedColl.st,v 1.9 1994-11-28 20:56:58 claus Exp $
 "
 !
 
@@ -83,7 +83,7 @@
 contents
     |contents|
     contents := Bag new.
-    map do:[:key | contents add:domain at:key].
+    map do:[:key | contents add:(domain at:key)].
     ^ contents
 !
 
--- a/MappedCollection.st	Thu Nov 17 15:21:02 1994 +0100
+++ b/MappedCollection.st	Mon Nov 28 21:57:01 1994 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic2/MappedCollection.st,v 1.8 1994-11-17 14:21:01 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/MappedCollection.st,v 1.9 1994-11-28 20:56:58 claus Exp $
 '!
 
 !MappedCollection class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic2/MappedCollection.st,v 1.8 1994-11-17 14:21:01 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/MappedCollection.st,v 1.9 1994-11-28 20:56:58 claus Exp $
 "
 !
 
@@ -83,7 +83,7 @@
 contents
     |contents|
     contents := Bag new.
-    map do:[:key | contents add:domain at:key].
+    map do:[:key | contents add:(domain at:key)].
     ^ contents
 !
hg/stx-libbasic2