;ELC ;;; compiled by jwz@thalidomide on Wed May 25 21:53:25 1994 ;;; from file /u/jwz/emacs19/lisp/eos/eos-init.el ;;; emacs version 19.10 Lucid. ;;; bytecomp version 2.24; 26-Apr-94. ;;; optimization is on. ;;; this file uses opcodes which do not exist in Emacs 18. (if (and (boundp 'emacs-version) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19"))) (error "This file was compiled for Emacs 19.")) (byte-code "À‡" ["1.3" eos::version nil] 1) (defvar eos::left-margin-width 5 "\ size of left margin") (defvar eos::use-left-margin-per-screen nil "\ leave the left margin on whever screen is selected in eos (unimplemented)") (defvar eos::stop-color "red" "\ foreground color for stop signs") (defvar eos::solid-arrow-color "purple" "\ foreground color for solid arrow") (defvar eos::hollow-arrow-color "purple" "\ foreground color for hollow arrow") (defvar eos::sbrowse-arrow-color "blue" "\ foreground color for browser glyphs") (fset 'eos::recompute-presentation #[nil "ÀÁ\n\"ˆÀà \"ˆÀÅ\"ˆÀÇ\"‡" [set-face-foreground stop-face eos::stop-color solid-arrow-face eos::solid-arrow-color hollow-arrow-face eos::hollow-arrow-color sbrowse-arrow-face eos::sbrowse-arrow-color] 3]) (defvar eos::base-directory nil "\ location for .xbm and .so's") (byte-code "ÀÁMˆÂÃÀÄ#‡" [eos::start #[nil "?­› ¬†Â !ÄP BÆ ˆÇ ˆÈ ˆÉ ˆÊ ‡" [noninteractive eos::base-directory directory-file-name data-directory "/sparcworks" x-bitmap-file-path eos::editor-startup eos::debugger-startup eos::debugger-extra-startup eos::browser-startup eos::menubar-startup] 2] add-hook before-init-hook t] 4)