| OLD | NEW |
| 1 #!/usr/local/bin/perl | 1 #!/usr/local/bin/perl |
| 2 # Borland C++ builder 3 and 4 -- Janez Jere <jj@void.si> | 2 # Borland C++ builder 3 and 4 -- Janez Jere <jj@void.si> |
| 3 # | 3 # |
| 4 | 4 |
| 5 $ssl= "ssleay32"; | 5 $ssl= "ssleay32"; |
| 6 $crypto="libeay32"; | 6 $crypto="libeay32"; |
| 7 | 7 |
| 8 $o='\\'; | 8 $o='\\'; |
| 9 $cp='copy'; | 9 $cp='copy'; |
| 10 $rm='del'; | 10 $rm='del'; |
| (...skipping 99 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 110 -\$(RM) $lfile$target | 110 -\$(RM) $lfile$target |
| 111 \$(MKLIB) $lfile$target \@&&! | 111 \$(MKLIB) $lfile$target \@&&! |
| 112 +\$(**: = &^ | 112 +\$(**: = &^ |
| 113 +) | 113 +) |
| 114 ! | 114 ! |
| 115 ___ | 115 ___ |
| 116 } | 116 } |
| 117 else | 117 else |
| 118 { | 118 { |
| 119 local($ex)=($target =~ /O_SSL/)?' $(L_CRYPTO)':''; | 119 local($ex)=($target =~ /O_SSL/)?' $(L_CRYPTO)':''; |
| 120 » » $ex.=' wsock32.lib gdi32.lib'; | 120 » » $ex.=' ws2_32.lib gdi32.lib'; |
| 121 $ret.="\t\$(LINK) \$(MLFLAGS) $efile$target /def:ms/${Name}.def
@<<\n \$(SHLIB_EX_OBJ) $objs $ex\n<<\n"; | 121 $ret.="\t\$(LINK) \$(MLFLAGS) $efile$target /def:ms/${Name}.def
@<<\n \$(SHLIB_EX_OBJ) $objs $ex\n<<\n"; |
| 122 } | 122 } |
| 123 $ret.="\n"; | 123 $ret.="\n"; |
| 124 return($ret); | 124 return($ret); |
| 125 } | 125 } |
| 126 | 126 |
| 127 sub do_link_rule | 127 sub do_link_rule |
| 128 { | 128 { |
| 129 local($target,$files,$dep_libs,$libs)=@_; | 129 local($target,$files,$dep_libs,$libs)=@_; |
| 130 local($ret,$_); | 130 local($ret,$_); |
| 131 | 131 |
| 132 $file =~ s/\//$o/g if $o ne '/'; | 132 $file =~ s/\//$o/g if $o ne '/'; |
| 133 $n=&bname($targer); | 133 $n=&bname($targer); |
| 134 $ret.="$target: $files $dep_libs\n"; | 134 $ret.="$target: $files $dep_libs\n"; |
| 135 $ret.="\t\$(LINK) \$(LFLAGS) $files \$(APP_EX_OBJ), $target,, $libs\n\n"
; | 135 $ret.="\t\$(LINK) \$(LFLAGS) $files \$(APP_EX_OBJ), $target,, $libs\n\n"
; |
| 136 return($ret); | 136 return($ret); |
| 137 } | 137 } |
| 138 | 138 |
| 139 1; | 139 1; |
| OLD | NEW |