restored some sample moo code files
This commit is contained in:
		@ -421,7 +421,7 @@ class MyObject(Object)
 | 
			
		||||
			[
 | 
			
		||||
				| ss |
 | 
			
		||||
				httpd start: %(
 | 
			
		||||
				##	SocketAddress fromString: ('[::]:' & base_port asString),
 | 
			
		||||
					SocketAddress fromString: ('[::]:' & base_port asString),
 | 
			
		||||
					SocketAddress fromString: ('0.0.0.0:' & (base_port + 1) asString)
 | 
			
		||||
				).
 | 
			
		||||
 | 
			
		||||
@ -463,7 +463,7 @@ httpd connect: addr.
 | 
			
		||||
			[
 | 
			
		||||
				| ss |
 | 
			
		||||
				httpd start: %(
 | 
			
		||||
				##	SocketAddress fromString: '[::]:7777',
 | 
			
		||||
					SocketAddress fromString: '[::]:7777',
 | 
			
		||||
					SocketAddress fromString: '0.0.0.0:7776'
 | 
			
		||||
				).
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
@ -84,7 +84,6 @@ class MyObject(Object)
 | 
			
		||||
			[Exception hash dump] ensure: ['xxxx' dump].
 | 
			
		||||
		] on: Exception do: [:ex | ('Exception caught - ' & ex asString) dump ].*)
 | 
			
		||||
 | 
			
		||||
(*
 | 
			
		||||
		ffi := FFI new: '/lib64/libc.so.6'.
 | 
			
		||||
		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 close.
 | 
			
		||||
		}. 
 | 
			
		||||
*)
 | 
			
		||||
 | 
			
		||||
		(('abcd' == 'abcd') ifTrue: [1] ifFalse: [2]) dump.
 | 
			
		||||
 | 
			
		||||
	}
 | 
			
		||||
 | 
			
		||||
		Reference in New Issue
	
	Block a user