author  Tony GarnockJones <tonygarnockjones@gmail.com> 
Mon, 04 Jul 2011 10:59:25 0400  
changeset 37  c28094727b3d 
parent 36  ae93c5bd6657 
permissions  rwrr 
36
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

1 
#lang racket/base 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

2 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

3 
(require "ometa.scm") 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

4 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

5 
(provide *ometadebug* 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

6 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

7 
parseposition>? 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

8 
topfileparseposition 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

9 
updatefileparseposition 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

10 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

11 
mergeparseerrors 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

12 
makeparseerror 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

13 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

14 
inputstreamcons 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

15 
inputstreamposition 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

16 
inputstreamappend 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

17 
>inputstreamorfalse 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

18 
>inputstream 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

19 
registerinputstreamconstructor! 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

20 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

21 
inputstreamsplitatmost 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

22 
inputstream>list 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

23 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

24 
makeportinputstream 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

25 
currentinputstream 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

26 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

27 
ometanamespacegetter 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

28 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

29 
metaometa 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

30 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

31 
serializeometaast 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

32 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

33 
formatometaerror 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

34 
reportometaerror 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

35 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

36 
parseometa 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

37 
parseometafile 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

38 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

39 
ometalibrarypath 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

40 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

41 
opt 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

42 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

43 
mergeometa 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

44 

ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

45 
loadometa 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

46 
simpleometadriver 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

47 
interpretometa ;; use simpleometadriver instead 
ae93c5bd6657
Racket main.rkt for use as a planet collect
Tony GarnockJones <tonygarnockjones@gmail.com>
parents:
diff
changeset

48 
) 