/[guile]/guile/guile-core/ice-9/boot-9.scm
ViewVC logotype

Diff of /guile/guile-core/ice-9/boot-9.scm

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

revision 1.311 by mdj, Wed Mar 12 19:27:15 2003 UTC revision 1.312 by mvo, Sat Mar 22 00:34:34 2003 UTC
# Line 136  Line 136 
136  (define (1+ n) (+ n 1))  (define (1+ n) (+ n 1))
137  (define (1- n) (+ n -1))  (define (1- n) (+ n -1))
138  (define (and=> value procedure) (and value (procedure value)))  (define (and=> value procedure) (and value (procedure value)))
139    (define call/cc call-with-current-continuation)
140    
141  ;;; apply-to-args is functionally redundant with apply and, worse,  ;;; apply-to-args is functionally redundant with apply and, worse,
142  ;;; is less general than apply since it only takes two arguments.  ;;; is less general than apply since it only takes two arguments.

Legend:
Removed from v.1.311  
changed lines
  Added in v.1.312

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