master/image/coreImage

User picture

Commiter: Charles Childers

Author: Charles Childers

Revision: 4de7dc8b06


File Size: 24.5 KB

(May 01, 2010 04:55 UTC) About 2 years ago

add "10.6" vocabulary; update to latest rx-core

 
Show/hide line numbers
	RETROok 																																							NN				T	jd	,Tw	uT	T	T	T	TT	TNT	

N	N	TT	TT
TNTTT	T	
T			
	,&	$	 	G
O
9	\ 
d 	
x:=	g	8		e|8
3		


		e8	3	8
3				NTTNT 
}N	^TT		)	
2		,=	;		K}K	CNTTN}	"
T	ud	0123456789ABCDEF
		
						0	-		
		4	2	S	i	-	r	aQp	,				
			
			 

			__&	

7
6		
CC	9?		;	D			y,	
C

 D	
z		l 
	
1+
1-
swap
drop
and
or
xor
@
!
+
-
*
/mod
<<
>>nip
dup
in&
out0accept8Nhere=T,B^]LcreateQ:Z$later`crvemitf:remap-keysl,typeover2dropnotrot-rottuck2duponoff/modnegexecutew(.)u"comparewait'
,@+3!+;+!D-!'compile3literal,ATtempStringKredrawYdkeepStringCgetLengthtwith-class}.word.macro.datad->classd->xtd->nameboot >numberloklistenCisNumber?ekeyfindDnotfoundtime	
~s"d[
p;
j;; 
=if'
>if.
<if5
!if=
thenG
repeatP
againV
0;^
pushe
pop
[']q(
untilL__&P__+W__-^__@e__!lastcompiler
tibupdatefbfwfh#memheapwhich9whitespace.
basesavesr~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~  
listv}%{;	=*}D	LC{{	u\---reveal---	r	h	&{}}f	save	hbye	depth	reset	include 
	"
:devector	
:is	
devector	
(
is
	I
8
forget	
O
d'	I
`
afterk
	d
	W
x
remove`
	n

replace	

>lastx

	
exposeO

	

.primitive

T		+
.compiler
		
reclass	
reclass:O
	%immediate
	;compile-only

	_
F`
V	
 	
gstubp
	
ur


	
rdrop

	i	
forN
	l
next




	
fori


	

nexti


	char: 
	++;	--D	83variable:T	JDvariable3	Vconstant	hallot
s;	Ts	_listNh	{element	elements
	copy,3
	AfillNN3
	NaheadTNT	
if
	,
 if;

	>
5;thenj

	_
Felse
	]S=Z		mc<>
j		|r>y		<
		withinrS	decimal
	hex	octal	binary	ppowNN
	
skim		1&xt->d
/		K:.does
I		{
Tdoes>TNT
j
NN:	~uclear	space 	.w	."
~
,	u,	countbufferrestoreel	get	next 		
replace
e
	"eval
	7defined 
	,LevalTib
C"	A]blocke{l{}}Invalid Syntaxn,	TevalBlock]L	ifBlock
	]	ifDefined7	ifNotDefined7	shownhiddenbeforenestdepth%.shown	8.hidden%	-H.before%	=Wafterb	[	NoremoveW	ereplace	zfields%	open8%	MshutH%	:find		open?	toggle
		descend	9ascend	^W.vocab	qgvocabhW
	w((	))o9	>vocab	(.s)	<depth><w>	.s	words,	rx	4W"retro4zW1prefixes%z>prefix111	%WSfilesJ%%:rV:r+\:wc:w+i:ap:a+vfile.io	vfopen	fread	fwrite	fclose	fpos	fseek	fsize	JWnetJJnet.socket	)net.bind	@net.listen	2Wnet.accept	Imnet.close	`net.send	vnet.recv	net.connect	Wcanvas|mouse	click?	setColor	pixel	box	-solidBox	!?vline	6Qhline	Hdcircle	Z|solidCircle	mblack	blue	green	cyan	red	purple	brown	gray	darkgray	brightblue		.brightgreen
	Bbrightcyan	4Ubrightred	Hfmagenta
	[vyellow	lwhite