1
0
mirror of https://github.com/PDP-10/its.git synced 2026-02-14 20:06:27 +00:00
Files
PDP-10.its/src/bsg/cubpkg.31
Lars Brinkhoff 979b77f341 CUBE, Rubik's cube.
Files provided by the author, Bernard Greenberg.
2020-08-10 22:08:00 +02:00

23 lines
519 B
Common Lisp

;;; -*- Mode: LISP -*-
(load "lispm2;let qfasl")
(package-declare cube global 5000.
(("bsg;cubrdf qfasl" defs)
("bsg;cbdcls qfasl" defs)
("bsg;csdcls qfasl" defs)
("bsg;oonl qfasl" defs)
("bsg;cube qfasl")
("bsg;cutils qfasl")
("bsg;csolve qfasl")
("bsg;cxfrm qfasl")
("bsg;qqc qfasl")
("bsg;qcolor qfasl"))
(shadow push *array array fillarray listarray)
(myrefname global c))
(let ((inhibit-fdefine-warnings t))
(pkg-load 'cube '(:noconfirm)))
(defun cube ()
(cube:run-cube))