mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-29 14:30:34 +02:00
(system repl command) autoloads the compiler, disassembler, and profiler.
* module/system/repl/command.scm: Autoload (system base compile), (system vm disassembler), and (statprof).
This commit is contained in:
parent
96e3686db1
commit
5a389ca728
1 changed files with 6 additions and 4 deletions
|
@ -1,6 +1,6 @@
|
|||
;;; Repl commands
|
||||
|
||||
;; Copyright (C) 2001, 2009, 2010, 2011, 2012, 2013, 2020 Free Software Foundation, Inc.
|
||||
;; Copyright (C) 2001, 2009, 2010, 2011, 2012, 2013, 2020, 2021 Free Software Foundation, Inc.
|
||||
|
||||
;; This library is free software; you can redistribute it and/or
|
||||
;; modify it under the terms of the GNU Lesser General Public
|
||||
|
@ -22,10 +22,12 @@
|
|||
(define-module (system repl command)
|
||||
#:use-module (system base syntax)
|
||||
#:use-module (system base pmatch)
|
||||
#:use-module (system base compile)
|
||||
#:autoload (system base compile) (compile-file)
|
||||
#:use-module (system repl common)
|
||||
#:use-module (system repl debug)
|
||||
#:use-module (system vm disassembler)
|
||||
#:autoload (system vm disassembler) (disassemble-image
|
||||
disassemble-program
|
||||
disassemble-file)
|
||||
#:use-module (system vm loader)
|
||||
#:use-module (system vm program)
|
||||
#:use-module (system vm trap-state)
|
||||
|
@ -42,7 +44,7 @@
|
|||
#:use-module ((ice-9 pretty-print) #:select ((pretty-print . pp)))
|
||||
#:use-module ((system vm inspect) #:select ((inspect . %inspect)))
|
||||
#:use-module (rnrs bytevectors)
|
||||
#:use-module (statprof)
|
||||
#:autoload (statprof) (statprof)
|
||||
#:export (meta-command define-meta-command))
|
||||
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue