Mercurial > hg > jslab
annotate src/scheme/scheme-client.scm @ 8:5e3cbbf173aa tip
Reorganise some more
| author | samer |
|---|---|
| date | Fri, 05 Apr 2019 22:41:58 +0100 |
| parents | bf79fb79ee13 |
| children |
| rev | line source |
|---|---|
| samer@0 | 1 (define (readline prompt) |
| samer@0 | 2 (org.gnu.readline.Readline.readline prompt)) |
| samer@0 | 3 |
| samer@0 | 4 (define-method (connect h l) |
| samer@0 | 5 (samer.silk.Terminal.connect (java.net.Socket. h 2000) l)) |
| samer@0 | 6 (define-method (connect h) |
| samer@0 | 7 (samer.silk.Terminal.connect (java.net.Socket. h 2000) readline)) |
| samer@0 | 8 |