restored some sample moo code files
This commit is contained in:
parent
65a702a88b
commit
936b9179ed
@ -421,7 +421,7 @@ class MyObject(Object)
|
|||||||
[
|
[
|
||||||
| ss |
|
| ss |
|
||||||
httpd start: %(
|
httpd start: %(
|
||||||
## SocketAddress fromString: ('[::]:' & base_port asString),
|
SocketAddress fromString: ('[::]:' & base_port asString),
|
||||||
SocketAddress fromString: ('0.0.0.0:' & (base_port + 1) asString)
|
SocketAddress fromString: ('0.0.0.0:' & (base_port + 1) asString)
|
||||||
).
|
).
|
||||||
|
|
||||||
@ -463,7 +463,7 @@ httpd connect: addr.
|
|||||||
[
|
[
|
||||||
| ss |
|
| ss |
|
||||||
httpd start: %(
|
httpd start: %(
|
||||||
## SocketAddress fromString: '[::]:7777',
|
SocketAddress fromString: '[::]:7777',
|
||||||
SocketAddress fromString: '0.0.0.0:7776'
|
SocketAddress fromString: '0.0.0.0:7776'
|
||||||
).
|
).
|
||||||
|
|
||||||
|
@ -84,7 +84,6 @@ class MyObject(Object)
|
|||||||
[Exception hash dump] ensure: ['xxxx' dump].
|
[Exception hash dump] ensure: ['xxxx' dump].
|
||||||
] on: Exception do: [:ex | ('Exception caught - ' & ex asString) dump ].*)
|
] on: Exception do: [:ex | ('Exception caught - ' & ex asString) dump ].*)
|
||||||
|
|
||||||
(*
|
|
||||||
ffi := FFI new: '/lib64/libc.so.6'.
|
ffi := FFI new: '/lib64/libc.so.6'.
|
||||||
if (ffi isError)
|
if (ffi isError)
|
||||||
{
|
{
|
||||||
@ -97,7 +96,7 @@ class MyObject(Object)
|
|||||||
(ffi call: #printf signature: 's|iis)i' arguments: #(S'A=>%d B=>%d Hello, world %s\n' 1 2 'jump down')) dump.
|
(ffi call: #printf signature: 's|iis)i' arguments: #(S'A=>%d B=>%d Hello, world %s\n' 1 2 'jump down')) dump.
|
||||||
ffi close.
|
ffi close.
|
||||||
}.
|
}.
|
||||||
*)
|
|
||||||
(('abcd' == 'abcd') ifTrue: [1] ifFalse: [2]) dump.
|
(('abcd' == 'abcd') ifTrue: [1] ifFalse: [2]) dump.
|
||||||
|
|
||||||
}
|
}
|
||||||
|
Loading…
Reference in New Issue
Block a user