start-self.k

   1 ;; Setup Trylid's runtime.
   2 (load "library/trylid.k")
   3 ;; Uncomment the next line to run the self-generated compiler:
   4 (set *jolt-sources-path* '".jolt-sources-self/")
   5 (load-trylid)
   6
   7 ;; Add nice debugging stuff to Pepsi.
   8 [[(import "Expression") _vtable] methodAt: '_debugName put: closure-returner with: "PepsiExpression"]
   9 [[(import "String") _vtable] methodAt: '_debugName put: closure-returner with: "PepsiString"]
  10
  11 ;; Pre-load the program.
  12 (load [[*jolt-sources-path* , '"load.k"] _stringValue])
  13
  14
  15 ;; Run the program.
  16 (define prog-args [(trylid-proto Standard List) new])
  17 [prog-args append: (trylid-string "trylid")]
  18 [Trylid main: prog-args]
  19