From ...
From: Erik Naggum <erik@naggum.no>
Subject: Re: saving lisp object into a file
Date: 1996/07/02
Message-ID: <3045304265121858@arcana.naggum.no>#1/1
X-Deja-AN: 163287095
references: <DtwKov.AJv@murdoch.acc.Virginia.EDU>
organization: Dept. of Informatics, University of Oslo, Norway
newsgroups: comp.lang.lisp


[Timothy Yi]

|   I have a folling object to save, and read later on.
|   
|   (setf a '((1 2) (1 3) (2 3)) )
|   (setf b '((2 3) (2 5) (3 5)) )
|   (setf c (make-array 2) )
|   (setf (aref c 0) a)
|   (setf (aref c 1) b)
|   
|   i would like to save "c" into a file. but all i could save was
|   #<Simple-Vector T 2 A4098E>

this happens when *PRINT-ARRAY* is nil.  set or bind it to T, and you will
obtain a readable form as in:

    #(((1 2) (1 3) (2 3)) ((2 3) (2 5) (3 5)))

the `write' function has a keyword argument :array that control this.  it
defaults to the the value of *PRINT-ARRAY*.