Mercurial > vba-clojure

comparison clojure/com/aurellem/run/bootstrap_0.clj @ 297:528dc923d4c5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
mapping out characters-as-items to avoid corrupt items.
author Robert McIntyre <rlm@mit.edu>
date Fri, 30 Mar 2012 22:35:08 -0500
parents 659a9c84c785
children 0b3e89103dc2
comparison
equal deleted inserted replaced
296:659a9c84c785 297:528dc923d4c5
761 ([] (create-header (begin-deposits))) 761 ([] (create-header (begin-deposits)))
762 ([script] 762 ([script]
763 (->> script 763 (->> script
764 (multiple-times 33 deposit-one-item) 764 (multiple-times 33 deposit-one-item)
765 (do-nothing 1)))) 765 (do-nothing 1))))
766 766
767 (defn bootstrap-init []
768 [(read-moves "bootstrap-init")
769 (read-state "bootstrap-init")])
767 770
768 (defn create-bootstrap-program 771 (defn create-bootstrap-program
769 ([] (create-bootstrap-program 772 ([] (create-bootstrap-program
770 (create-header))) 773 (create-header)))
771 ([script] 774 ([script]
778 781
779 782
780 783
781 (do-nothing 1)))) 784 (do-nothing 1))))
782 785
783 786