/[gcl]/gcl/clcs/clcs_kcl_cond.lisp
ViewVC logotype

Diff of /gcl/clcs/clcs_kcl_cond.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by camm, Tue Oct 7 21:06:32 2003 UTC revision 1.4 by camm, Thu Oct 23 15:09:53 2003 UTC
# Line 100  Line 100 
100      ("FEinvalid_function" :invalid-function "~S is invalid as a function."      ("FEinvalid_function" :invalid-function "~S is invalid as a function."
101       internal-type-error :datum :expected-type) ; |obj|       internal-type-error :datum :expected-type) ; |obj|
102      ("FEinvalid_variable" :invalid-variable "~S is an invalid variable."      ("FEinvalid_variable" :invalid-variable "~S is an invalid variable."
103       internal-program-error) ; |obj|       internal-simple-program-error ) ; |obj|
104      ("check_arg_failed" :too-few-arguments "~S [or a callee] requires ~R argument~:p,~%\      ("check_arg_failed" :too-few-arguments "~S [or a callee] requires ~R argument~:p,~%\
105  but only ~R ~:*~[were~;was~:;were~] supplied."  but only ~R ~:*~[were~;was~:;were~] supplied."
106       internal-simple-program-error) ; |<function>| |n| |top - base|       internal-simple-program-error) ; |<function>| |n| |top - base|
# Line 135  but only ~R ~:*~[were~;was~:;were~] supp Line 135  but only ~R ~:*~[were~;was~:;were~] supp
135       internal-simple-file-error :pathname)       internal-simple-file-error :pathname)
136      ("open_stream" :error "~S is an illegal IF-EXISTS option."      ("open_stream" :error "~S is an illegal IF-EXISTS option."
137       internal-simple-control-error)       internal-simple-control-error)
138        ("control error" :control-error "control error"
139         internal-simple-control-error)
140      ("close_stream" :error "Cannot close the standard output."      ("close_stream" :error "Cannot close the standard output."
141       internal-simple-stream-error) ; no stream here!!       internal-simple-stream-error) ; no stream here!!
142      ("close_stream" :error "Cannot close the standard input."      ("close_stream" :error "Cannot close the standard input."

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26