HDTenEightyP/NetNews huggingface dataset:
From: mjb@netcom.com (Martin Brown)
Subject: Re: Looking for Good Book on ST/V Win
Date: Sat, 12 Sep 92 07:51:57 GMT
Organization: Netcom - Online Communication Services (408 241-9760 guest)

There are no books currently available for ST/V Win.  Dan Shafer, author of
a previous ST/V (not win) book, has a ST/V Win book at the publishers now,
and is due out shortly (within a month I believe).

When Dan's new book is available, relevant info will be posted here, by me if
by no one else.
-- 

                                   - mjb -

                                mjb@netcom.com

Newsgroups: comp.lang.smalltalk
From: steinman@is.morgan.com (Jan Steinman)
Subject: Re: ST80: senders of <primitive: #>  ?
Organization: Morgan Stanley & Company
Date: Wed, 9 Sep 1992 13:30:39 GMT

In article <VOSS.92Sep8215556@laslo.cs.uiuc.edu> voss@cs.uiuc.edu (Bill Voss) writes:

   I would like to browse all methods that invoke a particular primitive.
   (Just like "senders" does, but for a primitive instead of a method.)

   Does anyone know of a simple way to generate this collection of methods?

Well, it's not simple, and it is dead slow, but:

   CompiledMethod allInstances reject: [:cm | cm primitiveNumber == nil]

will return *all* primitives. Change #reject: to #select: and nil to
your favorite number to get just the primitive of your choice.

The lack of speed seems to be due to #allInstances. It may be faster
to nerp over each class's methodDictionary. Either way, it's not
something I'd casually stick on a menu, unless you like coffee breaks!

If you want to do this sort of thing often, I'd hack the compiler to
cache the primitives methods somewhere, probably in a WeakDictionary
class instance variable of CompiledMethod.

--
: : Jan Steinman	   steinman@is.morgan.com		 Bytesmiths : :
: : 2002 Parkside Court				   West Linn, OR 97068-2767 : :
: : 503/657-7703					       212/956-8722 : :
Newsgroups: comp.lang.smalltalk
From: voss@cs.uiuc.edu (Bill Voss)
Subject: Re: ST80: senders of <primitive: #> ?
Organization: Typed Smalltalk Group, Dept of Comp Sci, Univ of IL in Urbana.
	<STEINMAN.92Sep9083039@hawk.is.morgan.com>
	<tim.716058912@parcplace.com>
Date: Thu, 10 Sep 1992 07:49:11 GMT

>>>>> On 9 Sep 92 17:15:12 GMT, tim@parcplace.com (Tim Rowledge) said:

> Come on guys, this is in the System Workspace!
> Browser browseAllSelect: [ :method| method primitiveNumber = (whatever)]
> Simple!
> 	Tim Rowledge->tim@parcplace.com

Thanks to Steinman, Khaw, and Tim.
> Browser browseAllSelect: [ :method| method primitiveNumber = (whatever)]
does just what I wanted.  The key piece of information I was missing was 
the "primitiveNumber" method.

I will admit I didn't check the System Workspace first. :-{
I blame that on "Date: 8 Sep 92 21:55:56" ;-)
However, I have now checked it, and primitiveNumber is not there.  
I can find
	Browser browseAllSelect:
		[ :method | method numLiterals > 40 ].
but nothing about primitiveNumber.

Which suggests that some people have better System Workspaces
than others. :-)  Tim, would you care to post a copy of your Workspace?
You've wet my curiousity, I wonder what else I'm missing! ;-)

Bill Voss

P.S.
laslo$ /usr/local/st80_r41/bin/st80 -v r41.im
Copyright (C) 1992, ParcPlace Systems, Inc.
All Rights Reserved.
Release identification ...
        VM   version: 41 platform: 11 release: 19.0 flags: 0
        VI   version: 41 minor: 0 release: 0 variant: 0
        From version: 41 platform: 11 release: 19.0 flags: 0
laslo$ date
Thu Sep 10 01:45:32 CDT 1992

Night all.
Newsgroups: comp.lang.smalltalk
From: vpcsc4@sfsuvax1.sfsu.edu (Emmett McLean)
Subject: Is st.el the state of the art emacs package for Smalltalk80?
Organization: San Francisco State University
Distribution: NA
Date: Mon, 14 Sep 1992 17:23:33 GMT

I running mst interactively via gnu emacs. Unfortunately,
st.el provides limited support, mostly for editing. Is there
is there a package providing additional interactive support,
like an interactive inspector?

Thanks,
Emmett vpcsc4@sfsuvax1.sfsu.edu
From: andrewb@lynx.cs.washington.edu (Andrew Berg)
Newsgroups: comp.lang.smalltalk
Subject: ST/V 286 and GraphPane
Date: 7 Sep 92 03:03:04 GMT
Article-I.D.: beaver.1992Sep7.030304.4128
Organization: Computer Science & Engineering Dept., Univ. of Washington, Seattle
X-Newsreader: Tin 1.1 PL5

Could someone explain how to make a bitmap show up in a GraphPane?
I can just draw on the display where I want the image to show up, but this
seems like cheating.

So far my best guess is something like:

draw: aRect
		"Draws the pane in answer to a changed: message, or whatever."
	| form pen |
	form := Form new extent: aRect extent.
	pen := Pen new destForm: form.
	pen black;
		up;
		"a bunch of drawing commands"
		go: 5.
	theGraphPane form: form.
	theGraphPane showForm


Or something like that.  What it does now is to every time it gets the draw:
message it seems to think a second, then copy a blank (white) form over the 
existing blank form, hiding the mouse, etc.  My best guess for what is wrong
is that you cannot set the graph pane form: to be different from the display's
form, since when I inspect the model, the graph pane has a ColorForm.

Any suggestions?

Oh yeah, please respond via mail, since I don't get the opportunity to read
this group too often.

andrewb@cs.washington.edu
From: ak@ananke.stgt.sub.org (Andreas Kaiser)
Newsgroups: comp.lang.smalltalk
Subject: Smalltalk V/PM
Distribution: world
Date: Tue, 08 Sep 92 14:39:51 GMT
Organization: ananke

What is the current version of Smalltalk V for OS/2 PM? Is there a
32-bit version for OS/2 2.0 available or announced?

		Danke, Andreas

:::::::::::::::::::: subnet:  ak@ananke.stgt.sub.org
:: Andreas Kaiser :: fidonet: 2:241/7220.9
::::::::::::::::::::
Newsgroups: comp.lang.smalltalk
From: jwh@citi.umich.edu (Jim Howe)
Subject: Re: Digitalk Smalltalk/V286 and OS/2
Reply-To: jwh@citi.umich.edu
Organization: IFS Project, University of Michigan
Distribution: na
Date: Tue, 8 Sep 1992 13:34:57 GMT

In article <1992Sep7.024814.3756@beaver.cs.washington.edu>, andrewb@lynx.cs.washington.edu (Andrew Berg) writes:
|> 
|> There is a simple reason for why the PM version is better than Windows.  PM 
|> is better than Windows.  Especially in file handling and memory management,
|> which are the two primary performance affectors for the compiler.  Rumor is
|> that there is a 32 bit version for PM due out RSN with a propable, eventual
|> NT equivalent version, and maybe even MAC and various UNIX versions.  
|> 

The 32-bit OS/2 version is not a rumor.  I've been using a beta version for
some time and it is quite good.  They have made several internal changes
which result is smaller DLL files.  I haven't had the chance to check
on speed differences.  I've been told that it should be available in
a couple of weeks.  Based on the last beta version, I don't see why this
shouldn't happen.  A version of V for AIX on the RS/6000 is also in 
beta, but I haven't actually seen it.  I haven't heard anything about
NT. (and who really cares anyway :->)

|> Anyhow, I'm told that the engine is actually the same between the PM and the 
|> Windows, so whatever penalty the Windows has, it is because the thing was 
|> principally written for PM, and also because OS/2 is more powerfull than DOS.
|> 

I think the 'engine' for V for OS/2 is now different from the Windows 
version.  My understanding is that is is much more sophisticated.  I'm
not sure whether they are planning on moving that technology to
V/Windows or not.


James W. Howe                  internet: jwh@citi.umich.edu
University of Michigan             uucp: uunet!mailrus!citi.umich.edu!jwh
Ann Arbor, MI   48103-4943
From: marten@feki.toppoint.de (Marten Feldtmann)
Newsgroups: comp.lang.smalltalk
Subject: Digitalk
Date: 15 Sep 92 18:45:37 GMT
Organization: Private OS/2 System

