mirror of
https://github.com/Mercury-Language/mercury.git
synced 2025-12-19 15:54:18 +00:00
3d45791e77
Estimated hours taken: 0.75 Fix some bugs in the MLDS back-end support. scripts/parse_grade_options.sh-subr: Fix a bug: s/high_level/highlevel/g scripts/final_grade_options.sh-subr: Ensure that --high-level-code disables the use of the low-level gcc extensions, as is done in compiler/handle_options.m.
52 lines
1.5 KiB
Plaintext
52 lines
1.5 KiB
Plaintext
#---------------------------------------------------------------------------#
|
|
# Copyright (C) 1998-2000 The University of Melbourne.
|
|
# This file may only be copied under the terms of the GNU General
|
|
# Public License - see the file COPYING in the Mercury distribution.
|
|
#---------------------------------------------------------------------------#
|
|
#
|
|
# final_grade_options.sh-subr:
|
|
# An `sh' subroutine for handling implications between grade-related
|
|
# options. Used by the `ml', `mgnuc' and `c2init' scripts.
|
|
#
|
|
# The code here should be inserted after a script's option-parsing
|
|
# loop.
|
|
#
|
|
# IMPORTANT: any changes to the handling of grades here may also require
|
|
# changes to compiler/handle_options.m.
|
|
#
|
|
# This file should only use the shell variables initialized by
|
|
# init_grade_options.sh-subr.
|
|
#
|
|
#---------------------------------------------------------------------------#
|
|
|
|
#
|
|
# .tr grade is not compatible with .mm
|
|
# (see comment in runtime/mercury_tabling.c for rationale)
|
|
#
|
|
case $use_trail,$use_minimal_model in
|
|
true,true)
|
|
echo "trailing and minimal model tabling are not compatible" 1>&2
|
|
exit 1 ;;
|
|
esac
|
|
|
|
#
|
|
# .debug grade implies --use-trail in the absence of .mm
|
|
# (see comment in compiler/handle_options.m for rationale)
|
|
#
|
|
case $stack_trace,$require_tracing,$use_minimal_model in
|
|
true,true,false)
|
|
use_trail=true ;;
|
|
esac
|
|
|
|
#
|
|
# --high-level-code disables the use of low-level gcc extensions
|
|
#
|
|
case $highlevel_code in true)
|
|
non_local_gotos=false
|
|
asm_labels=false
|
|
global_regs=false
|
|
;;
|
|
esac
|
|
|
|
#---------------------------------------------------------------------------#
|