diff options
| author | dos-reis <gdr@axiomatics.org> | 2010-12-15 10:00:12 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2010-12-15 10:00:12 +0000 |
| commit | ebafd5f858e29cc75f89e098cd8d564cb7d92144 (patch) | |
| tree | 5ae13dc0066a75644dffbf91fad2ea210f36bc71 /src/interp/sys-utility.boot | |
| parent | a03f99212855569fc0298734521a6468df4b2e00 (diff) | |
| download | open-axiom-ebafd5f858e29cc75f89e098cd8d564cb7d92144.tar.gz | |
* boot/tokens.boot: symbolName is now a builtin function.
* interp/sys-utility.boot (stringImage): New.
* interp/format.boot (form2String1): Use it. Tidy.
Diffstat (limited to 'src/interp/sys-utility.boot')
| -rw-r--r-- | src/interp/sys-utility.boot | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/interp/sys-utility.boot b/src/interp/sys-utility.boot index 04079a7a..f113444f 100644 --- a/src/interp/sys-utility.boot +++ b/src/interp/sys-utility.boot @@ -341,6 +341,12 @@ closeFile file == CLOSE file nil +--% +stringImage x == + symbol? x => symbolName x + string? x => strconc('"_"",x,'"_"") + toString x + --% Socket I/O ++ Attempt to establish a client TCP/IP socket connection. The IP numeric |