(ASSEMBLE.CLAUSE ( init_system 0 si ) 52
    (allocate)
    (load.pos.word 1)
    (settopval QP%.TOP%.TRACE%.STATE)
    (load.pos.word 1)
    (settopval QP%.TRACE%.STATE)
    (load.pos.word 15)
    (settopval QP%.LEASH)
    (load.pos.word 15)
    (settopval QP%.LEASH%.SPY)
    (load.pos.word 0)
    (settopval QP%.BACKUP%.MODE)
    (load.pos.word 1)
    (settopval QP%.UNKNOWN)
    (load.pos.word 10)
    (settopval QP%.DEBUG%.PRINT%.DEPTH)
    (load.constant 100000)
    (settopval QP%.MAXDEPTH)
    (load.pos.word 1)
    (settopval QP%.STKSHFLG)
    (load.pos.word 1)
    (settopval QP%.STREAM%.COUNTER)
    (call 3 init_style_checking 0 si)
    (put.Ai.symbol 3 off)
    (put.Ai.void 2)
    (put.Ai.symbol 1 character_escapes)
    (depart prolog_flag 3 si)
)

(ASSEMBLE.CLAUSE ( init_style_checking 0 si ) 7
    (allocate)
    (put.Ai.symbol 1 all)
    (call 3 style_check 1 si)
    (depart.cut)
)

(ASSEMBLE.CLAUSE ( init_style_checking 0 si ) 1
    (proceed)
)

(ASSEMBLE.CLAUSE ( init_world 0 si ) 7
    (allocate)
    (load.pos.word 0)
    (settopval QP%.BREAK%.LEVEL)
    (depart mode_line_changed 0 si)
)

(ASSEMBLE.CLAUSE ( init_after_restore 0 si ) 6
    (allocate)
    (call 3 reset_editor_state 0 si)
    (depart mode_line_changed 0 si)
)

(ASSEMBLE.CLAUSE ( pre_init_debugging 0 si ) 7
    (gettopval QP%.TOP%.TRACE%.STATE)
    (store.variable.Xn 1)
    (load.value.Xn 1)
    (settopval QP%.TRACE%.STATE)
    (proceed)
)

(ASSEMBLE.CLAUSE ( init_debugging 0 si ) 9
    (allocate)
    (gettopval QP%.TOP%.TRACE%.STATE)
    (store.variable.Xn 1)
    (load.value.Xn 1)
    (settopval QP%.TRACE%.STATE)
    (depart init_for_goal 0 si)
)

(ASSEMBLE.CLAUSE ( init_no_debugging 0 si ) 7
    (allocate)
    (load.pos.word 1)
    (settopval QP%.TRACE%.STATE)
    (depart init_for_goal 0 si)
)

(ASSEMBLE.CLAUSE ( init_for_goal 0 si ) 14
    (allocate)
    (load.pos.word 0)
    (settopval QP%.INVOCATION%.COUNT)
    (load.pos.word 0)
    (settopval QP%.FIRST%.TRAP)
    (load.pos.word 0)
    (settopval QP%.INSIDE%.DEBUGGER)
    (progress)
)

(ASSEMBLE.CLAUSE ( debug_state 1 si ) 9
    (put.Ai.value.Xn 2 1)
    (gettopval QP%.TOP%.TRACE%.STATE)
    (store.variable.Xn 3)
    (put.Ai.value.Xn 1 3)
    (execute state_decode 2 si)
)

(ASSEMBLE.CLAUSE ( state_decode 2 si ) 6
    (get.Ai.constant 1 1)
    (get.Ai.symbol 2 nodebug)
    (cut.proceed)
)

(ASSEMBLE.CLAUSE ( state_decode 2 si ) 6
    (get.Ai.constant 1 2)
    (get.Ai.symbol 2 trace)
    (cut.proceed)
)

(ASSEMBLE.CLAUSE ( state_decode 2 si ) 6
    (get.Ai.constant 1 3)
    (get.Ai.symbol 2 debug)
    (cut.proceed)
)

