remove check_arg from room_report - gcl.git - GNU Common Lisp

index : gcl.git
GNU Common Lisp
summary refs log tree commit diff
diff options
context:
space:
mode:
authorCamm Maguire <camm@debian.org>2013年10月17日 17:54:29 +0000
committerCamm Maguire <camm@debian.org>2013年10月17日 17:54:29 +0000
commit0bebb07a681c28de51d80e3c3bd79b8ef241fc22 (patch)
tree32c2bb3a53012dc006f469fe8902b0283caf7fb7
parent59595512b810d13f3d4f53f9443b6c7c71bf41f4 (diff)
downloadgcl-0bebb07a681c28de51d80e3c3bd79b8ef241fc22.tar.gz
remove check_arg from room_report
Diffstat
-rwxr-xr-xgcl/o/gbc.c 2
1 files changed, 0 insertions, 2 deletions
diff --git a/gcl/o/gbc.c b/gcl/o/gbc.c
index 850f86c30..97aef9d80 100755
--- a/gcl/o/gbc.c
+++ b/gcl/o/gbc.c
@@ -1563,8 +1563,6 @@ DEFUN("ROOM-REPORT",object,fSroom_report,SI,0,0,NONE,OO,OO,OO,OO,(void),"") {
object x=Cnil;
int i;
- check_arg(0);
-
x=make_cons(make_fixnum(real_maxpage-first_data_page),x);
x=make_cons(make_fixnum(available_pages),x);
x=make_cons(make_fixnum(ncbpage),x);
generated by cgit v1.2.3 (git 2.39.1) at 2025年09月03日 23:35:34 +0000

AltStyle によって変換されたページ (->オリジナル) /