SCOOP 2,92:

After such a long time, I received post from from Digitalk. Their actual
products and prices are:

 Digitalk /V PM 1.4 OS/2 2.0
   Update from 1.3:  free
   Update from <1.3: $175

 "nothing about /V PM 2.0 !!!"

 Digitalk /V Windows 2.0
   Update: $195
   Update: $45, if bought after May 1, 92

 Digitalk /V Mac 1.2
   Update: $75

 Digitalk /V DOS 3.0
   Update: $50

 Digitalk Relational Database Interface
   Price:  ??

 PARTS Workbench 1.0
   price:  $1995 
   special price for /V customers: $595

 They also mentioned a new support and service strategy: "Direct
Connect"

 60 days free telephone, fax and mail support for new products and
upgrades

 new cimmunication paths for bug reporting: bugs@digitalk.com
 or for other things:                       info@digitalk.com

 For "Direct Connect" you have to pay some money:

  $150  for introductory/individual
        2 hours of connection + 2 support requests

  $500  for professional
        10 hours connect time + 5 support requests

 $3500  for projects
        50 hours connect time + 50 support requests


 Well, I've nothing to do with Digitalk and I hope these line are not
seen as an ad, but as lines of informations ....

 MF
Newsgroups: comp.lang.smalltalk
From: bernard@is.morgan.com (Bernard Horan)
Subject: Re: Is there a goodie to keep a prompter window on top?
Organization: Morgan Stanley - IS
Date: Wed, 9 Sep 1992 11:32:30 GMT

In article <1992Sep6.153845.7115@zoe.network23.com>, terry@zoe.network23.com (Terry) writes:
|> Does anyone have a fileIn that prevents a prompter or any
|> other DialogView from being buried?
|> 
|> Thanks
|> 
|> Terry
|> -- 
|> terry@zoe.network23.com
|> {rayssd,xanth,mirror,att}!galaxia!zoe!terry

I had a couple of hacks at this (both of which are available from the
Manchester archive):

The first was to make the dialogview modal in the sense that the user 
couldn't move the cursor out of it (though this didn't address the 
problem of it being buried) -- called Modality.