(ASSEMBLE.CLAUSE ( state_decode 2 si ) 6
    (get.Ai.constant 1 4)
    (get.Ai.symbol 2 skipping)
    (cut.proceed)
)

(ASSEMBLE.CLAUSE ( state_decode 2 si ) 5
    (get.Ai.structure 2 INVALID 1)
    (unify.local.Xn 1)
    (proceed)
)

(ASSEMBLE.CLAUSE ( get_break_state 2 si ) 18
    (allocate)
    (get.Ai.variable.Yn 2 1)
    (call 4 get_state 1 si)
    (gettopval QP%.BREAK%.LEVEL)
    (store.variable.Xn 1)
    (load.value.Xn 1)
    (add.pos.word 1)
    (store.value.Yn 1)
    (load.value.Yn 1)
    (settopval QP%.BREAK%.LEVEL)
    (depart mode_line_changed 0 si)
)

(ASSEMBLE.CLAUSE ( set_break_state 2 si ) 15
    (allocate)
    (get.Ai.variable.Yn 2 1)
    (call 4 set_state 1 si)
    (load.value.Yn 1)
    (add.neg.word -1)
    (store.variable.Xn 1)
    (load.value.Xn 1)
    (settopval QP%.BREAK%.LEVEL)
    (depart mode_line_changed 0 si)
)

(ASSEMBLE.CLAUSE ( get_state 1 si ) 28
    (get.Ai.structure 1 state 6)
    (unify.variable.Xn 6)
    (unify.variable.Xn 5)
    (unify.variable.Xn 4)
    (unify.variable.Xn 3)
    (unify.variable.Xn 2)
    (unify.variable.Xn 1)
    (gettopval QP%.TRACE%.STATE)
    (store.value.Xn 6)
    (gettopval QP%.FIRST%.TRAP)
    (store.value.Xn 5)
    (gettopval QP%.INVOCATION%.COUNT)
    (store.value.Xn 4)
    (gettopval QP%.SKIP%.INVOCATION)
    (store.value.Xn 3)
    (gettopval QP%.INSIDE%.DEBUGGER)
    (store.value.Xn 2)
    (gettopval QP%.LURCH)
    (store.value.Xn 1)
    (proceed)
)

(ASSEMBLE.CLAUSE ( set_state 1 si ) 29
    (get.Ai.structure 1 state 6)
    (unify.variable.Xn 6)
    (unify.variable.Xn 5)
    (unify.variable.Xn 4)
    (unify.variable.Xn 3)
    (unify.variable.Xn 2)
    (unify.variable.Xn 1)
    (allocate)
    (load.value.Xn 6)
    (settopval QP%.TRACE%.STATE)
    (load.value.Xn 5)
    (settopval QP%.FIRST%.TRAP)
    (load.value.Xn 4)
    (settopval QP%.INVOCATION%.COUNT)
    (load.value.Xn 3)
    (settopval QP%.SKIP%.INVOCATION)
    (load.value.Xn 2)
    (settopval QP%.INSIDE%.DEBUGGER)
    (load.value.Xn 1)
    (settopval QP%.LURCH)
    (progress)
)

(ASSEMBLE.CLAUSE ( ttyeol_get 1 si ) 27
    (allocate)
    (get.Ai.variable.Yn 1 2)
    (put.Ai.variable.Yn 1 1)
    (call 5 current_input 1 si)
    (put.Ai.symbol 1 user)
    (call 5 set_input 1 si)
    (put.Ai.value.Yn 1 2)
    (call 5 get0 1 si)
    (put.Ai.value.Yn 1 2)
    (call 4 ttyeol 1 si)
    (put.Ai.unsafe.Yn 1 1)
    (depart set_input 1 si)
)

(ASSEMBLE.CLAUSE ( ttyeol 1 si ) 4
    (get.Ai.constant 1 13)
    (cut.proceed)
)

(ASSEMBLE.CLAUSE ( ttyeol 1 si ) 10
    (allocate)
    (put.Ai.variable.Yn 1 1)
    (call 4 get0 1 si)
    (put.Ai.unsafe.Yn 1 1)
    (depart ttyeol 1 si)
)

STOP