15 lines
917 B
Plaintext
15 lines
917 B
Plaintext
#########################################################################
|
|
# #
|
|
# 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. #
|
|
# #
|
|
#########################################################################
|
|
|
|
$1=="enum" {n=0; next; }
|
|
{for (i = 1; i <= NF; i++) {printf("let op%s = %d\n", $i, n++);}}
|