2012-08-02 01:17:59 -07:00
|
|
|
#########################################################################
|
|
|
|
|
# #
|
|
|
|
|
# OCaml #
|
|
|
|
|
# #
|
|
|
|
|
# Xavier Leroy, projet Cristal, INRIA Rocquencourt #
|
|
|
|
|
# #
|
|
|
|
|
# Copyright 1995 Institut National de Recherche en Informatique et #
|
|
|
|
|
# en Automatique. All rights reserved. This file is distributed #
|
|
|
|
|
# under the terms of the Q Public License version 1.0. #
|
|
|
|
|
# #
|
|
|
|
|
#########################################################################
|
|
|
|
|
|
1995-05-04 03:15:53 -07:00
|
|
|
$1=="enum" {n=0; next; }
|
|
|
|
|
{for (i = 1; i <= NF; i++) {printf("let op%s = %d\n", $i, n++);}}
|
