3 MacLisp/Nilaid bugs

[Scott at SRI-KL (Scott J. Kramer)]

[1] TO-STRING losses after converting several long SYMBOLs to STRINGs.  I
     tested this on smaller SYMBOLs and it apparently worked.  It doesn't
     work in either MacLisp or Nilaid on ITS or 20x, but work okay in NIL
     simulation on ITS.

!na:

NILAID 90

NIL 
(load '((scott) loss))
T 
(loss)
1. This is a line to determine how long it takes TO-STRING to barfThis is a line
 to determine how ..... a line to determine how long it takes TO-STRING to barf
2. This is a line ... to barf
   {time and boredom pass}
10. This is .... TO-STRING to barf
11. 
;(NIL . 1. . 39143. . (NIL . 190. . 39141. . (NIL . 379. . 39138. . (NIL . 39139
. . 39135. . (NIL . 39136. . 39132. . (NIL . 39133. . 39129. . (NIL . 39130. . 3
9126. .

  {it goes on for awhile, then...}

 .) .) .) .) .) .) .) .) .) .) STRING bug detected by STR:GC-DAEMON

;BKPT FAIL-ACT

			*	*	*

Here's the LOSS function I used to demo this:

(do ((i 1 (1+ i)))	 ;Where are we
    (())		 ;Do forever
    (print i)		 ;Show index
    (princ (to-string s)))	 ;"s" is a very long SYMBOL (947. chars)

----------------------------------------------------------------------
[2] DEFAULTF in Nilaid on 20x is wrong.

defaultf 
((PS MACLISP) * FASL *) 

----------------------------------------------------------------------
[3] OPEN doesn't work in either MacLisp or Nilaid for file without
     extensions on 20x.
!v test.*.* 

   PS:<SCOTT>
 TEST..1;P775252            1 550(7)       25-Mar-80 06:26:54 SCOTT     

(open '|<scott>test..1|)
;(OPEN |<scott>test..1|) FILE NOT FOUND

;BKPT IO-LOSSAGE
----------------------------------------------------------------------

I heard a rumor that STRINGs aren't supposed to work in MacLisp but I
thought I'd pass this along anyways.

-sjk
-------