17 lines
428 B
Plaintext
17 lines
428 B
Plaintext
%if false
|
|
Copyright (c) 2009, ETH Zurich.
|
|
All rights reserved.
|
|
|
|
This file is distributed under the terms in the attached LICENSE file.
|
|
If you do not find this file, copies can be found by writing to:
|
|
ETH Zurich D-INFK, Universitaetstrasse 6, CH-8092 Zurich. Attn: Systems Group.
|
|
%endif
|
|
|
|
%include polycode.fmt
|
|
|
|
> module Constructs where
|
|
|
|
> import Semantics
|
|
|
|
> data FoFConst a
|
|
> type FoFCode a = Semantics FoFConst a |