Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Tobias Decking
GHC
Commits
24928a55
Commit
24928a55
authored
May 10, 2005
by
simonmar
Browse files
[project @ 2005-05-10 10:41:00 by simonmar]
Mangler support for GNU/Hurd. From: Thomas Schwinge
parent
723fb29b
Changes
1
Hide whitespace changes
Inline
Side-by-side
ghc/driver/mangler/ghc-asm.lprl
View file @
24928a55
...
...
@@ -160,12 +160,12 @@ sub init_TARGET_STUFF {
$T_HDR_vector = "\.text\n\t\.align 2\n"; # NB: requires padding
#--------------------------------------------------------#
} elsif ( $TargetPlatform =~ /^i386-.*-(solaris2|linux|freebsd|netbsd|openbsd)$/ ) {
} elsif ( $TargetPlatform =~ /^i386-.*-(solaris2|linux|
gnu|
freebsd|netbsd|openbsd)$/ ) {
$T_STABBY = 0; # 1 iff .stab things (usually if a.out format)
$T_US = ''; # _ if symbols have an underscore on the front
$T_PRE_APP = # regexp that says what comes before APP/NO_APP
($TargetPlatform =~ /-(linux|freebsd|netbsd|openbsd)$/) ? '#' : '/' ;
($TargetPlatform =~ /-(linux|
gnu|
freebsd|netbsd|openbsd)$/) ? '#' : '/' ;
$T_CONST_LBL = '^\.LC(\d+):$'; # regexp for what such a lbl looks like
$T_POST_LBL = ':';
$T_X86_PRE_LLBL_PAT = '\.L';
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment