%token <string> ALPHA
%token CREATE
%token PAGE
%token SET
%token TITLE
%token MYTITLE
%token EOL

%start main
%type <string> main

%%
main:
	expr EOL { $1 }
;
 
expr:
	  ALPHA             {$1}
	| CREATE PAGE       {"<html>"}
	| SET TITLE ALPHA   {"<head><title>" ^ $3 ^ "</title></head>"}
;