← Back to branch summary

~ubuntu-branches/ubuntu/utopic/haskell-uulib/utopic

~ubuntu-branches/ubuntu/utopic/haskell-uulib/utopic

« back to all changes in this revision

Viewing changes to src/UU/Scanner/Token.hs

Committer: Bazaar Package Importer
Author(s): Arjan Oosting
Date: 2006-11-18 16:24:30 UTC
Revision ID: james.westby@ubuntu.com-20061118162430-24ddyj27kj0uk17v

Tags: upstream-0.9.2

Import upstream version 0.9.2

files added:

COPYRIGHT

LICENSE-LGPL

Makefile.in

README

Setup.hs

VERSION

configure

configure.in

src

src/UU

src/UU/DData

src/UU/DData/IntBag.hs

src/UU/DData/IntMap.hs

src/UU/DData/IntSet.hs

src/UU/DData/Map.hs

src/UU/DData/MultiSet.hs

src/UU/DData/Queue.hs

src/UU/DData/Scc.hs

src/UU/DData/Seq.hs

src/UU/DData/Set.hs

src/UU/PPrint.hs

src/UU/Parsing

src/UU/Parsing.hs

src/UU/Parsing/CharParser.hs

src/UU/Parsing/Derived.hs

src/UU/Parsing/Interface.hs

src/UU/Parsing/Machine.hs

src/UU/Parsing/MachineInterface.hs

src/UU/Parsing/Merge.hs

src/UU/Parsing/Offside.hs

src/UU/Parsing/Perms.hs

src/UU/Parsing/StateParser.hs

src/UU/Pretty

src/UU/Pretty.hs

src/UU/Pretty/Basic.hs

src/UU/Pretty/Ext.hs

src/UU/Scanner

src/UU/Scanner.hs

src/UU/Scanner/GenToken.hs

src/UU/Scanner/GenTokenOrd.hs

src/UU/Scanner/GenTokenParser.hs

src/UU/Scanner/GenTokenSymbol.hs

src/UU/Scanner/Position.hs

src/UU/Scanner/Scanner.hs

src/UU/Scanner/Token.hs

src/UU/Scanner/TokenParser.hs

src/UU/Scanner/TokenShow.hs

src/UU/Util

src/UU/Util/BinaryTrees.hs

src/UU/Util/PermTree.hs

src/UU/Util/Utils.hs

uulib.cabal

uulib.cabal.in

Show diffs side-by-side

added added

removed removed

src/UU/Scanner/Token.hs

1

module UU.Scanner.Token where

2

3

import UU.Scanner.GenToken(GenToken(..))

4

import UU.Scanner.Position(Pos)

5

6

type Token = GenToken String EnumValToken String

7

8

data EnumValToken

9

= TkVarid

10

| TkConid

11

| TkString

12

| TkChar

13

| TkInteger8

14

| TkInteger10

15

| TkInteger16

16

| TkFraction

17

| TkTextnm

18

| TkTextln

19

| TkOp

20

| TkConOp

21

| TkError

22

deriving (Eq, Ord)

23

24

reserved :: String -> Pos -> Token

25

reserved = Reserved

26

27

valueToken :: EnumValToken -> String -> Pos -> Token

28

valueToken = ValToken

29

30

errToken :: String -> Pos -> Token

31

errToken = valueToken TkError

32

Older »