[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Strange File Lossage

In Symbolics 3600 ZWEI in Release 6.0, IP-TCP 29.0, AISite 9.4,
microcode TMC5-MIC 319, on Lisp Machine Apiary-9:

Does Anybody know why this happens??  This seems to occur randomly.  It isn't
directory specific, though.  I sent a report on the same phenomenon several
months ago, but we were unable to resolve anything...largely because this
occurs so randomly and seldolmly.

I'd appreciate any ideas.

Thanks,

TOMR

(DEF-SAFE-SUBST DO-MESSAGE (TARGET)
  (LET ((NEW-TARGET (COND ;;have to check for a Forwarding Actor here
                      ((FORWARDING-ACTOR? TARGET) (FOLLOW-FORWARD-TO TARGET))
                      (T ;;otherwise vanilla Actor, had better be a Communication
                       TARGET))))
    (IF (INSTANCE? NEW-TARGET)
        (SEND NEW-TARGET :MESSAGE)
        ;;verifying thGET) 
  (SEND TARGET :INIT))

PS> Def-Safe-Subst is just a macro that expands into a defsubst and wraps its
args in a Let to guard against multiple/out-of-order evaluation.

Thanks again.