Re: Long names are doom ?

To: info-dylan@ai.mit.edu
Subject: Re: Long names are doom ?
From: Jochen Schmidt <jsc@dataheaven.de>
Date: Fri, 25 May 2001 17:45:02 -0400 (EDT)
Organization: Dataheaven
References: <3B0DBCAB.E3F06372@my-deja.net> <9elpia$1f19$1@ID-22205.news.dfncis.de> <3B0E79C1.671CBF6E@acadiau.ca>
User-Agent: KNode/0.4
Xref: traf.lcs.mit.edu comp.lang.dylan:13318

Ivan Tomek wrote:

> I could not resist this. In Smalltalk, you can find for example the
> longest class name by the following code fragment. The code can be
> shortened, but this version shows very clearly what happens. I think that
> even a non-Smalltalk person can se what is going on - partially because of
> names that programmers in other languages might consider too long.
> 
> | longestName maxLength |
> longestName := ''.
> maxLength := 0.
> Object withAllSubclasses do:
>  [:class | | newName newLength |
>   class isMeta
>    ifFalse: [
>   newName := class name.
>   newLength :=  newName size.
>   newLength > maxLength
>     ifTrue: [longestName := newName. maxLength := newLength]]].
> longestName
> 
> By the way, the answer is ... (left as an exercise).

In Common Lisp you can e.g. write

(let ((maxlen 0))
  (do-all-symbols (symbol)
     (setf len (max maxlen (length (symbol-name s)))))
  maxlen)

To find the length of the longest accessable symbol of all packages.

Regards,
Jochen

References:

Re: Long names are doom ?

From: Jochen Schmidt <jsc@dataheaven.de>

Re: Long names are doom ?

From: Ivan Tomek <ivan.tomek@acadiau.ca>