mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 20:00:19 +02:00
Code Activity

Fix typos leading to wrong argument counts.

Browse source 
* module/ice-9/channel.scm (eval): Fix number of arguments to
  `guile:eval'.

* module/oop/goops/save.scm (write-readably): Fix number of arguments to
  `write-array'.

* module/srfi/srfi-19.scm (priv:char->int): Fix number of arguments to
  `priv:time-error'.
This commit is contained in:
Ludovic Courtès 2009-11-07 19:24:49 +01:00
parent cdd73a8d69
commit 5658035c9c
3 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

2
module/oop/goops/save.scm
View file

@ -270,7 +270,7 @@
(display "(list->uniform-array " file)
(display (array-rank o) file)
(display " '() " file)
(write-array "(list " o file env)))))
(write-array "(list " o #f file env)))))
;;;
;;; Pairs