Now I am confused, don't you have to check all occurences of . whether
it is applied to a dictionary or array...
Christian
"Kevin Glynn" <glynn@info.ucl.ac.be> wrote in message
news:<15594.15261.202088.229645@gargle.gargle.HOWL>...
>
> Christian Schulte writes:
> > Uuups, not so speedy: Thought about distribution?
> >
>
> Yes, and no!
>
> > The first step anyway will be to rewrite all library code to not
> use . > for Arrays, Dictionaries any longer. >
>
> for information I have attached a list of all the places that mozart
> and mozart-stdlib use ':=' which will be a good place to start
> looking for occurences of _._ that need changing.
>
> before i release though I will have to find every use of dict and
> array and verify they are used correctly.
>
> > So do you have an implementation plan? When I go off implementing
> > something I typically try to put things into different stages and
> order > them as to get all the dependencies right. Then I typically
> have some > other people to check that this is feasible. Might be an
> idea. >
>
> A good idea, which may clarify some issues.
>
> cheers
> k
>
>
> mozart
> ------
>
> ./contrib/gtk/builder/GBuilder.oz
> ChildrenDict.children := Value
> Args.F := Value
> Signals.F := Value
> ChildrenDict.F := Value
> Args.F := Desc.F
> WidgetSpecs.ClassName := {List.toRecord ClassName 'class'#C|X4}
> ./contrib/gtk/builder/GBuilderTypes.oz
> FromOzDict.A := I
> ToOzDict.I := A
> ./doc/utilities/XMLTokenizer.oz
> @EntityTable.'amp' := string("\&")
> @EntityTable.'lt' := string("<")
> @EntityTable.'gt' := string(">")
> @EntityTable.'apos':= string("'")
> @EntityTable.'quot':= string("\"")
> @EntityTable.{StringToAtom Name} := Type(Value)
> ./share/demo/DictClient/GtkDictionary.oz
> @Dict.N := Min#Max#Entry
> ./share/lib/compiler/ForLoop.oz
> D2.F2 := E
> VarD.'accu' := VarAccu
> VarD.'continue' := V
> VarD.'break' := V
> VarD.'return' := V
> VarD.'default' := V
> VarD.'break' := E
> ./share/lib/dp/ConnectAcceptModule.oz
> OngoingRequests.Id:=r(thr:_)
> AppState.Key:=Val
> ./share/test/base/weakdictionaryGC.oz
> WD.gc:={NewName}
> D.Key:=proc{$} skip end
> WD.Key:={NewName}
> ./share/test/dp-bench/Manager.oz
> DD.Id:=P
> ./share/tools/OPIServer.oz
> Handlers.{String.toAtom Method} := {LazyDot M {String.toAtom
Feature}}
> Handlers.close := Close
> Handlers.exit := Exit
> Handlers.addHandler := AddHandler
> Handlers.show := ShowHandler
> ./share/tools/dpanel/AdvancedListBox.oz
> self.entryDict.(K.key):=S
> self.entryDict.K:={Record.adjoinAt S fg FG}
> ./share/tools/dpanel/Colour.oz
> D.(M.2):={VirtualString.toAtom {Record.foldL
M.1 fun{$ Ind V}
> Ind#{Dec2Hex V} end "#"}} ./share/tools/dpanel/FieldDisplay.oz
> (self.lastdict).Ind:= (self.totaldict).Ind - E
> (self.totaldict).Ind:=E
> (self.linedict).Ind:=Line
> (self.lastdict).Ind:=E
> (self.totaldict).Ind:=E
> ./share/tools/dpanel/SiteInfo.oz
> self.GlobalDict.Key:=C#I
> self.ActiveSites.(S.siteid):=Si
./share/tools/dpanel/TableInfo.oz
> self.usedCounter.Key:=Used
> self.usedCounter.Key:=Used
> self.table.Key:=Data
> {ForAll CurrentKeyList proc{$ E} TmpTable.E:=false end}
> ./share/tools/ozcar/client.oz
> ReflectDict.Q := RemoteQ
> ReflectDict.I := ReflectedThread
> UnreflectDict.RemoteI := T
>
> mozart-stdlib
> -------------
>
> ./adt/Dictionary.oz
> proc {DictPut K V} D.K := V end
> ./wp/qhtml/HTMLmarshaller.oz
> HTMLDict.{String.toAtom E.r} := E.n
> VSDict.(E.n):=E.r
> VSDict.&\\:=&\\|&\\|nil
> VSDict.&\r:=""
> VSDict.&\n:="
"
> ./wp/qhtml/LiteWebServer.oz
> self.Data.{self GetId(Entry $)}:=Value
> ./wp/qhtml/Params.oz
> InitDb.{String.toAtom K}:=E
> ApplyDb.{String.toAtom K}:=E
> CSS.Name:=r(values:Values
> CSS.K:={RemoveRef CSS.K}
> ./wp/qhtml/QHTMLDevel.oz
> ParamsD.K:=V
> EventsD.K:=V
> self.Events.E:=Port#Msg#P
> % self.Events.E:=Port#Msg#P
> % self.DataInfo.K := V
> % self.DataInfo.K := V
> % self.DataInfo.K := {Record.adjoinAt V type event}
> self.DataInfo.K:=V
> self.DataInfo.K:=r(bind:outer(true)
> self.DataInfo.K := V
> self.DataInfo.K := V
> self.DataInfo.K := {Record.adjoinAt V type event}
> self.DataVal.P:=V
> ./wp/qhtml/QHTMLMenu.oz
> self.Events.onselectmenu:=Port#Msg#nil
> ./wp/qhtml/QHTMLToplevel.oz
> self.ObjDict.I:=Obj
> ./wp/qhtml/QHTMLType.oz
> CheckDict.Type := r(p:Proc s:Str m:Marshall u:Unmarshall)
> EventDict.P := fun{$ V} {Translate2OZ V M} end
> ./wp/qhtml/QUI.oz
> AliasDict.N := R
> ./wp/qtk/QTkDevel.oz
> self.Aliases.A:=fun{$ M}
> self.Aliases.(M.widgetType):=fun{$ M1}
./xml/NameSpaces.oz
> Collection.URI := NS
> PrefixMap.Prefix := NS
> PrefixMap.Prefix := NS
> NS.table.LocalPart := NAM
> ./xml/Tokenizer.oz
> @EntityTable.{StringToAtom Name} := Type(Value)
> -
> Please send submissions to hackers@mozart-oz.org
> and administriva mail to hackers-request@mozart-oz.org.
> The Mozart Oz web site is at http://www.mozart-oz.org/.
-
Please send submissions to hackers@mozart-oz.org
and administriva mail to hackers-request@mozart-oz.org.
The Mozart Oz web site is at http://www.mozart-oz.org/.