[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.
(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
(IF (INSTANCE? NEW-TARGET)
(SEND NEW-TARGET :MESSAGE)
;;verifying th GET)
(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.