Click here to Skip to main content
13,045,657 members (67,566 online)
Click here to Skip to main content

Stats

144K views
3.2K downloads
246 bookmarked
Posted 22 Oct 2011
MIT

Implementing Programming Languages Using C# 4.0

, 12 Jul 2012
An introduction to creating programming language tools using C# 4.0.
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace Diggins.Jigsaw
{
    /// <summary>
    /// For a short introduction to Scheme see: http://cs.gettysburg.edu/~tneller/cs341/scheme-intro/index.html
    /// See also: http://people.cs.aau.dk/~normark/scheme/r4rs/r4rs_toc.htm#SEC2
    /// </summary>
    class SchemeGrammar : SharedGrammar
    {
        public static Rule Symbol = SExpressionGrammar.Symbol;
        public static Rule Atom = SExpressionGrammar.Atom;
        public static Rule SExpr = SExpressionGrammar.SExpr;

        public static Rule Quote = CharToken('`') + SExpr;
        public static Rule Primitive = Recursive(() => Lambda | If | Let | Begin | Define);
        public static Rule Term = (Atom | Primitive | Quote);
        public static Rule Param = Node(Symbol);
        public static Rule ParamList = Node(Parenthesize(ZeroOrMore(Param + WS)));
        public static Rule Lambda = Node(Parenthesize(Keyword("lambda") + ParamList + Term));
        public static Rule Begin = Node(Keyword("begin") + OneOrMore(Term));
        public static Rule Define = Node(Keyword("define") + Symbol + WS + Term);
        public static Rule VarBinding = Node(Parenthesize(Symbol + WS + Term));
        public static Rule Let = Node(Keyword("let") + Parenthesize(ZeroOrMore(VarBinding)) + Term);
        public static Rule If = Node(Parenthesize(Keyword("if") + Term + Term + Opt(Term)));
    }
}

By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.

If a file you wish to view isn't highlighted, and is a text file (not binary), please let us know and we'll add colourisation support for it.

License

This article, along with any associated source code and files, is licensed under The MIT License

Share

About the Author

Christopher Diggins
Software Developer Autodesk
Canada Canada
This article was written by Christopher Diggins, a computer science nerd who currently works at Autodesk as an SDK specialist.

You may also be interested in...

Pro
Permalink | Advertise | Privacy | Terms of Use | Mobile
Web01 | 2.8.170713.1 | Last Updated 12 Jul 2012
Article Copyright 2011 by Christopher Diggins
Everything else Copyright © CodeProject, 1999-2017
Layout: fixed | fluid