; CPU description file generator for the GNU Binutils.
; This is invoked to build: $arch-desc.[ch], $arch-opinst.c,
; $arch-opc.h, $arch-opc.c, $arch-asm.in, $arch-dis.in, and $arch-ibld.[ch].
-; Copyright (C) 2000 Red Hat, Inc.
+; Copyright (C) 2000, 2009 Red Hat, Inc.
; This file is part of CGEN.
;
; This is a standalone script, we don't load anything until we parse the
(load (string-append srcdir "/opc-opinst.scm"))
)
-; Records the -OPC arg which specifies the path to the .opc file.
-(define -opc-file-path #f)
-(define (opc-file-path)
- (if -opc-file-path
- -opc-file-path
- (error ".opc file unspecified, missing -OPC argument"))
-)
-
(define opc-arguments
(list
(list "-OPC" "file" "specify path to .opc file"
- (lambda (arg) (set! -opc-file-path arg))
+ (lambda (arg) (set-opc-file-path! arg))
#f)
(list "-H" "file" "generate $arch-desc.h in <file>"
#f