| AI-Prolog documentation | Contained in the AI-Prolog distribution. |
AI::Prolog::Parser::PreProcessor - The AI::Prolog Preprocessor
my $program = AI::Prolog::Parser::Preprocessor->process($prolog_text).
This code reads in the Prolog text and rewrites it to a for that is suitable for the AI::Prolog::Parser to read. Users of AI::Prolog| should never need to know about this.
Curtis "Ovid" Poe, <moc tod oohay ta eop_divo_sitruc>
Reverse the name to email me.
Copyright 2005 by Curtis "Ovid" Poe
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
| AI-Prolog documentation | Contained in the AI-Prolog distribution. |
package AI::Prolog::Parser::PreProcessor; $REVISION = '$Id: PreProcessor.pm,v 1.2 2005/08/06 23:28:40 ovid Exp $'; $VERSION = '0.01'; use strict; use warnings; use aliased 'AI::Prolog::Parser::PreProcessor::Math'; sub process { my ($class, $prolog) = @_; # why the abstraction? Because I want DCGs in here, too. Maybe # other stuff ... $prolog = Math->process($prolog); return $prolog; } 1; __END__