removed obsolete (ikarus system $io) library.
This commit is contained in:
		
							parent
							
								
									2ac39cfad0
								
							
						
					
					
						commit
						91b8f90715
					
				| 
						 | 
				
			
			@ -21,7 +21,6 @@
 | 
			
		|||
    (ikarus system $codes)
 | 
			
		||||
    (ikarus system $pairs)
 | 
			
		||||
    (ikarus system $structs)
 | 
			
		||||
    (ikarus system $io)
 | 
			
		||||
    (ikarus system $bytevectors)
 | 
			
		||||
    (ikarus system $fx)
 | 
			
		||||
    (ikarus system $chars)
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -33,7 +33,6 @@
 | 
			
		|||
    (ikarus system $chars)
 | 
			
		||||
    (ikarus system $pairs)
 | 
			
		||||
    (ikarus system $strings)
 | 
			
		||||
    (ikarus system $io)
 | 
			
		||||
    (except (ikarus) 
 | 
			
		||||
      char-downcase char-upcase char-titlecase char-foldcase
 | 
			
		||||
      char-ci=? char-ci<? char-ci<=? char-ci>? char-ci>=?
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -1 +1 @@
 | 
			
		|||
1208
 | 
			
		||||
1209
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -248,7 +248,6 @@
 | 
			
		|||
    [$ports      (ikarus system $ports)                #f     #t]
 | 
			
		||||
    [$codes      (ikarus system $codes)                #f     #t]
 | 
			
		||||
    [$tcbuckets  (ikarus system $tcbuckets)            #f     #t]
 | 
			
		||||
    [$io         (ikarus system $io)                   #f     #t]
 | 
			
		||||
    [$arg-list   (ikarus system $arg-list)             #f     #t]
 | 
			
		||||
    [$stack      (ikarus system $stack)                #f     #t]
 | 
			
		||||
    [$interrupts (ikarus system $interrupts)           #f     #t]
 | 
			
		||||
| 
						 | 
				
			
			@ -339,7 +338,6 @@
 | 
			
		|||
    ;[with-input-from-string                      i]
 | 
			
		||||
    [open-output-string                          i]
 | 
			
		||||
    [open-output-bytevector                      i]
 | 
			
		||||
    ;[open-input-string                           i]
 | 
			
		||||
    [get-output-string                           i]
 | 
			
		||||
    [get-output-bytevector                       i]
 | 
			
		||||
    [with-output-to-string                       i]
 | 
			
		||||
| 
						 | 
				
			
			@ -350,7 +348,6 @@
 | 
			
		|||
    [reset-input-port!                           i]
 | 
			
		||||
    [write-byte                                  i]
 | 
			
		||||
    [read-token                                  i]
 | 
			
		||||
    ;[unread-char                                 i]
 | 
			
		||||
    [printf                                      i]
 | 
			
		||||
    [fprintf                                     i]
 | 
			
		||||
    [format                                      i]
 | 
			
		||||
| 
						 | 
				
			
			@ -529,14 +526,6 @@
 | 
			
		|||
    [$set-tcbucket-val!                          $tcbuckets]
 | 
			
		||||
    [$set-tcbucket-next!                         $tcbuckets]
 | 
			
		||||
    [$set-tcbucket-tconc!                        $tcbuckets]
 | 
			
		||||
    [$flush-output-port                          $io]
 | 
			
		||||
    [$reset-input-port!                          $io]
 | 
			
		||||
    [$close-input-port                           $io]
 | 
			
		||||
    [$close-output-port                          $io]
 | 
			
		||||
    [$write-char                                 $io]
 | 
			
		||||
    [$write-byte                                 $io]
 | 
			
		||||
    [$read-char                                  $io]
 | 
			
		||||
    [$peek-char                                  $io]
 | 
			
		||||
    [$arg-list                                   $arg-list]
 | 
			
		||||
    [$collect-key                                $arg-list]
 | 
			
		||||
    [$$apply                                     $stack]
 | 
			
		||||
| 
						 | 
				
			
			@ -1077,7 +1066,6 @@
 | 
			
		|||
    [get-string-n                                i r ip]
 | 
			
		||||
    [get-string-n!                               i r ip]
 | 
			
		||||
    [get-u8                                      i r ip]
 | 
			
		||||
    [$get-u8                                     $io]
 | 
			
		||||
    [&i/o                                        i r ip is fi]
 | 
			
		||||
    [&i/o-decoding                               i r ip]
 | 
			
		||||
    [i/o-decoding-error?                         i r ip]
 | 
			
		||||
| 
						 | 
				
			
			@ -1107,7 +1095,6 @@
 | 
			
		|||
    [i/o-write-error?                            i r ip is fi]
 | 
			
		||||
    [lookahead-char                              i r ip]
 | 
			
		||||
    [lookahead-u8                                i r ip]
 | 
			
		||||
    [$lookahead-u8                               $io]
 | 
			
		||||
    [make-bytevector                             i r bv]
 | 
			
		||||
    [make-custom-binary-input-port               i r ip]
 | 
			
		||||
    [make-custom-binary-input/output-port        r ip]
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue