|
|
researchv9-SUN3(old)
(extern DCL) (local LOCAL) (global GLOBAL #) (global-string SGLOBAL �2&#) (global-string= SGLOBAL �#�1&) (local-string SDCL) (return SIMPLE ) (top-killstack $SIMPLE ) (start-of-line SIMPLE ) (back SIMPLE ) (capitalize-character SIMPLE ) (delete-forward $SIMPLE ) (end-of-line SIMPLE ) (forward SIMPLE ) (beep SIMPLE ) (delete-back $SIMPLE ) (tab SIMPLE \011) (newline SIMPLE \012) (kill-line $SIMPLE ) (refresh SIMPLE ) (down SIMPLE ) (open-line SIMPLE ) (up SIMPLE ) (insert INSERT ) (reverse-search STRING ) (search STRING ) (transpose SIMPLE ) (next-page SIMPLE ) (kill-region $SIMPLE ) (restore STRING ) (exit SIMPLE ) (arg NUMBER ) (invocation-char UNARY �) (1 NUMBER ) (last NUMBER ) (delete-last-word $SIMPLE �) (redisplay-page SIMPLE �) (mail SIMPLE �) (literal QUOTE �) (quote QUOTE ) (repeat-character CHAR ) (regular-replace MAP �) (ed-regular-replace MAP �) (regular-search STRING �) (execute SIMPLE �) (arg= UNARY �) (invocation-char= UNARY ��) (mark SIMPLE �) (run-command STRING �) (buffer-to-command STRING �) (command-to-buffer STRING �) (sub-process STRING ��) (fill-buffer SIMPLE �) (fill-region SIMPLE �) (comment SIMPLE �) (map-keys MAP �) (assign-key-to-macro MAP �) (top SIMPLE �) (bottom SIMPLE �) (help UNARY �) /wont work/ (expand-environment $STRING �) (insert-ascii SIMPLE �) (underline-word SIMPLE �) (start-of-sentence SIMPLE �) (back-word SIMPLE �) (capitalize-word SIMPLE �) (delete-next-word $SIMPLE �) (end-of-sentence SIMPLE �) (forward-word SIMPLE �) (goto-line SIMPLE �) (show-modes SIMPLE �) (pickup-region $SIMPLE �) (replace MAP �) (ed-replace MAP �) (statistics SIMPLE �) (set-terminal-type STRING �) (back-page SIMPLE �) (wallchart SIMPLE �) (backspace-killstack SIMPLE �) (coredump SIMPLE �) (sequence BEGIN ) (unmodify SIMPLE �) (buffer-modified SIMPLE ��) (next-argument $SIMPLE ) (change-buffer STRING ) (exit-emacs SIMPLE ) (change-directory STRING ) (recursive-edit SIMPLE ) (simulate STRING �) (edit-file STRING ) (interrupt-process SIMPLE ) (input-file STRING \011) (kill-buffer STRING ) (set-mode STRING ) (get-mode STRING ��) (change-file-name STRING ) (change-buffer-name STRING ) (other-window SIMPLE ) (current-character SIMPLE ) (read-file STRING ) (insert-file STRING ) (save-buffer SIMPLE ) (send-region-to-buffer STRING ) (update-display SIMPLE �) (pause SIMPLE ) (get-version $SIMPLE ) (write-file STRING ) (append-file STRING ) (exchange-mark SIMPLE ) (grow-window SIMPLE ) (case CASE ) (exchange-killstack SIMPLE %) (string-<= STRING �&) (string-== STRING &) (string-< STRING �&) (string-> STRING �&) (string-!= STRING �&) (string->= STRING �&) (start-keyboard-macro SIMPLE \050) (end-keyboard-macro SIMPLE \051) (append-to-killstack SIMPLE +) (pop-killstack $SIMPLE -) (one-window SIMPLE 1) (two-window STRING 2) (push $SSTRING <) (Lpush $STRING @) (display-prompt SSTRING �<) (Ldisplay-prompt STRING �@) (read-character SSTRING �<) (Lread-character STRING �@) (output-raw-characters SSTRING �<) (Loutput-raw-characters STRING �@) (read-line $SSTRING �<) (Lread-line $STRING �@) (file-line SIMPLE �=) (file-character SIMPLE =) (screen-line SIMPLE �=) (screen-character SIMPLE �=) (first-visible-line SIMPLE �=) (last-visible-line SIMPLE �=) (window-top SIMPLE �=) (window-bottom SIMPLE �=) (duplicate-killstack $SIMPLE >) (copy-killstack STRING @) (display-killstack STRING �@) (read-character-killstack STRING �@) (output-raw-killstack STRING �@) (read-line-killstack $STRING �@) (stack-buffer $SIMPLE B) (execute-keyboard-macro SIMPLE E) (stack-filename $SIMPLE F) (trace UNARY T) (while WHILE ^) (define-macro SIMPLE d) (load-macro STRING ) (goto-screen SIMPLE g) (set-key STRING k) (cond COND |) (<= BINARY �~) (== BINARY ~) (< BINARY �~) (> BINARY �~) (!= BINARY �~) (>= BINARY �~) (|| BINARY �~) (&& BINARY �~) (not UNARY �~) (false SIMPLE �~ (true SIMPLE \040) (else SIMPLE \040) (+ BINARY �1~) (- BINARY �2~) (* BINARY �3~) (/ BINARY �4~) (& BINARY �8~) (| BINARY �9~) (^ BINARY �0~) (% BINARY �5~) (mod BINARY �5~) (convert-to-string $UNARY �6~) (convert-to-number STRING �7~) (unget-character UNARY �1~) (input-count SIMPLE �2~) (append-strings $STRING �&) (string-index STRING �&) (substring $BINARY �&) (string-length STRING �0&) (format $STRING �3&)
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.