The second was to make the dialogView a dependent on another 
controller (called a 'parentController' with the effect that as 
soon as the parentController gained control, it immediately passed 
control to its dependent (with the consquence that it came to the front) 
-- called ParentController.

Bernard
Xref: sparky comp.lang.lisp:2381 comp.lang.clos:787 comp.lang.misc:2962 comp.object:3468 comp.std.misc:119 comp.lang.scheme:2165 comp.ai:3368
From: SWM@stony-brook.scrc.symbolics.com (Scott McKay)
Newsgroups: comp.lang.lisp
Subject: Re: copy-array?
Date: 15 Sep 92 14:55:32 GMT
Organization: LCS news/mail gateway
X-Unparseable-Date: Tue


    Date: Mon, 14 Sep 1992 19:01 EDT
    From: Barry Margolin <barmar@think.com>

    In article <9209142212.AA24213@brownie.cs.wisc.edu> so@CS.WISC.EDU (Bryan S. So) writes:
    >This is almost the first time I seriously use arrays
    >in Common Lisp.  Now, how come there is no intrinsic
    >function to make a copy of an array?

    There was a proposal in X3J13 to extend some of the sequence functions to
    work on multidimensional arrays, but it was voted down.  That would have
    enabled COPY-SEQ to do what you want.

    It's kind of a shame that a multidimensional array can't be used as the
    :INITIAL-CONTENTS argument for MAKE-ARRAY, even when it matches the
    dimensionality of the array being built.  Then you could do:

A "shame" is an understatement.  I think that, at the very least, this
correction to MAKE-ARRAY should be proposed during the dpANS public
review period.  (Note that I do not consider this a true correction of
an error of omission, not simply an extension.)

    (make-array ... :initial-contents old-array)

    >The only algorithm I have is to make a new array then
    >assign the elements one by one.  Is there an easier/
    >more efficient method to do this?

    You can do it using displaced arrays and MAP-INTO:

    (defun copy-array (old-array)
      (let* ((type (array-element-type old-array))
	     (size (array-total-size old-array))
	     (new-array (make-array (array-dimensions old-array)
			    :element-type type))
	     (old-vector (make-array size :element-type type :displaced-to old-array))
	     (new-vector (make-array size :element-type type :displaced-to new-array)))
	(copy-into new-vector #'identity old-vector)
	new-array))

    A possibly more efficient way to implement this is:

    (defun copy-array (old-array)
      (let* ((type (array-element-type old-array))
	     (size (array-total-size old-array))
	     (old-vector (make-array size :element-type type :displaced-to old-array))
	     (new-vector (copy-seq old-vector)))
	(make-array (array-dimensions old-array) :element-type type
	    :displaced-to new-vector)))

    However, this has the misfeature that the resulting array is likely to be
    more expensive to access, because it's displaced.
    -- 
    Barry Margolin
    System Manager, Thinking Machines Corp.

    barmar@think.com          {uunet,harvard}!think!barmar
From: jeff@aiai.ed.ac.uk (Jeff Dalton)
Newsgroups: comp.lang.lisp
Subject: Re: Franz Lisp lives!
Date: 15 Sep 92 18:01:31 GMT
Organization: AIAI, University of Edinburgh, Scotland

In article <17000@ucdavis.ucdavis.edu> mock@madrone.eecs.ucdavis.edu (Kenrick Mock) writes:
>>
>>Does it include a Lisp compiler that produces code that works on a
>>386 or SPARC?
>>
>>To go from zero Franz Lisps to two would be pretty amazing.
>>
>
>Nope, the PC-Lisp out there only includes an interpreter and not a
>compiler.

Just to avoid any confusion, what I have is a Franz Lisp, with
compiler, that runs in 386BSD and that (because it compiles to C and
replaces some .s files with .c) should be more portable than ordinary
Franz.  Franz Lisp is a particular dialect of Lisp.  It's similar
to MacLisp.  If you just want _a_ Lisp for 386BSD, a number of other
ones (eg, AKCL, several Schemes) are available.

I am going to make this Franz availabel for ftp.  But various things
(such as a disk failure) are getting in the way.

-- jd
Newsgroups: comp.lang.lisp
From: charest@Aig.Jpl.Nasa.Gov (Len Charest)
Subject: Re: Function to print in #S format
Followup-To: comp.lang.lisp
Reply-To: charest@aig.jpl.nasa.gov
Organization: NASA/Jet Propulsion Laboratory
Date: Sat, 12 Sep 1992 00:20:11 GMT

In article <LIBERTE.92Sep9132646@birch.cs.uiuc.edu>, liberte@cs.uiuc.edu (Daniel LaLiberte) writes:
|> In article <1992Sep9.011022.14516@jpl-devvax.jpl.nasa.gov> charest@Aig.Jpl.Nasa.Gov (Len Charest) writes:
|> 
|>    3. (mutually exclusive) Use CLOS. Ha Ha only serious.
|> 
|> 
|> I took this suggestion seriously.  It wasnt obvious (to me) at first
|> how one is supposed to print an object readably.  I wrote the
|> following to help.  Please comment.
	[ sample code deleted]

MAKE-LOAD-FORM (CLtL2, p659) could be exploited to provide readable printed representations for structures and CLOS instances. I believe you would still need an :around method on PRINT-OBJECT to test *PRINT-READABLY* and explicitly invoke MAKE-LOAD-FORM. The real benefit of MAKE-LOAD-FORM is that it allows the programmer to decide the meaning of 'similar as a constant' for structures and CLOS instances. (Recall that objects printed while *PRINT-READABLY* is true must be similar as a constant.) CLtL2 gives 


several examples. In the first, the notion of similar as a constant is satisfied by instantiating a new instance with the same slot values as the original instance. This is the same approach used in Dan LaLiberte's code. 

As a parting shot, I'd like to point out that readable printed representations for structures (or any other object for that matter) don't necessarily have to use #S syntax. You could define a new # dispatch macro reader that simply read back in as a form to 'find' the printed object in some global cache. For example:

(defvar *bangs* nil)

(defstruct (bang
	     (:print-function print-bang)
	     (:constructor make-bang-1 (name)))
  name)

(defun make-bang (name)
  (let ((b (make-bang-1 name)))
    (push b *bangs*)
    b))

(defun print-bang (b s d)
  (declare (ignore d))
  (format s "#!~s"
	  (bang-name b)))

(defun bang-reader (s sub arg)
  (declare (ignore sub arg))
  `(find ',(read s t nil t) *bangs*))

(set-dispatch-macro-character #\# #\! #'bang-reader)

> (make-bang 'pow)
#!POW
> #!wow
NIL
> #!POW
#!POW
..................................................
                                  Len Charest, Jr.
                 JPL Artificial Intelligence Group
                          charest@aig.jpl.nasa.gov
From: carenini@cs.pitt.edu (Giuseppe Carenini)
Newsgroups: comp.lang.lisp
Subject: hypertexts in CLIM
Date: 8 Sep 92 19:53:06 GMT
Organization: Univ. of Pittsburgh Computer Science


I am looking for a system for developing hypertexts
built on top of CLIM.
Any help is greatly appreciated,
        G.

e-mail: carenini@cs.pitt.edu
-- 
Carenini Giuseppe
210 MIB
Intelligent Systems Laboratory
Department of Computer Science
Newsgroups: comp.lang.lisp
From: travt@cs.curtin.edu.au (Tony Travers)
Subject: xit
Summary: having problems with xit on lcl
Keywords: xit clue lcl
Organization: Curtin University of Technology
Date: Mon, 14 Sep 1992 11:11:46 GMT


hi

	I am having a few problems with XIT and was wondering if anyone
could help.  I have set up PCL, CLX and CLUE on a sun lisp (lcl).  The
whole thing is loaded into memory.  But XIT uses a makefile to set
itself up.  I don't quite understand how to use it.  So I worked out
what the makefile did and I tried to the equivilant from the lisp (with
the other packages in memory.

	But when I load up the define-system it doesn't recognise
defpackage.  I tried modifing the code so that defpackage is replaced by
make-package but then when I load up defsystem it says that make-module
is undefined.  Could some kind soul tell me where I am going wrong????




					Thanks

					Tony Travers
					travt@marsh.cs.curtin.edu.au
From: jeff@aiai.ed.ac.uk (Jeff Dalton)
Newsgroups: comp.lang.lisp
Subject: coroutines and lighteight processes
Date: 7 Sep 92 18:15:49 GMT
Organization: AIAI, University of Edinburgh, Scotland


 * Allegro CL has coroutines (stack groups) and lightweight processes.
 * Lucid CL seems to have only the latter.  Is that right?
 * What will be added to CMUCL, if anything?
 * Does anyone out there have anything like lightweight processes for 
   [A]KCL?
Newsgroups: comp.lang.lisp
From: inglehar@bert.eecs.uic.edu (James Inglehart)
Subject: How can I run INTERLISP?
Summary: I need to get a 1977 INTERLISP program running. Where/how can I
Keywords: interlisp
Organization: University of Illinois at Chicago
Date: Wed, 9 Sep 1992 19:56:40 GMT

I have a 1977 INTERLISP program, written at Stanford, and originally
run under TOPS-20 at the Xerox PARC facility. (Its author has suggested
to me that it may still run under "Xerox Lisp.")

I need to get this 3500-line program running as painlessly and rapidly
as possible. (I don't know INTERLISP, or any other Lisp, for that
matter.) What should I do? Here at the University of Illinois at
Chicago we have Stanford Lisp on the mainframe, but the program won't
run under it. Can any one suggest a compiler/interpreter I can access
through the net that will understand this program?

Should I resign myself to learning Lisp and translating this old program
into some more modern dialect (GNULisp, for example)? This could take me
a month or more. But I must get this program running.

Any advice from experienced Lisp programmers will be greatly appreciated.
Please contact me directly at inglehar@bert.eecs.uic.edu. Thank you.

This is my first attempt to post on nn, so please forgive any errors in
this posting.

James Inglehart
Dept. of Electrical Engineering & Computer Science
University of Illinois at Chicago
From: simon@lia.di.epfl.ch (Simon Leinen)
Newsgroups: comp.lang.lisp
Subject: Re: (ed), CLX, and OpenWindows
Date: 15 Sep 92 09:26:43 GMT
	<1992Sep15.064521.9977@newsserver.rrzn.uni-hannover.de>
Organization: DI-LIA -- Ecole Polytechnique Federale de Lausanne
In-reply-to: dehning@tnt.uni-hannover.de's message of 15 Sep 92 06:45:21 GMT
X-Md4-Signature: 96f3e90a11c684eddebf168187a54541

dehning@tnt.uni-hannover.de (Oliver Dehning) writes:

   gjw@csis.dit.csiro.au (Graham Williams) writes:

   >Short of asking OpenWindows not to use the xauthority security
   >mechanism, how can I convince OpenWindows that the editor is
   >authorised!

   There is a patch to CLX from Simon Leinen <simon@lia.di.epfl.ch>:

The alternative to using this patch is to install the brand new CLX
on export.lcs.mit.edu:/contrib/CLX.R5.02.tar.Z - it implements
xauth-based authorization in a cleaner way.  You may still have to
use a HOST-ADDRESS implementation from my patch because the new CLX
implements it for a different set of Lisps.
--  
Simon.
From: goldstei@cgi.com ("Morris Goldstein")
Newsgroups: comp.lang.lisp
Subject: Examples using foreign functions
Date: 15 Sep 92 14:34:24 GMT

We are replacing a component of our Lucid Lisp based application with
a library written in C and are struggling with the foreign function
interface.  In particular, we need to call lisp functions from C and
return a value to the caller that could be any one of the following:

	integer
	string
	real
	list

Where a list can contain elements of any of the above types.  Any
example code and suggestions would be muchly appreciated.

Thanks,

	-Morris
Newsgroups: comp.lang.lisp
From: fy@lucid.com (Frank Yellin)
Subject: Re: copy-array?
Organization: Lucid, Inc., Menlo Park, CA
Date: 14 Sep 92 16:08:39

In article <9209142212.AA24213@brownie.cs.wisc.edu> so@CS.WISC.EDU (Bryan S. So) writes:

>   This is almost the first time I seriously use arrays
>   in Common Lisp.  Now, how come there is no intrinsic
>   function to make a copy of an array?

It's called #'copy-seq

-- Frank Yellin
   fy@lucid.com
Newsgroups: comp.lang.lisp
From: jeff@aiai.ed.ac.uk (Jeff Dalton)
Newsgroups: comp.lang.lisp,comp.lang.lisp.franz,comp.unix.bsd
Subject: Franz Lisp lives!
Date: 8 Sep 92 18:15:02 GMT
Organization: AIAI, University of Edinburgh, Scotland

>        * A Franz Lisp environment which includes:
>            - An interpreter (lisp, at least version Opus 38.22).
>            - A compiler (liszt, at least version 8.08 [.22]).

I have a compile-to-C version of Liszt that I developed a number of
years ago and (together with some other people) I've recently made
Franz Lisp work in 386BSD.  So, although I don't have time to do it
myself right now, this version of Franz should be fairly easy to
port to Sparcs and to random "Berkeley Unix" machines in general.
If there is any interest in this, I will try to make the sources
available fairly soon.

-- jd
From: waander@cs.umd.edu (Bill Andersen)
Newsgroups: comp.lang.lisp
Subject: Selective compilation of reader macro forms...
Date: 7 Sep 92 07:53:49 GMT
Organization: U of Maryland, Dept. of Computer Science, Coll. Pk., MD 20742


  I have a reader macro which I want to do two different things depending on
whether the form following the macro is being compiled, or is being
entered interactively.  The best way to show this is with an example:

(defun lookup (name)
  (or (gethash name *table*)
      (error "Sorry, ~s is not in *table*" name)))

(defun read-thing (stream sub-char infix-arg)
  ...read name as a string from <stream>
  ...call (lookup <name>)
  )

(set-dispatch-macro-character #\# #\$ 'read-thing)

==========

I want to be able to compile a function referencing #$Foo
without having to worry about an error if "Foo" is not in
*table* during compilation.  I just want a call to 
(lookup "Foo") compiled into the function.  Example of
how this should work follows:

> #$Foo 
#<thing named "Foo">

> (defun doit () #%Foo)
DOIT

> (doit)
#<thing named "Foo">

==========

  Thanks in advance...

  ...bill
Newsgroups: comp.lang.lisp