(type egg)
(signature "debugging egg")
(timestamp 1612269484)
(sxml ((section 2 "Outdated egg!" (p "This is an egg for CHICKEN 4, the unsupported old release.  You're almost certainly looking for " (int-link "/eggref/5/allegro" "the CHICKEN 5 version of this egg") ", if it exists.") (p "If it does not exist, there may be equivalent functionality provided by another egg; have a look at the " (link "https://wiki.call-cc.org/chicken-projects/egg-index-5.html" "egg index") ". Otherwise, please consider porting this egg to the current version of CHICKEN.") (tags "allegro" "game")) (section 2 "allegro" (p "This document pertains to debugging related methods found in the Allegro egg.") (p "Please see the main [allegro] wiki page for more information.") (toc)) (section 2 "Functions" (section 3 "Debugging" (def (sig (procedure "(trace-prefix (string channel) (int level) (string file) (int line) (string function))" (id trace-prefix))) (p "Implements _al_trace_prefix.")) (def (sig (procedure "(trace-level-debug)" (id trace-level-debug))) (p "Implements ALLEGRO_DEBUG.")) (def (sig (procedure "(trace-level-info)" (id trace-level-info))) (p "Implements ALLEGRO_INFO.")) (def (sig (procedure "(trace-level-warn)" (id trace-level-warn))) (p "Implements ALLEGRO_WARN.")) (def (sig (procedure "(trace-level-error)" (id trace-level-error))) (p "Implements ALLEGRO_ERROR.")) (def (sig (procedure "(debug-assert bool)" (id debug-assert))) (p "Implements ALLEGRO_ASSERT."))) (section 3 "Errors" (def (sig (procedure "(error-number)" (id error-number))) (p "Implements al_get_errno.")) (def (sig (procedure "(error-number-set!)" (id error-number-set!))) (p "Implements al_set_errno."))))))
