jak-project/test/goalc/source_templates/with_game/test-insert-cons.gc

(define format _format)

(let ((alist (list (cons 'a 'b)
                   (cons 'c 'd)
                   (cons 'e 'f))))
  (set! alist (insert-cons! (cons 'c 'w) alist))
  (format #t "~A~%" alist)
  )
  0